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TL CONDIT 

********* 
EQUATE 



000002 
OOOOOQ 
OOOOQ1 
OO0002 
000000 
000000 
OOOOOQ 
000003 
00000 1 
00000 1 

oooooo 



CSTYPE = 


$$UOA 


SSKDA 


$$KOB 


LAB - 


WRAP r 


C0PY4 = 


. E . C . : 


ODADM : 


OREVB : 


SIMTST : 



ASSEMBLY EQUATES 

******* ******************************* ********************** 

CONDITIONAL ASSEMBLY CODE 
************************************************************ 
^CONTROLLER TYPE: O : UDA. 1 = KDA. 2 = KDB 



r O 

: 1 
= 2 



LAB LOOP ON TEST CONTINOUSLY • 1, NOT FOR LAB USE "- O 

WRAP TEST * I (LAB MUST = 1). NO WRAP TEST = O 

O : NORMAL 2 COPY HEADER COMPARE, 1 : ALL 4 MUST MATCH 

: NO OM IN KDA, 1 : DM IN KDA 

O ■■ KDA PRIOR TO REV 8. 1 = KDA REV B OR AFTER 

O : NORMAL CODE, I : ASSEMBLE SIMULATE TEST (KDB) 



Q 
< 

a 
ii 
s 

a 
o 

LL 
V) 

o 

V) 
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. PAGE 

UDA CONTROL MEMORY 

47 46 45 44 43 42 41 40 39 33 37 38 35 34 33 32 



31 30 29 28 27 26 25 24 23 22 21 20 19 IS 17 16 
H + - -H H + 

I ! > IOC ! RA/IBS] ! 



(! 



! Q> ■ - 

I I 

-0--+- 



15 14 
S ! EN ! 



12 11 
- -H 



AF: 
AF: 
ALU 



RB 
BD 
RA 
IBS1 
IP 

IOC 
LIT 



1 
ALU 
B PO 
BUS 
A PO 
BUS 
IOC 
INPU 
8 BI 
3 BI 



0-2 

3-7 

DEST 

ALU 

ALU 

ALU 

ALU 

FUNC 

ADO 

SUS 

SOUR 

RA, 

RA, 

TO D 

RT R 

DEST 

RT R 

SOUR 

ENAB 

T OU 

T LI 

T LI 



CARRV 

HIGH 
NATI 
-> 
- > D 
-> R 
-> R 

TION 
R*S 
S-R 

CE = R 



09 O 

BR 

- -0- 

IN 

BYT 

ON 

, OB 



8 07 

H- - 
ANCH 

TO A 

E LI 



RA - 
OB 

*SELE 

2: 

3: 

*CHO 

2 



LITERAL IF AB: I 


06 05 04 03 02 
H 

ADDRESS (BA! 

— o - o 

LU 

TERAL SELECT 

LU -> DB IF AI: 1* 

4t ALU/2 -> 

S» ALU/2 -> 

6: ALUX2 -> 

7= ALUX2 -> 



*DB: OATA BUS* 



DB 



RB , 
RB, 
RB, 
RB , 



0/2 
ALU 
0X2 
ALU 



CT HIOH BYTE LITERAL WITH AF 



REVSUB 
R OR S 



R-S 



9, ALU -> DB 
DB 

9, ALU -> DB 
OB 
I 3-7 AND CRY: 
6: R XOR S 



XNOR 



RB 

ATA B 
EGIST 
INAT I 
EGIST 



ALS 



R AND S 
NOT R AND S 
OSE RA OR BS OR LITERAL AS SOURCE* 
0,9 4=0, RA 6=0, 

O.RB Si O.RA (RAsRS) 7: D, 

BS SRC ON BUS, H ALU AS BUS SRCENB LITERAL 
PORT IF AS: S OR 7 



(RAsRB) 



TPUT C 

TERAL 

TERAL 



TO 



* [AB: 0/1 ]* 
* IF AB: 0* 

O: DISABLE 1> ENABLE 

TROL SELECT (SPECIAL OPERATION) 

LOW BYTE IF CRYs O AND AF : 0-2 

HIGH BYTE IF CRY: 1 AND AF: 3-7 



CH TEST 
S 

TEST- 
EN 
CE 



P 
BA 



TEST SENSE: O: JUMP IF TEST LOW (-), 

TEST CONOITION SELECT 

ENABLE CONDITIONAL EXECUTE PER CE BIT 

CONDITIONAL ALU EXECUTE ON TEST RESULT 

0: EXECUTE IF TEST FALSE (FAILS), 1: EXECUTE IF TEST TRUE(PASS) 

JUMP OPERATION 

O: JUMP 1 < BA* OFFFH : JUMP TO SUBROUTINE 

1 3 BA: OFFFH : RETURN FROM SUBROUTINE 
PARITY BIT FOR ODD PARITY 
BRANCH ADDRESS 



1: JUMP IF TEST HIGH (♦) 
ELSE CONTINUE TO PC»1 
6 O: DISABLE, 1 : ENABLE 
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Q 
< 

3 
O 
II 

s 

O 

LL 

co 
o 

01 



INSTRUCTION 
LABEL 
LABEL 



FORMAT 
ALUO 
ALUO 
i Pit S 
fixtS 
dSt : 
bd : 
mod : 



TYPES; 

LABEL 
LABEL 
LABEL 
LABEL 
MNEMONICS; 
ALUOP: ADD 
COM 
MOVB 
SUB 
JUMPOP: JUMP 
CALL 
RETU 
TEST 
A2TEC 
INNER INSTR 
The 
anot h 
are t 
bus o 
end o 
arB c 
s i gna 
i nst p 
act i v 
act i v 



UCT 
gn 
er . 
ast 
per 
f t 
han 
1 U 
uct 



#L IT 
#L IT 
##L I 
ALU 
ALUO 
ALUO 
ALUO 
ALUO 

AOOC 
COMB 
NEC 
SUBC 
ADORES 
ADORES 

. + 1 A 

NLY: 
ION 
al S 



P\mod 
P\mod 

PC: 2 
PC : 
2901 
2901 
\F = 
\0: 
\L: 
\R = 
: 1 it 
: lO 
T. up 
INSTR 
F RA, 
P (BS 
P # L 
P ##L 



901 

i Pit 
ext 
exec 
out p 
pot a 
pot a 
era 1 
wep 
per 
UCTI 



IT, R 
IT, R 



tsrc\ 
xtsre 
int 
ext er 
erna 1 
erna 1 
ute f 
ut RA 
te AL 
te AL 
sour 
8 bit 
8 bit 
ON FO 
B, BD 
B.BD 
B, BD 
B.BD 



mod 

) 

nal 

nal 
des 
des 

a 1 se 

la 
U 

ce 
1 it 
1 it 
RMAT 
PIOC 
PIOC 
tPIOC 
PIOC 



dst\ 
dst\ 

sour 
sour 
t i na 
t i na 



ft 
ght 
Can 
era 1 
era 1 



AND 
DEC 
NEGB 

SHF 



Al 
ed a 
at i o 
he i 
ged 
PROC 
i on . 
UPR 
A S 



LWAYS) ; 
RTN 
NC RE 
IK L 
ming 
beg 



TIMI 
E9 C 
1 t 
t th 
ns a 
nst p 
just 
H d 
UP 
OC H 
i mpl i 



lo 



uct i 



efine 
ROC H 



BIC 
DECB 

NOP 

SHFB 

JMP 

JSR 

RET 

T 

JMPI 
LATIONSHI 
det er mi ne 
is refera 

n i ng of 
aded into 
The I 
tt le pp t o 
s which p 

: 1 (UPR 

(UPROC L 
timing r 



mod 
mod 
ce 
ce 
t i o 
t i o 
\T = 
\N = 
\L0 
\R0 
be 
w i 
w i 
SOU 
peg 
dat 
lo/ 
upp 

IS 

ECC 

R 
ST 



".JUMPOP test. address 
5SJUMPTEST address 



bd 8>ioc 
bd QHoc 

RA 
(BS) 

RB 

BD 
execute on true test conditi 
no write to ALU 

shift 9 left 
shift 9 right 

ex . 

bits : 
bits 

OPERATION 
RA OP RB-> RB 
(BS)OP RB-> RB. BS->BD 
hi literal # LIT OP RB->RB,BD 
literal ##LIT OP RB->RB,BD 



1 ike ##LIT 
th upper 8 
th lower 8 
RCE MOOE 
i St er 
bus 



i on 



<bi tOO+bi t 04> 

zero. 
zero 



CALL 
RTN 



INT 



BIT 

INC 

ROT 

TSTB 

J- 

C 

R 



CLR 
INCB 
ROTB 
XOR 

C- 
R- 



CMP 
MOV 
RSUB 
XNOR 



the start of one instruction from 
need to this signal. Branch conditions 
the instruction. The results of ALU and 
internal or external registers near the 
'ERFACE OUTPUT CONTROL (IOC) Signals 
to the the register loads. The 
icessor is active during the present 
: L = 0) means the UNIBUS processor is 

1) means the DRIVE processor is 
lationship is shown below. 



SE9 CLK L 
UPROC H 



INSTRUCTION 

REGISTER 

INSTRUCTION 



UNIBUS PROC 



DRIVE PROC 



UNIBUS PROC 



r 
% 



LOAD REGISTERS 

CHANGE IOC'S 

TEST BRANCH CONDITION 
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UNIBUS DISK ADAPTER tUOA) TIMING 

+ + ++ + + ++ ++ + + 

I j | | II I I I I I I 

CLOCK H - 



F/F I H - -+5S+- 1 1 6-+ + - 
+ - - + +--+ 



F/F 2 H - -+ 
CLK ENB H + - 



-+sa+- i i s-+ + - 



+ - - + 
+ - - + 



(K.SDI CLOCK IN H) + - 



+--+ + - - + 
■*5!»- I 16-+ + - 



IS!»- 1 1 6-* + - 



+ - - + 
- + +- - - - 



SEO CLK L -♦ + -- 

+ - - 1 74- - - 
UPROC H --* 



-+ +- - - - 

+ - - + 



•174 + 



SEO ADR H I/////U+1 I/////D+1 !/////U+2!/////0+2!/////U+3!/////0+3! 



PIPELINE --♦.- 
ADDRESS REG! 
PADR H --'.♦- 

PIPELINE -- + - 
REGsCURRENT ! 
INSTRUCTION+- 



! U+1 ! 0+1 



U+2 ! 0+2 



0+1 ! U+2 
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RELATIVE CLOCK TIMING - GENERAL 

Common K.SDI, K.DISK, K . ??*> , UDA Terminology 

1. Prefix all clocks with CLK, all bus sources with RO , all bus 
destinations with LO. 

2. Have common page order ie. ALU, CLOCKING, BRANCH, SEO. PAR, CROM etc. 

;K DISK: CLOCK IN H-+ + + ♦ 

;UOA= CLK ENB H + ♦ + ♦ 

I I 

-+ + + + 

CLK ENB1 H + + ♦ ♦ 

--+ + ....+ + 

CLK ENB2 H ♦ ♦ + + 

! I 

---+ + + +- - - - 

CLK ENB3 H ♦ + + + 



CLK ENB4 H 



a 

< 

a 

ii 

5 
cc 
O 



CLK EN85 H 



SEO CLK L 



OLY UPROC H 



to 
o 
to 



PROCCLK L 



LO CLK L 



CLK BDR H 



RO CLK L 



- + - + - 
!/! 

- + - + - 
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^RELATIVE TIME-3S -30 -25 -20 -IS -10 -S 



CLK BDR H 
P2- 17 



SEQCLK L 
P3-2 



PROCCLK L 
P3-4 



BD DECODE 
P3-6 



CLK ENB L 
P3- 19 



<-- S7/58 --> 
<-- 57/58 --> 



<-- 57/58 --> ♦ - 
................. + 

> ! 



SOURCE DATA 
P3-S RD BSO L 



DATA BUS 



OEADBAND L 
P3- lO 



►10 +15 + 20 +25 
( < 10. 5/21 .78 



+ <- - 57/58 - - > 



S< 4.S/9 .0 



19 . 75/34 

S< 16.75/38 



S< -52/-31 .5 



— + <- - 


57/58 --> 




+ - 






>S 
>S 


1 < 5. 25/19 .5 

!< 4.25/29 
> 1 ! < 10/21 .75 




1 


///////////! 




1 //////////////////////////////// 



>S ! < 1 . 75/5.5 

> ! ! < 10/21 . 75 



o 
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Q 

a 
ii 
s 

cc 
o 

LL 
V) 

o 

03 



**2901 MICRO PROCESSOR TIME SHARED AS TWO PROCESSORS** 
* + 16 BIT INTERNAL BUS + * 



***** * * * * * 

* S * * R * 

* H * * E * 
* I * * G *- 

* F * * * 

* T * * * 



***** 

* A * 

* L * 
-0 U * 

* * 

* M *- 

* U * 

* X * 



***** 

* B * 

* U * 

* S * 



* R * 

* * 

-* T *- 

* A * 

* T * 

**E*« 



* 16 * 

* I * 
-* N *- 

* T * 



*--+- -F D V- 

• * R * 

* +- -A V * 
* R * 



* R *---+-A * 
. E * + D * 

* G * ! ! * * 
***** 1 ! ***** 



•16 



******************* 



******** 



12 



* **************** 

* * DATA/LITERAL B<--16 ■ 

* * MUX * 
-0 V CRY SELECTS A<--8-GND 

* * HI/LO BYTE A<- -8 + 

***** **************** 

+ + 12 BIT ADORESS-TEST SELECT-JUMP ■ 

******** +--**2911*« ***** 4KX48 ***** 

* TEST/* ----+-«- -* USEO *--+ * * * * * *--. 

**SYNC*« ! ! ******** I * p * *C* *P* 

+--!-> - + * A *-12-* R *-48-« R *-- 

**REG«* ! 1 +--**2911** ! *R* *0* * * 

+ ->* PAR *->+ + * DSEQ *--+ * * * M * * * 

******* - ***** ***** ***** 



! ******* **L0G*** ! ********** ! 
+-->* UAR *- -+->*ANTILOG- 12->+>* CONTROL*>--+ 
! ******* ! **CONST* ****REG**« 

! ******* +->UNIBUS 
+<->* UDR *----> INFC 
******* 



J1 
PI 



♦-16 BIT BI DERECTIONAL EXTERNAL BUS-+ 

I ******** ***** 4K.X16 
+-12->* UBAR *-- + * * * B * 
! ******** I *M* *U* 
! +--* u *--->* F *<-->+ + 10--- 

! ******** I * x * * F * ! ******** 



* * E C C * * ******** I 

+->RSGEN>--+->ECCRSD*-16>+ 

! "STATUS* ! 



f- 12- >* OBAR *--+ 
! ******** 



* E * 
**R*« 



<->SER0ES>+--<SERDES*<16>+ 



+> IO*BIT* 



+> 1 6*BIT* 



! *********** i 

+< 1 6->*RTCS/RT0S*-P0RT->SDI X 4 > - - NRZ - DATA - ♦ - - 1 + 

***REG***»* INFC <--NR2 DATA 1- + 



V- 
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.SBTTL HARDWARE/SOFTWARE DEFINITIONS AND EQUATES 



c 



HARDWARE/SOFTWARE DEFINITIONS AND EQUATES 
14-JAN-I985 UDAOO.U9A 



; REVISION HISTORY : 
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a 

< 

D 

a 

ii 

5 
cc 
O 
u. 

Ui 

u 



c 



PAGE ADDRESS ADR*6s WAS SHOULD BE TYPE 

PATCH CHANGE 

(OCT) (OCT) (OCT) (OCT) PERM TEMP 



DESCRIPTION 



! ! I I til 

+ + - + + + ---- + + 

! j j ; ■ " _ | - ... ■ 

+ - - + + + +-.--+--__+ 

j ! I I !'! 

+ + + - + + .... + -.-_ + 

! ! > I j I j 

+ + + + + ---- + --••* 

+ - + + - + + + - + 

I i i i ill 
+ - + + - + + - +----+ 

+ -- + + - + + + - + 

! i ! ! ! I ! 

+ - - + + + + + - + 

+ + + + + ---- + ---- + 

+' - + + + + - - - - ♦ - - - - 4 

! ! ! ! ! > ! 

+ -------- + -- +-----..-+--.---.---+___.+. ... + 

'■ ! . ! ! ! • ! 

+ + + + + -.._ + .-..+ 

+ + -- + + +.-.. + ..__ + 

+ .._..-_. + ._....._ + ___ .....+.......__.+____+.._.+ 

I ! ■ ' ! ! | 

+ + + --- + +..... .4. - - ... + 

! ! 1 1 1 1 1 

+ + --- + + + .... + .._.+ 

I ! t 1 III 

+ ..--.... + ........ + _. .._.__ + .. + .... + _...+ 

! ! ! • I ! ! 

+ + + --- + + - - - - + - - - - + 

+ ._...... + . . + _ _ _ + .... + .... + + 

+ -- + ..-.-... + . . + .- + ...„ + ..„..+ 

! ! j 1 1 j 1 

+ . + -.. + --- + +.... + ....+ 

! ! 1 1 til 

+ + -- + + + ....+.-..+ 

i ! ! ! * ! ! 

+ + ... + .. + +.... + ..._ + 
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USING THE 2901 ALU AS A COMPARITOR 



FUNCTION 
RA : 



RA 
RA 



SAME SIGN 
DIFF SIGN 



RA < 
RA>: 
RA > 
RA<: 



RA<: 
RA > 
RA < 
RA # 

RA>: 

RA < 
RAX 
RA < 

RA : 



OPERATI ON 
MOV 
MOV 
XOR 
XNOR 

XOR 
XOR 

SUBC 
SUBC 

(RSUBC ) 
(RSUBC! 



RA, 
RA, 
RA, 
RA, 
ARI 
RA, 
RA, 



SUB 
SUB 

SUB 
SUB 

RSUB 

RSUB 

CMP 

CMP 

RSUB 

RSUB 



RB 

RB 

RB 

RB 

THMET 

RB\N 

RB\N 



OPERAT 

TEST C 

ZRO 

ZRO 

ZRO 

ZRO 

IC OPE 

NEG 

NEG 



P- 



, RB 
, RB 



RA, 

RA 

RA, 

RA, 

ARITHMETIC OPE 



CRY 
CRY 
CRY 
CRY 



RA , 
RA, 
RA, 
RA, 



RA, 
RA, 
RA. 



RB 



CRY 
CRY 
ZRO 
ZRO 

CRY 

CRY 
CRY 
CRY 
ZRO 
ZRO 



IONS 
ONDIT 
TRUE 
FALS 
TRUE 
FALS 
RATION 
TRUE 
FALSE 
P ,N-N 
TRUE 
FALSE 
TRUE 
FALSE 
RATION 
P.N-N 
TRUE 
FALSE 
TRUE 
FALSE 
P , N-N 
TRUE 
FALSE 
TRUE 
FALSE 
TRUE 
FALSE 



RESULT 
RB: RA 



RA XNOR RB 



RB: RA XOR RB 
E RB 

S - CARRY IN OFF 
RA XOR RB 
RA XOR RB 

P-N, N-P 

TRUE RB-RA-1-> 
(TRUE) 

FALSE RA-RB- 1 ■> 

TRUE 
S - CARRY IN ON 

P-N, N-P 

FALSE RB-RA -> 

TRUE 

TRUE RB-RA - 

FALSE 

P-N, N-P 

FALSE RA-RB - 



o 



TRUE 

FALSE 

TRUE 

TRUE 

FALSE 



RA-RB - 



), SO 
1, BD 



, BD 
BD 



P-P, N-N 
P-N, P-N 

(BORROW) 

( BORROW) 

(BORROW) 
(BORROW) 

(BORROW) 
(BORROW) 
( BORROW) 



ADDITION CRY : TRUE 

SUBTRACTION CRY : FALSE 

RA: REGISTER A SOURCE RB s REGISTER 
RB\N: REGISTER B SOURCE, NO LOAD 
P-P: POSITIVE MINUS POSITIVE P-N: 
N-N: NEGATIVE MINUS NEGATIVE N-P: 

RA>: RB <::> RBO RA RA < RB <::> 



MEANS ADD ONE TO NEXT HIGHER 16 BITS 
MEANS BORROW ONE FROM NEXT HIGHER 16 BITS 
B SOURCE, DESTINATION 



POSITIVE MINUS NEGATIVE 
NEGATIVE MINUS POSITIVE 
RB > RA 



COMPARITOR EXCEPTIONS; 

1. MAXIMUM POSITIVE NUMBER IS 32767 (HIGHER CHANGES THE SIGN BIT) 

2. DIFFERENT SIGNS IMPLIES AN EQUATE IS NOT POSSIBLE EXCEPT 
FOR ZERO SINCE IT HAS THE SAME VALUE POSITIVE OR NEGATIVE. 
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PROCESSOR RESTRICTIONS - SUMMARY * 

PAR REGISTER - When loading the PAR register, neither source may be 
changed to allow the address to be stable to the very end of the cycle. 
2. Loading the PAR register must be unconditional to allow the pull-up 
resistors enough time to get above the threshold voltage, 



Q 
< 

3 

a 
ii 
s 

DC 

O 

LL 

V) 

o 



r 
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TEST CONDITIONS FOR 



PROCESSOR 



THE TEST CONDITION EOUATES ARE OF THE FOLLOWING FORM: 

BIT4 POSITIVE TRUE CONDITION Ox FALSE, 1: TRUE (CROMIS) 
BIT4 NEGATIVE TRUE CONDITION 13 FALSE. O: TRUE (CR0M!5I 
BITO-3 TEST CONDITION SELECT ICR0M2S-31I 

DEFINITIONS ARE IN OCTAL UNLESS OTHERWISE SPECIFIED 

BUS PROCESSOR NEGATIVE TRUE CONOITION DEFINITION 



000000 
00000! 
000001 
000002 
000002 
OOO0O3 
000003 
000004 
000005 
000008 
000006 
000007 
000007 
000010 
00001 1 
0000 12 
OO00 13 
000014 
0000 1S 
000015 
0000 16 
000017 



UMPN 


3 





NZRO 


3 


1 


NEO 


= 


1 


NCRV 


3 


2 


LESS 


= 


2 


NMSB 


= 


3 


NNEG 


= 


3 


LSB 


3 


4 


TEST 


3 


5 


NUPF 


= 


6 


DPROC 


3 


6 


ACLO 


= 


7 


nrpok 


= 


7 


FTEST 


3 


10 


STOP 


= 


1 1 


CPE 


= 


12 


ETST1 


3 


13 


MERR 


a 


1 4 


SCAN 


3 


IS 


POLL 


3 


SCAN 


CDONE 


3 


1 6 


NBIBAD 


3 


17 



xOA - JUMP NOT = CONTINUE 

ALU ■ NOT 3 2ER0 (NOT EOUALS] 

ALU • SRC NOT ■ OST 

ALU - CARRV OUT FALSE 

ALU - SRC IS LESS THAN DST 

ALU - MSB 30 

ALU - COMPARITOR MSB 3 O.NOT NEGATIVE (POS OR ZERO I 

ALU - LSB 3 1 

XOA - EXT. TEST L (P3-3I ACTIVE. 00 EXTRA TEST CODE 

XOA - FLAG RESET BV IOC OF U PROCESSOR PRUPF 

XDA - SPLIT ; IPRUPF -> DPROC JUMP/UPROC CONTINUE (PC»1) 

XDA - AC POWER FAILING 

XDA - not power ok t qda compat] 

XDA - FAST SELF TEST 

XOA - STOP COMMAND ISSUED - NO MORE BI COMMANDS 

XOA • CONTROL MEMORY PARITY ERROR 

XOA - EXTERNAL TEST 1 

XOA - 61 COMMAND ERROR ON MASTER PORT (DURING XFER) 

xOA - IP ACCESSED 

XDA - COMMAND DONE 

XOA - 61 BAD L SIGNAL NOT ASSERTED LOW (TBAO H IS L OW I 
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BUS PROCESSOR POSITIVE TRUE CONDITION DEFINITION 



00002 1 

00002 1 
000022 
000022 
000023 
000023 
000024 
000025 
000026 
000026 
000027 
000027 
000030 
000030 

00003 1 
000032 
000033 
000034 
000035 
000035 
000036 
000037 



UMP 


3 


20 


; JMP 


3 


20 


ZRO 


3 


21 


EO 


3 


21 


CRY 


3 


22 


GTE 


S 


22 


MSB 


3 


23 


NEG 


3 


23 


NLSB 


3 


2 4 


NTEST 


3 


25 


UPF 


3 


26 


UPROC 


3 


26 


NACLO 


t 


27 


rpok 


3 


27 ; t emp 


NFTEST 


3 


30 


STEST 


= 


NFTEST 


NSTOP 


3 


31 


NCPE 


r 


32 


NETST1 


: 


33 


NMERR 


Z 


34 


NSCAN 


3 


35 


NPOLL 


3 


NSCAN 


NCDONE 


3 


36 


BIBAO 


: 


37 



XDA - JUMP UNCONDITIONAL 

ASSEMBLER DEFINED • JMP IS UNCONDITIONAL JUMP 

ALU • EOUALS ZERO 

ALU - SRC 3 OST 

ALU • CARRY OUT TRUE 

ALU - SRC IS GREATER THAN OR SAME AS DST 

ALU • MSB 3 1 

ALU • RESULT NEGATIVE MSB3 1 

ALU - LS8 3 

XDA - EXT. TEST I (P3-3) INACTIVE 

XOA ■ FLAG SET BY IOC OF BUS PROCESSOR PSUPF 

(PSUPF -> UPROC JUMP / DPROC CONTINUE IPC-M) 

XDA - AC POWER NOT FAILING 

xOA - power ok (qda compat] 

XOA - SLOW SELF TEST 

XDA • STOP COMMAND NO ISSUED - MORE BI COMMANDS 

XDA - NO CONTROL MEMORY PARITY ERROR 

XDA - NOT EXTERNAL TEST I 

XDA - NO BI COMMAND ERROR ON MASTER PORT (DURING XFER) 

XDA - NO IP ACCESS 

XDA - NOT COMMAND DONE 

xOA - BI BAD L IS ASSERTED LOW (TBAO H IS HIGH) 
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TEST CONDITIONS FOR 



PROCESSOR (WHERE DIFFERENT ONLY) 



DRIVE PROCESSOR NEGATIVE TRUE CONDITION DEFINITION 



000006 
O0OO10 
0000 10 
0000 1 1 
0000 12 
000012 
O00O13 
O00O14 
000O15 
00001 6 
O000 1 6 
000017 



NOPF 


a 


6 


ndclk 


s 


10 


NPROV 


: 


10 


NCSR 


i 


1 1 


SECTR 


9 


1 2 


nrrdy 


: 


1 2 


RPE 


* 


1 3 


NOSER 


t 


14 


NDSR 


= 


IS 


nlate 


■ 


1 S 


NOVER 


= 


1 6 


NWRC 


* 


17 



XOA - D PROCESSOR FLAG NOT SET (PRDPF) 

sdi - serdes parallel data not ready 

SDI - SERDES PARALLEL DATA NOT READY 

SDI - CONTROL STATE NOT READY - RTCS NOT READY TO UPDATE (RELOAD! 

SOI - SeCTOR PULSE 

serdes - ecc residue parallel data not ready [ qda compat 3 

XDA - RAM PARITY ERROR 

NOT REAL TIME DRIVE STATE ERROR 

DRIVE STATE NOT READY - NEW RTDS NOT RECEIVED SINCE LAST WRITTEN TO RTCS 

sdi - no serdes over/under runs 

SDI - NO SEROES OVER/UNDER RUNS 

XDA - WORD RATE CLOCK LOW 



DRIVE PROCESSOR POSITIVE TRUE CONDITION DEFINITION 



000026 
000030 
000030 
O0OO3 1 
000032 
O00O32 
000033 
000034 
00003S 
00OO36 
O0OO36 
000037 



DPF 

dclk 

PRDY 

CSR 

NSECTR 

r rdy 

NRPE 

DSER 

OSR 

late 

OVER 

WRC 



XDA - PROCESSOR FLAG SET (VSUPF) 

sdi - serdes parallel data ready 

SDI - SERDES PARALLEL DATA READY 

SOI - CONTROL STATE READY - RTCS READY TO UPDATE (RELOAD) 

SDI - NO SECTOR PULSE 

serdes - ecc residue parallel data ready [qda compat} 

XDA - RAM PARITY ERROR 

SOI - REAL TIME ORIVE STATE ERROR ( PARI TV , PULSE , OR DATA) 

DRIVE STATE READY - NEW RTDS RECEIVED SINCE LAST WRITTEN TO RTCS 

sdi - Serdes over/under run has occurred 

SOI - SERDES OVER/UNDER RUN HAS OCCURRED 

XDA - WORD RATE CLOCK HIGH 
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INPUT/OUTPUT CONTROL REGISTER 



EACH PROCESSOR (BUS OR DRIVE) HAS AN ADDRESSABLE LATCH 
WHICH IS USED FOR INPUT/OUTPUT CONTROLS. SOME BITS HAVE MULITPLE 
USES. EACH SIGNAL IS INDIVIDUALLY SET OR RESET IF ENABLED BY THE 
CURRENT MICROINSTRUCTION. 

BIT3 0= SIGNAL TO LOW LEVEL, 1: SIGNAL TO HIGH (CR0M23) 

BITO-2 IOC SELECT (CR0M2O-22) 



BUS PROCESSOR IOC SIGNAL DEFINITIONS 



OOOOOO 
OO00O1 
000002 
000003 

000004 
000005 
000006 
000007 



SUPF 
GORD 
LNPAG 
WRSND 
; LOFF 
RDFST 
WRFST 
LCOM 
LADO 



XDA - UTEST H SET 

XOA - GO_READ 

XDA - LOAD NEXT PAGE ADDRESS LOWER 

XDA - WRITE SECOND BUFFER 

XDA ■ LOAD ADDRESS BUFFER OFFSET 

XDA - READ FIRST BUFFER 

XDA - WRITE FIRST BUFFER 

XOA - LOAD COMMAND 

XDA - LOAO COMAND ADDRESS LOWER 



0000 to 



O00O12 
000013 
0000 14 
000015 
0000 16 
000017 



RUPF 

;SCLR 

;RCLR 

;WRBYT 

GOWR 

RBCAI 

RDNXT 

WRNXT 

LBWR 

HADD 



XDA - UTEST H CLR 

XDA - CLEAR CROM PE 

XDA - CLEAR CROM PE 

XDA - WRITE BYTE ON NEXT OPERATION 

XDA - GO WRITE 

XDA - RESET BCAI 

XOA - READ NEXT 8UFFER 

XDA - WRITE NEXT BUFFER 

XDA - WRITE LAST BUFFER AND GO_WRITE 

XDA - ADDRESS 



(defined in UDIAG.UQA) 

(defined in UDIAG.UQA) I qda compat] 



c 
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DRIVE PROCESSOR IOC SIGNAL DEFINITIONS 



CERTAIN SIGNALS MUST BE SEQUENCED IN ORDER FOR THE HARDWARE TO WORK: 



WRITING DATA 

WRITING COMMANOS 

READING DATA 

READING COMMANDS 
DEFAULT 



FIRST IPRCMD 

FIRST (PSCMD 

FIRST IPRCMD 

FIRST IPRCMD 

FIRST IPSCMD 



THEN (PSSE 

THEN CPSSE 

THEN IPSSE 

THEN (PSSE 

THEN (PSSE 



000000 
000001 

000002 

000004 
O00005 

000005 

ooooos 

000007 

000010 
00001 1 
000012 

000014 
0000 IS 
0000 IS 
OOOOI 6 
0O00I7 



SOPF 


3 


RRSCEN 


= 1 


SCMD 


- 2 


;SCLR 


: 3 


RSE 


: 4 


RRM 


: 5 


SWM 


: 5 


RECC 


: 6 


RECCT 


s 7 


ROPF 


= 10 


SRSGEN 


= 1 1 


RCMD 


= 12 


;RCLR 


: 13 


SSE 


s 1 4 


SRM 


: 15 


RWM 


= 15 


SECC 


: 1 6 


SECCT 


= 1 7 



XDA - SET DRIVE PROCESSOR FLAG (TEST AS COMPLIMENT) 

SOI - RESET RSGEN CLOCK. THIS WILL ALLOW RSGEN CLOCKS TO OCCUR 

FOLLOWING A PSRSGEN A IPRRSGEN WILL UPDATE RSGEN AND ECC REGISTERS 
SDI - SET SDI LEVEL 2 COMMAND 

SDI - SET SOI INFC I/O CLEAR (defined in DDIAG.UQA) 
SEROES - RESET SERDES EN AB L E /- RESET REG.CNT MRO.CE 
SERDES - RESET READ MODE SOICPOM 

SERDES - SET WRITE MOOE 
SERDES - RESET ECC ENABLE 
SERDES - RESET ECC TIME 

XDA - RESET D PROCESSOR FLAG (TEST AS COMPLIMENT) 

SDI - SET RSGEN CLOCK. THIS WILL FORCE RSGEN CLOCK TO BE LOW 

SDI - FOR ALL OTHER FUNCTIONS 

SDI - RESET SDI INFC I/O CLEAR (defined in DDIAG.UQA) 

SERDES - SET SERDES ENABL E /- RESET REG.CNT MRO.CE 

SERDES - SET READ MODE 

SERDES - RESET WRITE MODE 

SERDES - SET ECC ENABLE 

SERDES - SET ECC TIME 
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OOO0O4 
000004 
000005 
000006 
000007 
000010 

00001 1 

0000 12 

00001 2 

00001 3 

00001 4 

00001 5 
0000 15 

00001 6 



2901 INTERNAL REGISTER SUMMARY 



These are registers which are internal to the 2901 bit slice chip. They 

consist of 16 Dual Port RAM registers and 1 accumulator (0) register. The 16 

RAM registers are configured for a 16 bit rotate while the Q register is a 16 
bit shi ft . 



MNEMONIC DESCRIPTION 

OCTAL ADDRESS 



RLL 

CRI 

UBAR 

IUAR 

UER 

UTMP 

DER 

DTMP 
RFC 

RIB 

RCC 

OBAR 

RCV 

RT1 



UPROC DPROC 






BUS PROCESSOR TIME 


RO 


BUS PROCESSOR TEMP 


R1 


BUS PROCESSOR TEMP 


R2 


BUS PROCESSOR TEMP 


R3 


BUS PROCESSOR TEMP 


R4 


RICHV LARY'S LOCK 


R4 


*** TEMP UNTIL MAT 


R5 


BUS PROCESSOR BUFF 


R6 


BUS ADDRESS REGIST 


R7 


UPROC ERROR REGIST 


RIO 


UPROC TEMPORARY RE 


Rl 1 


DPROC ERROR REGIST 


R1 1 


DRIVE PROCESSOR TI 


R12 


DPROC TEMPORARY RE 


R12 


DM INTERPRETER PC 


R12 


DRIVE PROCESSOR TE 


R13 


DM INTERPRETER INS 


RI3 


DRIVE PROCESSOR TE 


R14 


DM INTERPRETER ARI 


R14 


DRIVE PROCESSOR TE 


RIS 


ORIVE PROCESSOR BU 


R15 


DM INTERPRETER LAS 


Rl 6 


DM INTERPRETER GEN 


Rl 6 


DRIVE PROCESSOR TE 


R17 


DRIVE PROCESSOR Te 



R/COUNTER REGISTER R/W 

ORARY REGISTER 

ORARY REGISTER 

ORARY REGISTER 

ORARY REGISTER 

AND SYSTEM STATUS 

T'S CODE CHANGED 

ER ADDRESS REG IMAGE 

ER IMAGE 

ER 

GISTER 

ER 

MER/COUNTER REGISTER 

GISTER 

MPORARY REGISTER 

TRUCTION BUFFER 

MPORARY REGISTER 

TH/LOGICAL CONDITION CODE 

MPORARY REGISTER 

FFER ADDRESS REGISTER IMAGE 

T ARITH OP CARRY 

ERAL PURPOSE TEMP 

MPORARY REGISTER 

MPORARY REGISTER 



R/W 
R/W 
R/W 
R/W 
R/W R/W 

R/W 

R/W 

R/W 

R/W 

R/W 
R/W 
R/W 
R/W 
R/W 
R/W 
R/W 
R/W 
R/W 
R/W 
R/W 
R/W 
R/W 
R/W 



2901 INTERNAL REGISTER SUMMARY - DIAGNOSTICS 



; MNEMON IC 



DESCRIPTION 



OCTAL AODRESS 



OOOOOO 
! 000003 

: ooooio 



TSTCNT : : 
HANG : = R3 
UODI : s RIO 



BUS PROCESSOR TIMER/COUNTER REGISTER 
8US PROCESSOR TEMPORARY REGISTER 
BUS DATA REGISTER REGISTER IMAGE 



R/W 
R/W 
R/W 
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2901 EXTERNAL HAROWARE REGISTER SUMMARY 



; MNEMONIC 



DESCRIPTION 



OCTAL ADDRESS 



OOOOOO 
000002 
0OO002 
OOO003 
00O004 

OOO014 
000004 
00000 t 
OO0004 
OOO005 
0000 15 
OOOOOS 
0000 15 
000005 
OOOOOS 
OOOOOS 
OOO007 
OOO0O7 

OOOOIO 



100000 
040000 
O2O0OO 
010000 
004000 
0O2000 
0O100O 
0OO4OO 
0OO20O 
000 100 
OOO04O 
000020 
000010 
OOO004 
OOOO02 
OOOOOI 



NOPREG 

RTDS 

PAR 

BUF 

CR 

UCRS 
UCRD 
OCRS 

DCRO 
RTCS 
BCAIS 
BCAID 

uos 
uoo 

BREG 
SO 

ecc 

BAR 

FLOAT 



4 

5 

15 

5 

15 

5 

6 

6 

7 

7 



(NON 

NO OP 

PIPEL 

RAM 

DPROC 

UPROC 

UPROC 

UPROC 

DPROC 

DPROC 

DPROC 

UPROC 

UPROC 

UPROC 

UPROC 

UPROC 

DPROC 

OPROC 

UPROC 

DPROC 

NO BU 



EXIS 
ERAT 

INE 
ATA 

C 

c 



#1 = On XDA41 PC BOARO . 
#2: On XDA*2 PC BOARO. 

TANT I 

ION REGISTER (NON EXISTANT) 

ADORESS REGISTER 

BUFFER 

ONTROL REGISTER SOURCE 

ONTROL REGISTER DESTINATION 

ONTROL REGISTER SOURCE 

ONTROL REGISTER DESTINATION 

ONTROL REGISTER SOURCE 

ONTROL REGISTER DESTINATION 

EAL TIME CONTROLLER STATE 

CAI REGISTER SOURCE 

CAI REGISTER DESTINATION 

US DATA REGISTER SOURCE [ qda compat ] 

US DATA REGISTER DESTINATION I qda compat] 

I REGISTER 

ERDES 16 DATA REGISTER 

S GENERATOR REGISTER (RESIDUE) 

UFFER ADORESS REGISTER 

UFFER ADDRESS REGISTER 

URCE REGISTER a BUS FLOAT 



UPROC 


DPROC 


WRITE 


WRITE 


(RO) 


READ 


WRITE*! 


WRITE #1 


R/W #2 


R/W #2 


• 


R/W #2 


WRITEUM 




READ#1 


(RO) 


WRITEUM 






READ*2 




WRITE#2 


- 


WRT*2 


READ #1 


!RD) 


WRITE** 


(RO) 


READ #1 


(RO) 


WRITEUM 


(RO) 


WRITE #1 


(RD) 


R/W #2 


(RD) 


READ#2 


WRITE#2 


- 


- 


WRT #2 


READ 


READ 



b 



IH DEFINITIONS 



BIT15 
BIT14 
BIT13 
BIT12 
BIT1 1 
BITIO 
BIT09 
BITOS 
BIT07 
BIT06 
BIT05 
BIT04 
BIT03 
BIT02 
BIT01 
BITOO 
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40000 

20000 

10000 

4000 

2000 

1000 

400 

20O 

100 

40 

20 



A" 
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2901 INTERNAL REGISTER DEFINITIONS 



MNEMONIC ADDRESS 



RLL 
BLOCK 



DESCRIPTION 



RICHY LARY LOCK 8 STATUS REGISTER 



OOIOOO 

004000 
O1O00O 
O2O000 
040000 
1O000O 



INDIAG 

CN. ERR 
DXFC 

DMBEG 
DMODE 
PLOCK 

UER 

DER 



BITOO 
BIT01 
BIT02 
BIT03 
BIT04 
BITOS 
BIT06 
BIT07 

BITOS 

BITOS 
BITIO 
BIT1 1 
BIT12 
BIT13 
BIT14 
BIT IS 

R7 
Rl 1 



R/W 



BUFFER LOCK FLAG. O ■ 

BUFFER STACK POINTER 

BUFFER STACK POINTER 

BUFFER STACK POINTER 

BUFFER STACK POINTER 

BUFFER STACK POINTER 

BUFFER STACK POINTER 

BUFFER STACK POINTER 



LOCKED, 1 



BUFFER STACK POINTER 

O : FUNCTIONAL CODE, 

NOT USED 

■- NO ACTION, 

O : NO ACTION, 

: NO ACTION, 

O * NORMAL MOOE, 1 

PROCESSOR LOCK FLAG 



1 - XDA DIAGNOSTIC CODE RUNNING 

D.PROC FATAL CONTROLLER ERROR (CODE 
U.PROC XFC SERVICE REOUIRED 
START DM INTERPRETER (START ADDRESS 
= DIAGNOSTIC MACHINE MODE 
= LOCKED, 1 : FREE 



IN Rl 1 ) 
IN RPC) 



UPROC ERROR REGISTER 
DPROC ERROR REGISTER 



R/W 



R/W 

THE ERROR OISPLAY IS BIT ENCODED TO CORRESPOND TO THE ERROR MESSAGE 
*»* SEE BUS I/O REGISTER DEFINITIONS **» 



c 
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2901 EXTERNAL REGISTER DEFINITIONS 



MNEMONIC ADDRESS 
NOPREG : = 00 



BITOO 
BIT01 
BIT02 
BIT03 



BIT04 


BIT05 


BITOS 


BIT07 


BIT08 


BIT09 


BIT 10 


8IT1 1 



BIT12 
BIT13 
BIT14 
BIT IS 



DESCRIPTION UPROC OPROC 

; NO OPERATION REGISTER (NON EXISTANT) R/W R/W 
; + NON EXISTANT 



K0B5O. MICROCODE .22-APR-I988 11 : 27 : 16.96 



^^^ 



KDBDP 
HARDWARE/! 



DIGITAL EQUIPMENT CORP., 2901 ASSEMBLER VERSION 32 
OFTWARE DEFINITIONS AND EQUATES 



PAGE 021 



MNEMONIC ADDRESS 



UCRS 
UCRD 



0O20Q0 
00400O 



USK 
OPM 



OFAIL 
ORINIT 



< 

a 

2 
a. 
O 

LL. 

o 

(0 



: = 14 

: = 04 



DESCRIPTION 



UPROC CONTROL REGISTER SOURCE 
UPRDC CONTROL REGISTER DESTINATION 



READ 
WRITE 



THIS REGISTER IS READ/WRITE. IT IS OIFFERENT FROM X0A#2 CR REGISTER 
THAT THE LED - S ARE ALWAYS ON. DIAGNOSTIC MODE HAS NO EFFECT ON ANV 
XDA#1 HARDWARE. 



' BITOO 

■ BIT01 
= BIT02 
« BIT03 

= BIT04 

: BITOS 

: BITOS 

= BIT07 

= BIT08 

= BIT09 

■ BIT10 
J BIT1 1 

BITI2 
BITI3 
BIT14 
BIT1S 



LSB WORD COUNT BIT 



MSB WORD COUNT BIT 

RESERVED 

RESERVED 

O i ENABLE DPROC FAIL TEST, 1 = ENABLE UPROC FAIL TEST 

DIAGNOSTIC MODE L «THIS BIT DOES NOTHING TO THE HARDWARE XDA* 1 « 

t • wax kludge interrupt in progress [ uda compat ] 
NOT USED 

= ENABLE DPROC SEQUENCER, 1= FORCE OPROC TO FAIL TEST 

1 = DRIVE INIT IN PROGRESS (USED FOR SOFTWARE tNIT) 

O = TURN LEO ON, 1 = TURN LED OFF 



LED 


1 


L 


LED 


2 


L 


LEO 


4 


L 


LED 


3 


L 
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HARDWARE/SOFTWARE DEFINITIONS AND EQUATES 

; MNEMONIC 



DCRS 
DCRO 



DESCRIPTION 



DPROC CONTROL REGISTER SOURCE 
DPROC CONTROL REGISTER DESTINATION 



READ 

WRITE 



BITOO 
BIT01 
BIT02 
BIT03 



NOTE - 1 . IN DIAGNOSTIC MODE THE D PROCESSOR SHOULD MOVE CRI 

TO CR AND WAIT FOR THE LEAST S I GN I F I CANT t Some ) BIT TO COME 

ON BEFORE PROCEEDING. THIS WAV THE U PROCESSOR CAN ENABLE 

OR DISABLE RAM PARITY ERROR AND FLASH THE LIGHTS FOR 

BOTH BOARDS. LEAST SIGNIFICANT BIT = MEANS WAIT, = t 

MEANS CONTINUE. 

2. IN DIAGNOSTIC MODE THERE IS A I BIT DELAY FROM DIAG DATA TO 

NRZ DATA IN AND A 21 BIT DELAY FROM LOADING RTCS TO VALID RTDS. 

1 = SELECT DRIVE PORT 1 

1 < SELECT DRIVE PORT 2 

1 s SELECT DRIVE PORT 3 

1 . SeLECT DRIVE PORT 4 



000020 
000040 
000100 
OO0200 

000400 

002000 
004000 

10000 
020000 
040000 
1O0OOO 

170000 



POCLK : i BIT04 

SERIAL :■ BIT05 

RAMPE :: BIT06 

OPM := 8IT07 



OODP 


: 8IT0S 




: : BIT09 


DDC 


: = BIT10 


DDD 


: = BIT1 1 


LED1 


: -- BIT12 


LE02 


: = BIT13 


LED4 


: = 8IT14 


LE08 


: = BIT15 



LED 
LED 
LED 
LED 



LE0Si-LED4fLED2<-LED1 



USE DIAGNOSTIC CLOCKsO.USE FAST CLOCKtl 

SERIAL PORT 

O = INHIBIT RAM PARITY ERROR. 1 = ENABLE RAM PARITY ERROR 



DIAGNOSTIC MODE L 

ODD PARITY H BIT07= 
UNUSED HARDWARE SIT 
DIAGNOSTIC DRIVE CLOCK 
DIAGNOSTIC DRIVE DATA 



0: ENABLE OUTPUT BITS OS 

1: DISABLE OUTPUT BITS OS 

8 O: EVEN RAM PARITY, 1: 



ODD PARITY 



1 L, O : TURN LED ON, 1 -- TURN LED OFF 
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SDI INTERCONNECT SIGNALS 



CONTROLLER 



WRITE/COMMAND DATA (WCD) 

-REAL TIME CONTROLLER STATE FRAME (RTCSI 

READ/RESPONSE DATA ( RRD ) 

-REAL TIME DRIVE STATE FRAME (RTDS1 



BIT IS ! O 1 

\ P I O < O 



; RTDS 
; BIT 15 



2 3 ! 4 

-PREAMBLE- - 

O ! O ! O 



5 6 7 ! 8 9 10 11112 13 14 1510 
SYNC STATUS ♦ 

O ! O I. O ! 1 !ROY!WRT!RO I I N I ! RES I RES ! PT Y ! O 



Q 
< 

D 

a 

ii 

s 

cc 
o 

LL. 

C/5 
O 
(0 



2 3 14 
-PREAMSLE- 

O ! O ! O 



REAL TIME ORIVE STATE FRAME 
5 6 7 ! 3 9 10 

O ! ! 



! 3 9 10 11112 13 14 15! 
SYNC STATUS--. + 

» 1 ! RDY > ATN ! R/W! SEC ! IDX ! AVL ! PTY ! 



1. EVEN PARITY OVER COMPLETE FRAME 

2. DATA SENT LEAST SIGNIFICANT BIT FIRST 

3. IN DIAGNOSTIC MODE IT TAKES 21 CLOCKS FROM LOADING RTCS UNTIL RTDS IS VALID 

4. N/T= DESERIALIZER RECEIVES NON TRI-STATED AND TRI-STATEO. 



V 
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000001 
000002 
0OO004 
000010 

000020 
O0004O 
000040 
000100 
OOO 1 oo 
0O02OO 



MNEMONIC ADDRESS 



: : OS 



DESCRIPTION 

; REAL TIME CONTROLLER STATE 



DPROC 
WRITE 



1.00 NOT CHANGE READ AND WRITE GATE IN THE SAME INSTRUCTION SINCE IT 

WOULD BE POSSIBLE FOR BOTH TO BE SENT ACTIVE. 
2. EACH TIME THIS REGISTER IS LOAOED, ONE FRAME WILL BE SENT REGARDLESS 

OF THE STATE OF THE 'CONT H' BIT. 
3. BEFORE CHANGING PORTS, TURN OFF THE 'CONT H' BIT ANO WAIT FOR 'RTCS 

READY' OF THE ' RTOS ' REGISTER TO INDICATE THE TRANSMISSION HAS COMPLETED. 



CONT 
WRT 



CRDY 



INI 

rtcSOS 

RTCS13 

rtcSOS 

RTCS14 

FPE 



BITOO 
8IT01 
BIT02 
BIT03 

BIT04 
bitOS 
BITOS 

bi tot 
BI T06 
BIT07 

BIT08 
BIT09 
BIT 10 
BIT1 1 

BIT12 
BIT13 
BIT14 
BIT1S 



; t emp 
; temp 



♦CONT H 0: SEND ZERO'S , It SEND FRAME 

♦WRT GATE H 0= NO WRITE GATE , 1 : ENABLE WRITTING OF DATA 

♦RD GATE H 0: NO READ DATA, 1s SEND READ DATA 

♦CON RCVR ROY H 0= NOT READY, 1= READY TO RECEIVE COMMAND/DATA 



0= NO INIT. 
0» DEFAULT 



1 : 



INITIALIZE (RESET) DRIVE 



♦INIT H 

♦unused 1 

♦UNUSED 1 

♦unused 

♦UNUSED O 0: DEFAULT 

♦FORCE PARITY ERROR H O* SEND (CORRECT) EVEN PARITY, 1= SEND ODD PARITY 

♦RESERVED 



♦RESERVED 
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OOOOOI 
0OO002 



OO002O 
000040 
0001 OO 
OOO 100 



MNEMONIC ADDRESS 



ORDY 
ATTN 



SEC 
IDX 

rtds06 
AVAI L 



DESCRIPTION 

; REAL TIME DRIVE STATE (NON EXISTANT) 



OPROC 
READ 



WHEN FIRST SELECTING A PORT, THE FIRST ' RTDS ' FRAME MUST BE 1 SREGAROED . 



TO DO THIS, 

GO ACTIVE 

= BITOO 

= BIT01 

= BIT02 

= BIT03 



SEND ONLY ONE 'RTCS' FRAME THEN WAIT FOR 'FRAME SENT' TO 



BIT04 
BITOS 
O'tOB 
BITOS 
BIT07 

BITOS 
BITOS 
BI T 10 
8 IT 1 1 

: « 8ITI 2 

: « BITI3 

; = BIT 14 

: ■ BIT1S 



♦0 RCVR ROY H 
♦ATTN H 
♦RESERVED 



♦SECTOR 
♦INDEX H 



♦AVAILABLE 
♦RESERVED 



DO NOT SEND, 
NO ERROR, 



NO SECTOR 
NO INDEX 



1= RECEIVER READY FOR COMMAND 



1= SECTOR PULSE (USE l-O EDGE) 
I: INDEX PULSE (USE l-O EDGE) 



NOT AVAILABLE 1: OEVICE AVAILABLE FOR USE 



♦R/W ROY H 



0= NOT R/W READY, 



READ/WRITE READY 
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;MNEMONIC ADDRESS 



DESCRIPTION 



PROGRAM ADDRESS REGISTER 



WRITE WRITE 



A WRITE TO THIS REGISTER WILL CAUSE A JUMP TO AN ADDRESS 
BETWEEN FOOH AND FFF HEXIDECIMAL. THE INSTRUCTION JUMPED TO MUST 
CONTAIN A JUMP INSTRUCTION TO PREVENT A FALL SACK TO THE 
INSTRUCTION AFTER THE PAR UPDATE. 

♦ NOT IMPLEMENTED 



o 



13 
12 



1 1 +MEMORY ADDRESS 



07 
06 
05 
04 



03 
02 



1 1 


ALWAYS 


ONE 


io 


ALWAYS 


ONE 


09 


ALWAYS 


ONE 


08 


ALWAYS 


ONE 


07 


1 128) 




06 


( 64) 




05 


I 32) 




04 


( 16) 




03 


( a) 




02 


( 4) 




01 


( 2) 




00 


1 1 ) 
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;MNEMONIC ADORESS 
; BUF : : 03 



DESCRIPTION 

; RAM DATA BUFFER 



DATA TO OR FROM INTERNAL REGISTERS MUST BE MOVED WITH 
OPERATION . 



UPROC DPROC 
R/W R/W 
LOGICAL 



Q 
< 

3 

a 
ii 
s 

cc 
O 

u. 

<fl 

O 



15 +BUFFER 


DATA 15 


32768) 


14 ♦ 


14 


16334) 


13 + 


13 


8196) 


12 + 


12 


4096) 


11 + 


1 1 


2048) 


10 + 


10 


1024 ) 


09 + 


09 


S12) 


08 ♦ 


08 


256) 


07 + 


07 


128) 


06 + 


06 


841 


05 + 


05 


32) 


04 + 


04 


16) 


03 * 


03 


8) 


02 + 


02 


4) 


01 ♦ 


01 


2) 


00 + 


00 


1) 
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; UOS 
; UDD 



15 
05 



BUS ADDR/DATA RESISTER SOURCE 

BUS ADDR/OATA REGISTER DESTINATION 



UPROC DPROC 
REAO (RD) 
WRITE (RD) 



^fe^ 



SEE I/O REGISTER FOR FORMAT DURING I N I T I AL I 2AT I ON 

DMA TRANSFERS - DMA REQUEST IPS DMA MUST BE MADE AT LEAST 

ONE INSTRUCTION BEFORE READING OR WRITING FROM THE BUS DATA REG. 

ONCE BUS MASTER HAS BEEN GRANTED, DMA REQUEST MAY BE DROPPED IPRDMA . 



THE FOLLOWING BIT DEFINITIONS APPLY TO THIS REGISTER BEING USED AS 
BUS ADDRESS REGISTER. 

LO BUS ADDRESS BITS 0-1S 



1 5 


♦ BUS ADDRESS 15 


32768 1 


1 4 


+ ' 


1 4 


1 6384 ) 


1 3 


+ ' 


1 3 


8 196] 


1 2 


♦ 


12 

1 1 


4099) 


1 1 


+ • 


2048 ) 


10 


+ 


10 


1024) 


09 


+ ' 


09 


512) 


08 


+ 


OS 
07 


256) 


07 


+ * 


128) 


06 


+ 


06 


64) 


05 


+ 


05 


32] 


04 


♦ ' 


04 


16] 


03 


+ 


03 


8) 


02 


+ 


02 


41 


1 


+ 


01 


2) 


oo 


+ * 


00 


1 ) 
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THE FOLLOWING BIT DEFINITIONS APPLY TO THIS REGISTER BEING USED AS A 
DATA REGISTER. 



a 
< 

D 

a 

ii 

2 
ec 
O 

LL 
« 

o 
ft 



07 
06 



TA 15 


327681 


14 


1 6384) 


1 3 


8 196) 


1 2 


4096 ) 


1 1 


2048 ) 


1 


1024) 


09 


512] 


08 


2561 


07 


128) 


OS 


64) 


05 


32) 


04 


16! 


03 


3] 


02 


4) 


01 


21 


OO 


1 1 
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06 



SI RESISTER FOR BI CONTROL 



UPROC 
WRITE 



0000 10 

000020 
000040 

000100 
000200 



BITOO 
BIT01 
BIT02 
BIT03 



B . LEO 


■ BIT04 


S . 000 


* 8IT0S 


J. LOOP 


i BIT06 


B.NRTY 


: BIT07 




i BITOS 




= BIT09 




: BIT10 




: BIT1 1 



BIT12 

BIT 1 3 
BIT I 4 
BITIS 



ABORT BI COMMAND 

NOT USED 

NOT USED 

NOOE NOT BADsO, NODE BAD 



NOT AS0RT=1 



YELLOW LEO OFFsO, YELLOW LED ONil 

BYTE BOUNDARIES IN SCAI; EVENtO, ODDal 

SI BUS REQUEST; NORMAL MODE'O, LOOPBACK MODS' 

RETRY COMMAND; RETRYsO, NO RETRYsl 

NOT USED 

NOT USED 

NOT USED 

NOT USEO 

NOT USEO 

NOT USED 

NOT USED 

NOT USEO 



o 
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a 
< 

o 

II 

cc 
O 



MNEMONIC 


ADDRESS DESCRIPTION 




SO : s 


OS 


; SeRDES 18 DATA RE 










(LBN(LBN!LBN!LBN!LBN!LBN! 




- + - 





+ ■■ 





SW1 


: SOFTWARE WORD 1 




SW2 


: SOFTWARE WORD 2 




EOC 


■- ERROR OETECTION CODE 




ECC 


= ERROR CORRECTION CODE 




SYN 


: 232749, 2SBCH, 9916 






15 


♦SBROES DATA 15 


32768) 




1 4 


♦ ' 14 


16364) 




1 3 


♦ '13 


3196) 




1 2 


♦ ' ' 12 


4096) 




1 1 


* ' ' 11 


2048) 




to 


+ ' ' 1Q 


1024 ) 




09 


♦ '09 


512) 




OS 


* ' '08 


256) 




07 


♦ '07 


128 ) 




06 


+ '06 


64) 




OS 


♦ ■ ■■ ' 05 


32) 




04 


♦ '04 


16) 




03 


♦ '03 


a) 




02 


♦ '02 


4) 




01 


♦ ' ' 01 


2) 




00 


♦ ..'.. ' 00 


1 1 







UPROC 


DPROC 


REGISTER 




- 


R/W 


+ 


- -ss 


+ . 


-SS- - -+ 


ISYN ! 


DATA 


IEDC ! 


ECC ! 


---+...-- 


- - SS- - - - - - 


------+- 


-SS + 



o 



v.- 
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c 



MNEMONIC 


ADDRESS 


ECC : ■ 


07 




, 


BIT15 




= 


BIT14 




a 


BIT 1 3 




• 


BIT 1 2 


: 3 


BIT 1 1 




z 


BIT 10 




: 


BIT09 




5 


BIT08 




BITOT 






BIT06 






BITOS 






BIT04 


; s 


BITOS 




s 


BIT02 




I 


BITOI 




= 


BI TOO 



DESCRIPTION 

; RS GENERATOR REGISTER (RESIDUE! 



DPROC 
READ 



0= ECC ERROR, 1= NO ECC ERROR 

♦ECC FEEDBACK ENABLE 

-WRITE ECCiNOT (ECC ENABLE ANO ECC INPUT ENABLE) 

-DATA OUT 



+SERDES 


ENABLE 






, +DTEST 








+ RS GENERATOR 


09 


S12) 


+ 




OS 


25S) 


+ ' 




07 


123) 


+ ' 


' 


06 


64) 


+ 




05 


32) 


+ 


' 


04 


16) 


+ ' 




03 


8) 


+ ' 




02 


4) 


+ ' 


' 


01 


2) 


♦ ' 


' 


00 


1) 
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.MNEMONIC ADDRESS 



; BAR 
i BAR 



Q 
< 

a 

ii 

5 

a 
O 



= 07 
= 07 



DESCRIPTION 



BUFFER ADDRESS REGISTER 
BUFFER ADORESS REGISTER 



(BUS PROC) 
IORIVE PROC) 



UPROC 
WRITE 



THE LOWER 4 BITS ARE INCREMENTED EVERV TIME THE DATA BUFFER IS WRITTEN 
INTO. THEV ARE NOT INCREMENTED WHEN THE DATA BUFFER IS REAO . 



IS 
1 4 
13 
12 



07 

06 



04 
03 



NOT IMPLEMENTED 



BUFFER ADORESS 



13 


8192) 


12 


4096 1 


1 1 


2048 ) 


10 


1024 I 


09 


512) 


08 


256 I 


07 


128) 


06 


641 


05 


321 


04 


161 


03 


8) 


02 


4) 


01 


21 


00 


1 ) 



o 
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BUS I/O REGISTERS 



REFERENCE "BUS DISK AOAPTER FUNCTIONAL SPECIFICATION" SECTION 4.3.4.3 
TO SUMMARIZE THE BUS I/O REGISTER ADDRESSES AND INTERRUPTS: 



IXOAIP 
;xOAIP 
;xOAIP 

; XDASA 
;xDASA 
; XDASA 
; xDASA 



7XXXX0R. INITs 
OR. RUN : 
OW.R/I = 

7XXXX2W. INIT. 

7XXXX2R. INITi 

7XXXX2R.RUN < 



UNDEFINEO 

POLL I/O BUFFER 

CONTROLLER INIT 

INITIALIZATION STATUS 

INITIALIZATION STATUS 

RESERVED 



MESSAGE RECEIVED 
ADAPTOR READY 
REQUEST VAX PURGE 



= 7XXXX2W.RUN : VAX PURGE COMPLETE (HOST RESPONSE) 

1. ANVTIME A XDA BUS I/O PAGE ADDRESS IS SELECTED, A SLAVE SVNC 
(SSVNC L) IS RETURNED. 

2. THE XDA HAS TWO (2) MOOES OF OPERATION: 

1. INITIALIZATION MODE - THE XDA IS RUNNING DIAGNOSTICS ANO 
GETTING INFORMATION TO BE USED IN RUN MODE. 

2. RUN MODE - THE XDA WILL ACCEPT AND EXECUTE DCP PACKETS. 

3. INFORMATION SENT OR RECEIVED FROM THE XOA I/O PAGE IS VALID ONLY 
WHEN IN THE SPECIFIED MOOE . 

BUS HARDWARE USAGE 

+ „.........-......-.-_----------.---.- + 

ONi 1112 3 4 5 6 7 S 9 10! 
+ A2 -A2 ! BUS ADDRESS SWITCH > 

OFF: O ! 4 8 16 32 64 128 256 S12 IK 2K ! 

W5 W4 + - + 
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XDASA INITIALIZATION REGISTER BIT DEFINITIONS 



XDA WRITE FORMAT 



;xDASA 1W.INIT STEP 1-3 WRITE FORMAT 



a 

< 

D 

a 

ii 

5 

cc 
O 



004000 
O 10000 
O2O0O0 
040000 

1 ooooo 

000200 
000200 
1 OOOOO 

040000 



STEP1 
STEP2 
STEP3 
STEP4 
ERR 

INTI 

IE 

OWN 

FLAG 



BITOO 


BIT01 


BIT02 


BIT03 


BIT04 


BIT05 


BIT06 


BIT07 


BIT1 1 


BIT12 ' 


BIT13 


BIT14 


BIT15 


BITOT 


BIT07 


B I T 1 5 


BIT14 



♦ERROR CODE BIT 

♦ERROR CODE BIT 1 

♦ERROR CODE BIT 2 

♦ERROR CODE BIT 3 

♦ERROR CODE BIT 4 

♦ERROR CODE BIT S 

♦ERROR CODE SIT 6 

♦ERROR CODE BIT 7 

INIT STEP 1 INDICATOR 
INIT STEP 2 INDICATOR 
INIT STEP 3 INDICATOR 
INIT STEP 4 INDICATOR 
♦INITIALIZATION ERROR FLAG 

INIT INTERRUPT ENABLE BIT (ECHOED TO HOST) 
INIT INTERRUPT ENABLE BIT (ECHOED TO HOST) 
: HOST OWNS RING ENTRY, 1 : XDA OWNS ENTRY 
= NO INTERRUPTS, 1 = INTERRUPT IF APPROPRIATE 



o 

V) 

-I 
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XDA READ FORMATS 



XXXX 1R.INIT STEP I READ FORMAT 

BITS 15 - O ; +L0 ORDER 16 BITS OF CSR 8ASE AOORESS 



* 


STEP 


2 FORMAT 






XXX 


1/3R 


INIT STEP 2 


READ 


FORMAT 


* 


STEP 


3 FORMAT 







1R.INIT STEP 3 READ FORMAT 



BITS IS - 1 
GO : : BITOO 



0002S5 
000SS2 



INSTR 
CYCLE 



<18S. *1 10 . >/100. 
<INSTR*2> 



; RESERVED 

; »C0 BIT (SET 6V HOST TO PUT XDA ONLINE) 



,-NSEC U- INSTRUCTION CYCLE TIME ♦ DEVIATION 
;NSEC U- INSTRUCTION CYCLE TIME NOMINAL (PROCS) 
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LEO COOE DEFINITION 



LED LEO LED LED 



ERROR COOES 



RREG 


: : R17 


* * * 


LED4 ON 


; xOAOK 


: LE04 


* * ■ 


LED1 ON 


: DBUSV 


: LED1 


* x * 


LED2 ON 


: UBUSY 


: LED2 



NO ERROR (OR STUCK IN DIAGNOSTIC IF ALWAYS OFF) 

NOT USED 

INITIALIZATION STEP 2 

INITIALIZATION STEP 3 

INITIALIZATION STEP 4 

1 SECOND BLINK FOR BUSY- NO BLINK FOR HANG 

NOT USED 

NOT USED 



INITIALIZATION (ERRORI/STEP I DIAGNOSTIC WRAP 

1 ERROR: DIAGNOSTIC ERROR XDA 1)1 

ERROR: DIAGNOSTIC ERROR XDA #2 

1 ERROR: NOT USED 

ERROR: ERROR VECTOR : ROM PARITY ERROR 

1 ERROR: ERROR VECTOR : RAM PARITY ERROR 

ERROR: ERROR VECTOR : ROM/RAM PARITY ERROR 

1 ERROR: SEQUENCER ERROR 



INDICATES THE XOA IS OPERATIONAL »•« 

; BIC CODE FOR xOA OK LED DISPLAY 
INDICATES THAT THE O.PROC IS BUSY, OFF MEANS IT IS IDLE •*« 

; CODE FOR D.PROC BUSY LEO DISPLAY 
INDICATES THAT THE U.PROC IS BUSY, OFF MEANS IT IS IOLE «»» 

; COOE FOR U.PROC SUSY LEO DISPLAY 



c 
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XOA ERROR CODES 



THE ERROR DISPLAY IS SIT ENCODED TO CORRESPOND TO THE ERROR MESSAGE 

BIT 15 O : ERROR, 1 : NO ERROR 

BIT 14 ERROR STATUS 7 BIT 

BIT 13 ERROR STATUS S BIT 

BIT 12 ERROR STATUS S BIT 



o 



SELF TEST ERROR COOES 



104000 
0OOO4O 
000 100 
000 140 
000200 
00O240 
000300 
000340 
000340 



ERROO 


= <ERR+STEP1> 


; ERROR 


IN 


ERR01 


= 1 


*32. 


; ERROR 


IN 


ERR02 


= 2 


*32. 


; ERROR 


IN 


ERR03 


: 3 


• 32. 


; ERROR 


i n 


ERR04 


i 4 


*32 . 


; ERROR 


i n 


ERR05 


> 5 


• 32. 


;ERROR 


i n 


ERR06 


: 6 


«32. 


; ERROR 


in 


ERR07 


■ 7 


•32. 


:ERROR 


i n 


ERR07 


= 7 


*32 . 


; ERROR 


i n 



STACK TEST 

ALU OPERATIONAL TEST/CONTROL PROM PE/ALS*LOG PROM/CR TEST 

RAM PE/RAM BUFFER TEST 

SDI/SERDES/ECC TEST 

STEP 1 INIT ERROR 

NPR R/W TEST 

STEP 2,3, OR 4 INIT ERROR 

O BUS MEMORV TEST (MANUFACTURING ONLY) 

BI TEST ERRORS 
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HI WORD BIT OEFINTIONS FOR BDA 



lOOOOO 
040000 
O2OO0O 
010000 

O04OOO 
O02OOO 
00 1000 
OOO4O0 

000200 
OOOIOO 
0OO040 
000020 

OOOOIO 
000004 
000002 

00000 1 



Q 
< 

D 

a 

ii 

s 

a. 
O 

LL 

V) 

o 



BIT31 


: BIT15 


BIT 


IS OF HI WORD 


BIT30 


: ■ BIT 1 4 


BIT 


1 4 


" 


BIT29 


: BIT13 


BIT 


1 3 


" 


BIT28 


: ■ BIT 1 2 


BIT 


1 2 


" 


BIT27 


: = BIT1 1 


BIT 


1 1 


,, 


BIT29 


:i BIT10 


BIT 


10 


•' 


BIT2S 


:» BIT09 


BIT 


09 


" 


BIT24 


: = BITOS 


BIT 


08 


" 


SIT23 


: = BIT07 


BIT 


07 


,. 


BIT22 


:= BIT06 


BIT 


08 


" 


BIT21 


:: BIT05 


BIT 


05 


" 


BIT20 


: = BIT04 


BIT 


04 


" 


BIT 19 


:: BIT03 


BIT 


03 


,, 


BIT 18 


: > BIT02 


BIT 


02 


•• 


BIT17 


:< BIT01 


BIT 


01 


" 


BIT16 


: i BITOO 


BIT 


00 


" 



f 
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BOA COMMAND CODES EQUATES 



J 



00000 1 
00000 1 
000002 
000003 
000004 
000004 
000005 
000006 
000007 
0000 10 
0000 1 1 



000014 
0000 IS 
0OOO16 



BIRDCM 


= 1 


READ 


•- 1 


IRCI 


■- 2 


RCI 


t 3 


BIWRCM 


s 4 


WRITE 


= 4 


WCI 


i S 


UWMCI 


: 6 


WMCI 


! 7 


INTR 


= AHOS 


IDENT 


= AH09 


;STOPC 


= AHOA 


; BISTCM 


= AHOB 


INVAL 


= "HOC 


BDCST 


= AHOO 


IPINTR 


= AHOE 
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BIIC GENERAL REGISTER OFFSET EOUATES 



OOOOOO 
000004 
000010 
000014 
000020 



BIDTYP 


= AHOOO 


BICSR 


= AH004 


BIBER 


s AHOOS 


BIECSR 


= AHOOC 


SI IDES 


= AHOIO 



OFFSET TO OEVICE REGISTER 

OFFSET TO CONTROL AND STATUS REGISTER 

OFFSET TO BUS ERROR REGISTER 

OFFSET TO ERROR INTERRUPT CONTROL REGISTER 

OFFSET TO INTERRUPT DESTINATION REGISTER 



BIIC SPECIFIC DEVICE REGISTER OFFSET EOUATES 



Q 
< 

D 

o 

II 

s 

rx 
O 

LL 

to 
o 



000024 
000030 
000034 
000040 
000044 
OOOOSO 
000054 
000060 
00O10O 
000360 
000364 
000370 
000374 



000362 
000364 



SI IMSK 


= AH014 


;OFFSET 


TO 


BIPSDE 


= AH01S 


;OFFSET 


TO 


BIPSRC 


= *H01C 


^OFFSET 


TO 


BISAOR 


= AH020 


; OFFSET 


TO 


BIEADR 


= AH024 


; OFFSET 


TO 


BCICSR 


= *H02S 


I OFFSET 


TO 


BIWSTA 


= *H02C 


; OFFSET 


TO 


BIPSFC 


= *H030 


; OFFSET 


TO 


BIUCSR 


1 AH040 


; OFFSET 


TO 


BIGPRO 


! AHOFO 


; OFFSET 


TO 


SIGPR1 


-. AH0F4 


; OFFSET 


TO 


BIGPR2 


s AH0F6 


;OFFSET 


TO 


BIGPR3 


-. AHOFC 


;OFFSET 


TO 



I PREG 
SAREG 



IPINTR MASK REGISTER 

FORCE IPINTR/STOP DESTINATION REGISTER 

IPINTR SOURCE REGISTER 

STARTING ADDRESS REGISTER 

ENDING ADDRESS REGISTER 

BCI CONTROL REGISTER 

WRITE STATUS REGISTER 

FORCE IPINTR/STOP COMMAND REGISTER 

USER INTERFACE INTERRUPT CONTROL REGISTER 

GENERAL PURPOSE REGISTER O 

GENERAL PURPOSE REGISTER 1 

GENERAL PURPOSE REGISTER 2 

GENERAL PURPOSE REGISTER 3 



BIIC UOSSP REGISTER OFFSET EOUATES 



: AHOF2 
: r AH0F4 



;OFFSET TO IP REGISTER (ODD WORD BOUNDRV OP GPR O) 
•OFFSET TO SA REGISTER (EVEN WORD BOUNDRV OF GPR I) 
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* BIOTYP ; AHOOO ;BIIC DEVICE REGISTER 
OTYP := AH10E ;DEVICE TYPE 



« BICSR 



;AH004 ;BIIC CONTROL AND STATUS REGISTER EQUATES 



lOOOOO 
040000 
1 0000 
004000 
002000 

0000 1 7 



HES 

SES 

BROKE 

STS 

SST 



BIT 1 5 
BIT14 
BIT12 
BIT I 1 
BIT10 

17 



;HARO ERROR SUMMARY 
;SOFT ERROR SUMMARY 
; BROKE BIT 

;SELF-TEST STATUS BIT 
;START SELF-TEST BIT 

;NOOE ID MASK 



;BUS ERROR REGISTER 



040000 
020000 
OtOOOO 

004000 
002000 
001000 
000400 
000200 
OOOIOO 
000040 
000020 
OOO01O 
OO0OO4 
000002 
OO0001 



NMR 

MTCE 

CTE 

MPE 
ISE 
TOF 
IVE 
CPE 
SPE 
ROS 
RTO 
STO 
BTO 
NEX 
ICE 



BIT30 
BIT29 
BIT2S 
BIT27 
BIT2S 
BIT25 
BIT24 
BIT23 
BIT22 
BIT21 
BIT20 
BIT19 
BIT1S 
BIT 17 
BIT16 



NO ACK TO MULTI -RESPONOER CMO RECV 

MASTER TRANSMIT CHECK ERROR 

CONTROL TRANSMIT ERROR 

MASTER PARITY ERROR 

INTERLOCK SEOUENCE ERROR 

TRANSMITTER DURING FAULT 

IDENT VECTOR ERROR 

COMMAND PARITY ERROR 

SLAVE PARITY ERROR 

READ DATA SUBSTITUTE 

RETRY TIMEOUT 

STALL TIMEOUT 

BUS TIMEOUT 

NON-EXISTENT ADORESS 

ILLEGAL CONFIRMATION ERROR 



BISADR 
BIEADR 



i AH020 
; A.H024 



;STARTING ADDRESS REGISTER 
.ENDING ADDRESS REGISTER 



020000 
10000 
004000 
0O200O 
OO100O 
000400 
000200 
OOOIOO 
000040 
000020 
000010 

KDBDP 



BA29 
BA28 
BA27 
BA26 
BA2S 
BA24 
BA23 
BA22 
BA21 
BA20 
SA1 9 



BIT29 

BIT28 
8IT27 
BIT2B 
BIT25 
BIT24 
BIT23 
BIT22 
BIT21 
BIT20 
BIT 1 9 



BUS 
BUS 
BUS 
BUS 
BUS 
BUS 
BUS 
BUS 
BUS 
BUS 
BUS 



ADDR 
ADDR 
ADDR 
ADDR 
ADDR 
ADDR 
ADDR 
ADDR 
ADDR 
ADDR 
AOOR 



ESS 29 

ESS 28 

ESS 27 

ESS 26 

ESS 25 

ESS 24 

ESS 23 

ESS 22 

ESS 21 

ESS 20 

ESS 19 
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000004 
0OO0O2 
OOO0O1 



BA18 
BA17 
BA1S 



BIT 1 8 
BIT1 7 
BIT 1 6 



BUS ADDRESS IS 
BUS ADDRESS 17 
BUS ADORESS 16 
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BA16+BA17+BA1S+BA1S+BA20+BA21+BA22+BA23+8A24+BA2S+8A26+BA27+BA2S+BA29 



* BCICSR 



;*H028 ;BCI CONTROL REGISTER EQUATES 



OOOOOI 

020000 
000400 
OOO200 

000010 



FORCE 

STOPEN 
UCSREN 
BICSREN 
RTOEVEN 



BIT16 

BIT13 
BIT08 
BIT07 
BIT03 



; FORCE COMMAND 

STOP ENABLE 

USER CSR SPACE ENABLE 
BIIC CSR SPACE ENABLE 
RTO EV CODE ENABLE 



* BIWSTA 



;WRITE STATUS REGISTER 



100000 
040000 
020000 
01 0000 



GPR3 

GPR2 
GPR 1 
GPRO 



BIT31 
BIT30 
BIT29 
BIT28 



;GENERAL PURPOSE REGISTER 3 STATUS BIT 

;GENERAL PURPOSE REGISTER 2 STATUS BIT 

;GENERAL PURPOSE REGISTER 1 STATUS BIT 

.'GENERAL PURPOSE REGISTER O STATUS BIT 



* BIPSFC 



;*H030 ;FORCE IPINTR/STOP COMMAND REGISTER EQUATES 



BIT1S+BIT 1 4 



;STOP COMMAND 



* BIUCSR 



;USER INTERFACE INTERRUPT CONTROL REGISTER EQUATES 



000001 
000002 
000004 
000010 

000020 

000040 
OOOIOO 
OOO20O 

000400 
OOIOOO 
002000 
004000 



BRLV4 
BRLVS 
BRLV6 
8RLV7 

8RLV4S 
BRLVSS 
BRLV6S 
BRLV7S 

BRLV4R 
BRLV5R 
BRLV6R 
BRLV7R 



BIT1 6 

BIT 17 
BIT 18 
BIT 19 

BIT20 
BIT21 
BIT22 
BIT23 

BIT24 

BIT2S 
BIT26 
BIT27 



; FORCE BITS 16-19 



INTRC BITS 20-23 



; INTRC BITS 24-27 



c 
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140000 

100000 
040000 

oooooo 

020000 



ow 


' BIT31+BIT30 


qw 


= BIT31 


LW 


= BIT30 


WD 


= 


IOACC 


■ BIT29 



, OCTAWORD DATA LENGTH 

;QUADWORO OATA LENGTH 

;LONGWORD DATA LENGTH 

;WORD DATA LENGTH (only works fop BI registers) 

; 10 SPACE ACCESS 
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EQUATES FOR MSCP.SDI.SIT AND BYTE MASKS 



\tm 



000100 
004000 
00004 1 
000400 
000022 
000024 
1 70000 
000377 
OOIOOO 
000002 

00001 2 
00001 1 
OOOOIO 

00001 3 
000007 
000006 
001000 
000 1 OS 
000004 

oooooo 

000002 
000003 
177400 
170000 
001000 
177400 
OOO360 
OO0377 
OO0377 
OO0O60 
000377 
007400 
000100 
0000 17 
100000 
000003 
077700 
000077 
1 00000 
1 26736 
000042 
0O0074 
000003 
OOOOOS 
OO0OO4 
0OO777 
000020 

KDBDP 



ATTCOO 


= 100 


BTROTH 


= BIT1 1 


BUFLMT 


: 33 . 


CCLASS 


= 1»2S6 . 


CMODEL 


: IS. 


CMDLIM 


s 20. 


CYLSTR 


s 170OOO 


OEVCL 


■- 377 


DCLASS 


s 1000 


DMBPC 


■■ 2 


DMODT 


■- 10. 


OMOVH 


= 9 . 


DMOVL 


s 6 


DMSTR 


! 11. 


DSTSH 


= 7 


DSTSL 


= 6 


OUPVC 


s lOOO 


EDSEED 


= 69 . 


ERRRTC 


: 4 


FCT.MD 


! 


FCT. VI 


: 2 


FCT . V2 


■ FCT . V 1 * 1 


FRMCO 


= 177400 


HDCOO 


= 170000 


HDRTMO 


■ 512 . 


HIBYT 


: 177400 


HI NIB 


t 360 


LOBYT 


= 377 


HOSTF 


: LOBYT 


I OMSK 


: 60 


L8NMSK 


= LOBYT 


LBNSTR 


= 7400 


LOGCOD 


= 100 


LONIB 


= 17 


MAPENB 


= B I T 1 5 


MAPMSK 


= BIT00*8IT01 


MAPMSH 


= 77700 


MAPMSC 


= 77 


MAPVAL 


a B I T 1 5 


MDS12 


•- 126736 


MEMSZ 


: 34 . 


MINUTE 


s 60. 


OOTAF 


= 3 


ODTCA 


: 5 


OOTCV 


: 4 


OFFMSK 


s 777 


OFFSET 


= 16. 



MASK 

BETR 

BUFF 

MASS 

CONT 

MAX I 

MASK 

MASK 

DISK 

DM 

OM 

DM 

OM 

OM 

OUST 

OUST 

VIRT 

EOC 

ERRO 

FCT 

FCT 

FCT 

MASK 

MASK 

HEAD 

MASK 

MASK 

MASK 

MASK 

MASK 

MASK 

MASK 

MASK 

MASK 

MAPP 

MASK 

MASK 

COMP 

MAPP 

FCT 

NUMB 

60 

OM 

OM 

DM 

MASK 

NUMB 



FOR 

OTHE 

ER C 

STO 

ROLL 

MUM 

FOR 

FOR 

CLA 

DT P 

OT 

VERL 

VERL 

TART 

STA 

STA 

UAL 

SEED 

R RE 

MED 

VOLU 

VOLU 

FOR 

FOR 

ER T 

FOR 

FOR 

FOR 

FOR 

FOR 

FOR 

FOR 

FOR 

FOR 

ING 

FOR 

FOR 

LEME 

ING 

512 

ER 

ECON 

DT A 

DT C 

OT C 

FOR 

ER 



ATTENTION OP CODES 
D BIT IN GET STUD STATUS RESPONSE 
ONTROL BLOCK ALLOCATION LIMIT 

R. CONTROLLER CLASS FIELD FOR MSCP [rae04l 
ER MODEL FIELD FOR MSCP 
NUMBER OF MSCP PACKETS 

STARTING HI CYLINDER 

MSCP DEVICE CLASS FIELD 

ss 

C SAVE AREA OFFSET FROM UN.BUF 

OCATION OFFSET FROM UN.8UP{START OF OM SPACE) 

AY HI ADDR OFFSET FROM UN.BUF 

AY LO ADDR OFFSET FROM UN.BUF 

ADDRESS OFFSET FROM UN.BUF 
TUS HI OFFSET FROM UN.BUF 
TUS LO OFFSET FROM UN.BUF 
CIRCUIT FOR DUP PROTOCOL 



TRY 

A FOR 

ME 10 

ME ID 

SDI 

SDI 

IMEOU 

HIS 

HI N 

LO 9 

HOST 

MSCP 

SDI 

STAR 

LOG/ 

LO N 

ENABL 

MAPP 

UNUS 

NT OF 

VAL 10 

FORMA 

F PTE 

DS IN 

RITME 

ONSOL 

ARRY 

PAGE 
F KOI 



OUNT 

MAT WO 

WORD 

WORD 

FRAME 

HEADER 

T VALU 

YTE OF 

IBBLE 

YTE OF 

UNIT 

I/O 

LBN 

TING H 

ATTENT 

I8BLE 

ED BIT 

ING RE 

ED HIG 

MAPMS 

BIT I 

T CODE 

S THA 

A MIN 

TIC FL 

E ADDR 

FLAG 

OFFSE 

DS IN 



OFFSET 

1 OFFSET 

2 OFFSET 
CODE 

CODE 
E - EOUALS ABOUT 170 US 
WORO 

WORD 
FLAGS 

OMMANOS 

I LBN 

ION OP COOES 

IN BUFF OESC 
GISTER LOW 2 BITS 
H BITS 
H 
N PTE 

WE CAN CACHE 
UTE ! 

AGS OFFSET FROM UN.BUF 
ESS OFFSET FROM UN.BUF 
FFSET FROM UN.BUF 
T 
DOWNLINE LOAD HEADER 
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lOOOOO 
000377 
00 1000 
OOO002 
1 4O0O0 
O600O0 
000077 
O5O00O 
O3OO0O 
1 1OO0O 
010000 
060000 
10000 
120000 
0O7400 
000000 
020000 
0300OO 
100000 
0O0017 
004400 
000400 
000010 
OOO40O 
000274 
023000 
177400 
000170 
000440 
000023 



120000 
170000 



ONLREC 


- BIT 1 5 


ONLINE R 


OPCOD 


: LOBYT 


MASK FOR 


PAGESZ 


> S12. 


SIZE OF 


PTELEN 


■ 2. 


LENGTH 


O.STAT 


: 14OO00 


MASK FOR 


RBNCOD 


■ SOOOO 


RBN HEAD 


RBNMSK 


■ 77 


MASK FOR 


RSNPRM 


: SOOOO 


PRIMARY 


RBN2N0 


i 30000 


SECONOAR 


HI 1 COD 


: 11OOO0 


BAO HEAO 


RBNXOR 


RBNPRMSRBN2N0 


RBNXOR : 


R8NX0R 


RBNPRM+RBN2N0- RBNXOR -RBNXOR 


HI 1X0R 


H 1 1C00aRBN2N0 


H1 1X0R : 


H1 1X0R 


H11C0 0»RBN2ND-H11X0R-H11X0R 


RBNSTR 


= 7400 


MASK FOR 


RCT.MT 


: 


RCT CODE 


RCT.PR 


* 20000 


RCT CODE 


RCT .SE 


• 30000 


RCT CODE 


RCT .EN 


= lOOOOO 


RCT CODE 


SDIS 


! 17 


MASK FOR 


SDITO 


: 4400 


SOI INTE 


SECS2 


i 2S6. 


SECTOR S 


SEQUEN 


: 10 


SEOUENTI 


STDALN 


: BITOS 


STANOALO 


SYNCL 


3 »HOBC 


SYNC CHA 


SYNCH 


: AH02600 


SYNC CHA 


UNITF 


> HIBYT 


MASK FOR 


CTMOUT 


: 120. 


CONTROLL 


MODNUM 


: 440 


CONTROLL 


CODVER 


= 19 . 


MICROCOO 
( A004-AOO 
(A010-A01 
(A01S-A01 
(A020: 1 1 . 
never rel 
(A023: 15 . 

of par it 
(A024: 16 . 


XBNCOD 


: 120000 


XBN SECT 


XBNSTR 


: 170000 


MASK FOR 



ECOVERY IN PROGRESS FLAG 

MSCP OP CODE 
HOST PAGE 
F PTE IN WORDS 

MSCP PACKET OUEUE STATUS 
ER CODE 

RBN'S/TRACK 
RBN HEAOER CODE 
V RBN HEADER CODE 
ER CODE 

RBNPRM .XOR. RBN2ND 

H11C0D .XOR. RBN2ND 



o 



STARTING H 
FOR EMPTY 
FOR RBN US 
FOR RBN US 
FOR ENTRY 
CONTROL RE 
ERCONNECT MA 
SIZE 

IAL COMMAND 
ONE BIT IN G 
ARACTER LOW 
ARACTER HIGH 
UNIT FLAGS 
LER TIMEOUT 
LER MODEL NU 
3E VERSION N 
35= 1 ) ( AO06=2 
11:6) (A012=7 
18:9 . [mjt09 ] 
. [rojt 10] , A02 
leased) (A022 
. I m jt 13] ) ( 13 
ty and just 
. IE121 1 - IE12 
TOR COOE 

START XBN 



I RBN 

ENTRY 

ED AS PRIMARY REPLACEMENT 

ED AS SECONOARY REPLACEMENT 

PAST ENO OF RCT 

GISTER SOI SELECT 

CLOCK TICK TIMEOUT 

MASK 

ET STUD STATUS RESPONSE 



2 MINUTES 
MBER 1 IS . IN BITS 4-10) 
UMBER: 2 . ( AOOO- A003 »0 I 
) (A007:3) (A00S:4) (A009:5) 
)(A013-A0 14 = S. ) 
) (A019: 10. [m jtOSa] ) 
1:11. Imjt 1 1 ] A020 was 
: 12. [mjt 12] ) 

a 1 4 not used because 
because it is 13.) 
4]) 
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DEFINITION OF REFERENCES IN BUFFER MAP 

BASE LEVEL THREE 

DIAGNOSTIC MACH EGISTER : ~A 



000000 
OOOOOI 
000002 
000003 
OO0004 

ooooos 

000006 
000007 



0MREG7 
0MREG1 
DMREG2 
DMREG3 
DMREG4 
DMREG5 
DMREG6 
DMREG0 



DMREG7+1 
DMREC1* 1 
DMREG2+1 
DMREG3+1 
DMREG4+ 1 
0MREG5»1 
DMREG6*1 



SNOSTIC 

3N0STIC 

Si iSNOSTIC t 

DIAGNOSTIC K 

DIAGNOSTIC MA. 

DIAGNOSTIC MACH; 



REGISTER 
REGISTER 

REGISTER 
REGISTER 
REGISTER 

REGISTER 



DIAGNOSTIC MACHINE REGISTER 
DIAGNOSTIC MACHINE REGISTER 



0. PROCESSOR HEADER COMPARE STORAGE AREA 



000010 
000000 



HEADER := DMREGO+1 ; BUFFER STORAGE FOR SECTOR HEADER (HDRCMP) 
ASSUME HEADERS 17, LE. 10 
DRIVE RESPONSE STORAGE AREA 



OO00 1 1 
OOOO07 



INPUT 
INPLEN 



:: HEAOER+1 
: : 7 



DRIVE RESPONSE INPUT AREA 
LENGTH OF DRIVE RESPONSE AREA 



HOST COMMUNICATION DATA AREA 



NOTE THAT RSPLEN , RSPPTR , RSPCOF , RSPPOF , RCSRWO , RCSRW1 MUST BE KEPT IN THAT ORDER 



000020 
00002 1 

000022 
000023 
OO0024 
OO0025 

OOOOOO 



00002 6 
000027 



OOO030 
KDBDP 



RSPLEN 
RSPPTR 

RSPCOF 
RSPPOF 
RCSRWO 
RCSRW1 



CMDLEN 
CMDPTR 



HEADER+8. 
RSPLEN* 1 

RSPPTR+1 
RSPCOF+1 
RSPPOF-H 
RCSRWO+1 



RESPONSE RING BUFFER LENGTH 
HOST RESPONSE RING BUFFER POINTER 
ADOR : RING BASE + 4«RSPPTR 
RESPONSE CURRENT RING OFFSET SAVE 
RESPONSE PREVIOUS RING OFFSET SAVE 
RESPONSE CSR WORD SAVE 
RESPONSE CSR WORD 1 SAVE 



ASSUME RCSRW1 , EO, < RSPLEN+ <RCSRW1 -RSPLEN>> 

NOTE THAT CMD L EN , CMDPTR , CMDC OF , CMDPOF , CCSRWO , CCSRW1 MUST BE KEPT IN THAT ORDER 



RCSRW1+1 
CMOLEN+1 



CMOCOF : : CMDPTRH ; 
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COMMAND RING BUFFER LENGTH 

HOST COMMAND RING BUFFER POINTER 

ADDR ■ RING BASE ♦ 4*(RSPLEN + CMDPTR) 

COMMAND CURRENT RING OFFSET SAVE 
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00003 1 
000032 
O00O33 



CMOPOF 
CCSRWO 
CCSRW1 



CMDCOF*! 
CMDPOF*! 
CCSRWO*! 



COMMAND PREVIOUS RING OFFSET SAVE 
COMMAND CSR WORD O SAVE 
COMMAND CSR WORD 1 SAVE 



> 



000000 
000002 
000004 



ASSUME CCSRW1 , EO, < CMOLEN+ <CCSRW1 -CMDLEN>> 

RSPO :• 2 ; RESPONSE INTERRUPT RING BASE NEGATIVE OFFSET 

CMDO := 4 ; COMMANO INTERRUPT RING BASE NEGATIVE OFFSET 

VAXO := 6 ; VAX PURGE INTERRUPT RING BASE NEGATIVE OFFSET 



MISCELLANEOUS WORO ALLOCATIONS (NAME OF ROUTINE USED IN) 



000034 
00003S 
000036 
00004O 
000042 
000044 
000045 
000046 
000047 
000050 
00005 1 
O0OOS2 



FAILUR 

ALOLMT 

SEX2SK 

CNVTV1 

CNVTV2 

CNVTV3 

CNVTV4 

TEMPI 

TEMP2 

TEMP3 

SEKPRV 

SEKSAV 



CCSRW1*1 ; INTERNAL FAILURE COOE 

FAILUR+1 ; ALLOCATION LIMIT (U.ALOC) 

ALOLMT+1 ; NUMBER OF SECTORS UNTIL SEEK (U.ALOC) 

<FAILUR+17>«7760; U.CNVT VARIABLE #1 (2 WORDS) 

CNVTV1+2 ; U.CNVT VARIABLE #2 (2 WORDS) 

CNVTV2+2 ; U.CNVT VARIABLE #3 (1 WORO) 

CNVTV3*! ; U.CNVT VARIABLE #4 (1 WORO) 

CNVTV4+1 ; TEMPORARY STORAGE #1 

TEMP 1H ; TEMPORARY STORAGE #2 

TEMPS+1 ; TEMPORARY STORAGE #3 

TEMPS* 1 ; SEEK ORDERING PREVIOUS SAVE 

SEKPRV*1 ; SEEK ORDERING SAVE AREA 



ECC ROUTINE BUFFER STORAGE 

NOTE THAT THESE LOCATIONS OVERLAY THE AREA STARTING AT 



O0O035 
00004 6 
OOOOS7 
OO0035 
000046 
000046 
000057 
000070 
000070 
000 1 12 
0001 12 
00O122 
00006 1 
000062 
000063 
OO0064 



ECC9 . 1 


: FAILUR+1 


ECC9 . 2 


> ECC9 . 1*9 


ECC9 .3 


« ECC9.2+9 


ELPN 


= ECC9 . 1 


ELPM 


: ECC9.2 


EVAL 


> ELPM 


ELPP 


i ECC9.3 


ELPO 


= ELPP+9. 


ELOC 


= ELPO 


SV 


= ELP0+1S. 


SYO 


= SY 


SY8 


= SY + 8. 


M 


= ELPP+2 


DISM 


= ELPP+3 


DISN 


s ELPP+4 


LM 


: ELPP+5 



FIRST ECC 9 WORD BUFFER AREA IECCCI 
SECOND ECC 9 WORO AREA IECCCI 
THIRD ECC 9 WORD AREA (ECCC) 



EVAL OVERLAYS ELPM 



ELOC OVERLAYS ELPO 



REVECTORING/REPLACEMENT STORAGE AREA 



000123 
OOOI23 



REVSTR 
RVCSAV 



: = SYS+1 
: = REVSTR 



START OF REVECTORING RAM ASSIGNMENTS 
SAVES ORIGINAL REQUEST'S I/O PARAMETERS 
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000130 
000 1 3 1 
0001 32 
000133 



RVCBNL 
RVCBNH 
RVCTA 
REVEND 



. RVCSAV+5 

= RVCBNL+1 

= RVCBNH+1 

s RVCTA+1 



HOLDS ORIGINAL LBN IN ERROR (LO) 

HOLDS ORIGINAL LBN IN ERROR (HI) 

HOLDS ORIGINAL TRACK ADDRESS AND REAL TIME OP CODE 

END OF REVECTORING STORAGE AREA 



DYNAMIC BUFFER ALLOCATION STACK AREA 

BIT OF REGISTER RLL CONTAINS THE BUFFER LOCK FLAG AND ALONG WITH 
BITS 1 -> 8 OF RLL FORM THE ODD POINTER INTO THE FOLLOWING STACK 
THE STACK CONTAINS I ENTRY FOR EACH BUFFER AVAILABLE PLUS 1 ANO 
THE LAST ENTRY CONTAINS A ZERO TO INDICATE THAT THERE ARE NO 
BUFFERS LEFT. EACH ACTIVE STACK ENTRY CONTA I NS THE AODRESS OF A 
DATA BUFFER. 



c 



0001 33 

000000 
000 133 
000 134 
000 135 
000136 
000137 
OO0 140 
OO014 1 
000142 
000143 
OOOI 4 4 
000145 
000146 
OO0147 
OO0150 
00015 1 
000!52 
OOOI 53 
000154 
000155 
000156 
000157 
000160 
000161 
000162 
000 1 6 3 
000164 

0001 65 

0001 66 
OOOI 6 7 
OOOI 70 



BUFPTR 


REVEND 


ASSUME REVEND81 ,EQ. 1 


BUFPOO 


= BUFPTR 


ECOUNT 


= BUFPOO+1 


BUFP01 


= ECOUNT*! 


HDLMT 


s BUFP01+1 


BUFP02 


s HDLMT+1 


UBURST 


= BUFP02+1 


BUFP03 


> UBURST+1 


CL IMIT 


= BUFP03+1 


BUFP04 


= C L I M I T + 1 


OPCODE 


■- BUFP04+1 


BUFP05 


= OPCODE*! 


MROUE 


= BUFP05+1 


BUFP06 


: MROUE* 1 


MWOUE 


: BUFP06*1 


BUFP07 


= MWOUE* 1 


OUESAV 


= BUFP07+1 


BUFP08 


-. OUESAV*! 


LOGLEN 


: BUFPOStl 


8UFP09 


= L0GLEN*1 


NSEEKS 


= BUFP09+1 


BUFPIO 


- NSEEKS+1 


RNGBSL 


* BUFP10+1 


BUFP1 1 


- RNGBSL*1 


RNGBSH 


■- 8UFP1 1 + 1 


BUFP12 


: RNGBSH+1 


INTVEC 


: BUFP12*1 


BUFP13 


= INTVEC* 1 


DMTEMP 


: BUFP13+1 


BUFP14 


s DMTEMP+1 


CNTFLG 


- BUFP14+1 



START OF BUFFER POINTER STACK 



*** N 

* * * B 
SAVE 

» ** D 
SEARC 

* * * D 
UNIBU 

* ** 
COMMA 
*** 
OP CO 
*** D 
MAI NT 
««* D 
MAINT 
«** D 
OUEUE 
«** 
ATTEN 
*»* D 
NUMBE 
»** I 
RING 
«*» I 
RING 
*** D 
HOST 

* * * D 
DMOT 
*** 
MSCP 



OTE 

UFFE 

NUMB 

ATA 

H LI 

ATA 

S TR 

ATA 

ND L 

ATA 

DE S 

ATA 

ENAN 

ATA 

ENAN 

ATA 

STA 
ATA 
TION 
ATA 

OF 
ATA 
BUFF 
ATA 
BUFF 
ATA 
INTE 
ATA 
TEMP 
ATA 
CONT 



IT O 
R STACK 
ER OF E 
BUFFER 
MIT COU 
BUFFER 
ANSFER 
BUFFER 
IMIT WO 
BUFFER 
AVE FOR 
BUFFER 
CE READ 
BUFFER 
CE WRIT 
BUFFER 
TUS AND 
BUFFER 
/ERROR 
BUFFER 
SEEKS 
BUFFER 
ER BASE 
BUFFER 
ER BASE 
BUFFER 
RRUPT V 
BUFFER 
ORARY S 
BUFFER 
ROLLER 



IOPRI 

( IN TWO WORD PAIRS ) 



MUST BE ONE 

NULL ENTRY |: 01 
CC SYMBOLS IN ERROR 
POINTER 1 
NT6R (HORCMP 
POINTER 2 
BURST SIZE 
POINTER 3 
RK WORD 
POINTER 4 

U.ALOC.U.BMTV.U.BFIL 
POINTER 5 

OUE HEAD 
POINTER 6 

OUE HEAD 
POINTER 7 

LINK WORD SAVE AREA 
POINTER 3 
LOG PACKET LENGTH 
POINTER 9 
TO BE INITIATED 
POINTER 10 

LO 
POINTER II 

HI (14 BITS) 
POINTER 12 

ECTOR (IF EO O THEN NEVER INTERRUPT) 
POINTER 13 
AVE AREA 
POINTER 14 
FLAGS 



MSCP CONTROLLER FLAG BIT DEFINITIONS (LOWER BYTE) 



000020 
KOBDP 



CF.THS ;a B I T04 
KDBSO. MICROCODE. ,22-APR-l988 11 :27: 16.96 
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000 100 
000200 
000320 



cf .msc 

CF. ATN 
CFLAGS 



BIT06 
BIT07 
CF . THSI CF . ATH 



; ENABLE MISCELLANEOUS ERROR LOG MESSAGES 

; ENABLE ATTENTION MESSAGES 

ICF.MSC ; FLAGS SUPPORTED BY THE CONTRO L LER 



: = CNTFLG 



O0 1000 
0OO40O 

000171 
0OO1T2 
00O1 73 



LFAIL 
VAX . PG 



CONTROLLER STATUS WORD (HI 
MSCP HOST FLAGS (LO BYTE) 



CON. ST BIT DEFINITIONS (UPPER BYTE) 



BIT 1 S 
BIT14 
BIT13 
BITI 2 
BIT1 1 
BIT 10 
BIT09 
BIT08 



BUFP1S = CNTFLG+1 
SAVR7 : = BUFP1S+1 
BUFP 16 : a SAVR7+ 1 






NOT 


USED 




NOT 


USED 




NOT 


USED 




NOT 


USED 




NOT 


USED 




NOT 


USED 




= 


NOP, 


* 


= 


NO PURGE 



SEND LAST FAILURE LOG PKT 
1 : VAX PURGE REQUIRED 



**» DATA BUFFER POINTER IS 
FOR SAVING R7 IN ECC ROUTINE 
»»* DATA BUFFER POINTER 16 



TIMER/COUNTER SERDES SYNC STORAGE 



000174 
000175 
000176 
000177 
000200 
OOO201 
0OO202 
000203 



TMR . MC 
BUFP17 
TMR. BS 
BUFP16 
HOSTMO 
BUFP 19 
SYNC 
BUFP20 



BUFP16+1 
TMR.MC+1 
BUFP17+1 
TMR. BStl 
BUFP18+1 
HOSTMO+1 
BUFP19+1 
SYNC+1 



HOST MSCP ACTIVITY TIMER 

»«* DATA BUFFER POINTER 17 

CONTROLLER INTERNAL TIMER BASE 

••* DATA BUFFER POINTER IS 

HOST TIMEOUT (SECS), IF EO O THEN NO TIMEOUTS EVER 

*«» DATA BUFFER POINTER 19 

SYNC PATTERN ( L EVOWR , D . WDAT ) 

*«« DATA BUFFER POINTER 20 



HOST MSCP PACKET RING BUFFER STORAGE AND POINTERS 



0O0204 

000205 
000206 
000207 
000210 
00021 1 
0002 12 
0002 13 
0002 14 
000215 

00021 6 
0002 17 
000220 

00022 1 



HSTQUE 

BUFP21 
DTEMP 1 
BUFP22 
UTEMP 1 
BUFP23 
LV 1SV1 
BUFP24 
LV1SV2 
BUFP25 
RVCIND 
BUFP26 
RVCRTY 
BUFP27 



BUFP20-H 

BITS 11 - 

HSTQUE+1 

BUFP21+1 

DTEMP1+1 

BUFP22+1 

UTEMP1+ 1 

BUFP23+1 

LV1SV1+1 

BUFP24+1 

LV1SV2+1 

BUFP25+1 

RVCIND+1 

BUFP26+1 

RVCRTY+1 



HOST MSCP RESPONSE QUEUE 

HOST MSCP PACKET ADORESS 

**« DATA BUFFER POINTER 21 

D.PROC TEMP STORAGE 

*«* DATA BUFFER POINTER 22 

U.PROC TEMP STORAGE 

*** DATA BUFFER POINTER 23 

LEV1RD STATUS SAVE WORD 

»** DATA BUFFER POINTER 24 

LEV1RD OPCODE SAVE WORO 

*** DATA BUFFER POINTER 25 

HOLD ENTRY INDICATOR (FOR U . RVS7 ) 

*«* DATA BUFFER POINTER 26 

RETRY COUNT WHEN READING RCT 

«*« DATA BUFFER POINTER 27 



KDBDP 
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OO0222 
000223 
OO0224 
000225 
000226 
000227 
000230 
00023 1 
000232 
000233 
000234 
00023S 
000236 
OO0237 
000240 
00024 1 
000242 
000243 
000244 
000245 
000246 
000247 
00O25O 
0002S1 
0002S2 
000253 
000254 
000255 
000256 
000257 
000260 
000261 
000262 
000263 
000264 
000265 
000266 
000265 
000266 
000267 
000270 
000271 
000272 
000271 
000272 
000273 
000274 



000275 
000276 
000277 
OOO30Q 
000301 



RCTOFF 
BUFP28 
RCTBLK 
BUFP29 
RVCBUF 
BUFP30 
RVCEBF 
BUFP31 
RVCSDI 
BUFP32 
RVCVEC 
BUFP33 
BTCNT 
BUFP34 
LN 

BUFP35 
CMPBUF 
BUFP36 
MAPSAV 
BUFP37 
MAPFLG 
BUFP38 
RVECUP 
BUFP39 
RVECOP 
BUFP40 
RVCFLG 
BUFP41 
TEMP 
BUFP42 
REPSTA 
BUFP43 
SAVUAR 
BUFP44 
MSCPLN 
BUFP45 
SAVEDC 
BADRL 
BADRH 
BUFP46 
SAVBUF 
BUFP47 
SAVCNT 
RGOATL 
RGDATH 
BUFP48 
SAVADR 



BUFP49 
LGCKSV 
BUFP50 
BIRTRY 
BUFP51 



BUFP27+1 

RCTOFF-M 

BUFP28*1 

RCTBLK+1 

BUFP29* I 

RVCBUF+1 

BUFP30+1 

RVCEBF-M 

BUFP31-H 

RVCSDI+1 

BUFP32+1 

RVCVECH 

BUFP33*1 

BTCNT-H 

BUFP34-H 

LB* 1 

BUFP35+1 

CMPBUF+1 

BUFP36+1 

MAPSAV+1 

BUFP37+1 

MAPFLG+1 

BUFP38+1 

RVECUP+1 

BUFP39+1 

RVECDP*1 

BUFP40+1 

RVCFLG+1 

8UFP41-H 

TEMP+1 

BUFP42+1 

REPSTA+1 

BUFP43+1 

SAVUAR+1 

BUFP44+1 

MSCPLN+1 

BUFP45+1 

BUFP4S 

BUFP45+1 

SAVEOC+1 

BUFP46+1 

SAVBUF+1 

BUFP47+1 

BUFP47 

BUFP47*1 

SAVCNT+ 1 

BUFP48+ 1 

BUFP4S 

BUFP48-H 

SAVADR+ 1 

BUPP49+1 

LGCKSV* 1 

BUFP50+ 1 

BUFP50+2 



STAR 

* * * 
CURR 

POIN 

*** 
HOLD 

* * * 
CURR 

* * * 
REVE 

* * * 
BUFF 

ECC 

* * * 
Ch04 

* * * 
UQA] 

* * * 
QA] 

* * 
QA] 

* * 
QA] 

* * 
QA] 

* * 
05] 

* * 
ERR 

* * 
tor 

* * 
aeo 

* * 
qda 
NTA 
NTA 



(qda 



qda 
NTA 
NTA 
* * 
qda 
ai 1 
1 

* * * 

[ ra« 

# * * 



TING S 
DATA B 
ENT RC 
DATA 8 
TER TO 
DATA B 

BUF 
OATA B 
ENT SD 
DATA B 
CTORIN 
DATA B 
ER SER 
DATA B 
VARIAB 
DATA B 
] POIN 
OATA S 

TEMP 

DATA B 

FLAG 

DATA B 

U PR 

OATA B 

PRO 
OATA 

REVEC 
DATA B 

TEMPO 
OATA B 
ECIHDL 
DATA B 
age f o 
DATA B 
2] » 
DATA 
] Stor 
INS LO 
INS H 
DATA B 
] Stor 
OATA B 
1 Stor 
INS LO 
INS HI 
DATA B 
] Stor 

able 
able f 
DATA B 
071 St 
DATA B 
08 ] bl 
DATA B 



EARCH 
UFFER P 
T BLOCK 
UFFER 

ORIGIN 
UFFER 
NL OF B 
UFFER P 

PORT 
UFFER P 
G DISPA 
UFFER P 
VICE FA 
UFFER 
LE 

UFFER 
TER TO 
UFFER 
SAVE FO 
UFFER 

FOR MA 
UFFER 
OC REVE 
UFFER 

REVEC 
UFFER 
TOR PRO 
UFFER 
RARY ST 
UFFER 

REVEC 
UFFER P 

UAR 
UFFER P 

MSCP m 
UFFER P 
age for 

WORO 

WORD 
UFFER P 
age for 
UFFER P 
age for 

WORD 

WORO 
UFFER P 
age for 
or BDA 
or BDA 
UFFER P 
oraga f 
UFFER P 

try 
UFFER 



FFSET IN CURRENT RCT BLOCK 
OINTER 26 

(AS OFFSET FROM RCT BASE) 
OINTER 29 

AL BUFFER IN ERROR 
OINTER 30 
UFFER IN ERROR 
OINTER 31 

UNDERGOING REVECTORING (0 IF 
OINTER 32 

TCH VECTOR = EVEN FOR DPROC, 
OINTER 33 

RNESS COUNTER 
OINTER 34 

OINTER 35 

DEDICATED COMPARISON SUFFER 
OINTER 36 

MAPPING INFORMATION 
OINTER 37 
PPING 
OINTER 38 
CTOR VECTOR 

NTER 39 
TOR VECTOR 
OINTER 40 

FLAG 
01 NTER 4 1 
DRAGE 
OINTER 42 
TOR STATUS 
OINTER 43 

OINTER 44 
sg length 
OINTER 45 

edc for nonblock 
F CONTROLLER 81 IC BASE ADDRESS 
F CONTROLLER SIIC BASE ADDRESS 
OINTER tS 

buffer ptr for nonblock 
OINTER 47 

word count for nonblock 
F SIIC REGISTER OATA 
F SIIC REGISTER DATA 
OINTER 48 

host adr for nonblock 
uses 
uses 

OINTER 49 

or Antllog/log check pointer 
OINTER SO 
count (409 6) 
OINTER 51 



ODD FOR UPROC 



C 



KDBOP 
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: = BUFP51+2 



*«« DATA BUFFER POINTER 52 



OO0024 
OOOOOO 
OOOOOO 
000020 
177760 
000002 

000040 
000034 
OO003O 
000054 
000014 
000034 
000020 
000030 
000022 
000070 
000304 
000342 
000342 
000342 
000374 
000425 
000460 
0005 1 2 
000544 
0005 7 6 
OOO630 
000662 
0007 14 
000746 
OOIOOO 
OO1032 
001064 
OOI 1 16 
OOI 150 
0O12O2 
001234 
OOI 266 
O01320 
001352 



; * MSCP PACKET STORAGE ANO 


DEFINITION 


UREA (MSCP VI. 2 09-APR-82) * 


NPKTS 


= CMOLIM 




NUMBER OP 


MSCP PACKETS 


VC . CMD 


s 




COMMAND VIRTUAL 


MRCUIT ID 


VC . RSP 


s 




RESPONSE ANO ATTENTION VIRTUAL CIRCUIT 10 


VC . LOG 


s 1*16. 




ERROR LOG 


VIRTUAL CIRCUIT ID 


VC . DMM 


s 177760 




DIAGNOSTIC MACHINE MODE VIRTUAL CIRCUIT ID 


P 


3 2 




MSCP 


PKT 


3FFSET 


1ST WORD IS QUEUE WORD) 








2ND WORD 


S VIRTUAL CIRCUIT IDENTIFIER 


AVL . LN 


= 32. 




AVAI LABLE 


ATTENTION MESSAGE LENGTH (BYTES) 


BAD. LN 


= 23 . 




BUS 


ADDRESS ERROR LOG PACKET LENGTH (BYTES) 


CNT . LN 


= 24 . 




CONTROLLER ERROR 


LOG PACKET LENGTH (BYTES) 


OSK. LN 


= 44 . 




DISK 


ERROR LOG PACKET LENGTH (BYTES) 


DUP. LN 


■ 12. 




OUPL ICATE 


ATTENTION MESSAGE LENGTH (BYTES) 


LOG. LN 


« 23. 




ERROR LOG 


PACKET 


MAXIMUM LENGTH (23. WORDS) 


MCP . 10 


■ 16. 




LENGTH FOR MSCP 


70 END PACKETS 


MCP . LN 


i 24 . 




MSCP 


PACKET LENGTH (WORDS) 


MCP . RD 


: 18. 




MAXIMUM MSCP PACKET READ LENGTH (WORDS) 


SDI . LN 


: 56. 




SDI 


:RROR 


LOG PACKET LENGTH (BYTES) 


LOGPKT 


= BUFP52+1 




COMMON ERROR LOG 


AND ATTENTION PACKET 


LOGEND 


= LOGPKT+LOG 


LN + P 


END 


OF LOG PACKET (27 WOROS LONG) 


PKT8UP 


s <L0GEND+1 >S 177776 


START OF MSCP PACKET BUFFERS [MAKE SURE ITS EVEN] 


PKTOOI 


s PKTBUF 




1ST 


MSCP 


PACKET 


BUFFER 


PKT002 


s PKT001+MCP 


LN + P 


2ND 


MSCP 


PACKET 


BUFFER 


PKT003 


3 PKT002+MCP 


LN + P 


3RD 


MSCP 


PACKET 


BUFFER 


PKT004 


s PKT003+MCP 


LN + P 


4TH 


MSCP 


PACKET 


BUFFER 


PKT005 


3 PKT004+MCP 


LN + P 


5TH 


MSCP 


PACKET 


BUFFER 


PKT006 


= PKT005+MCP 


LN + P 


6TH 


MSCP 


PACKET 


BUFFER 


PKT007 


• PKT006+MCP 


LN + P 


7TH 


MSCP 


PACKET 


BUFFER 


PKT008 


3 PKT007+MCP 


LN + P 


8TH 


MSCP 


PACKET 


BUFFER 


PKT009 


3 PKT008+MCP 


LN + P 


9TH 


MSCP 


PACKET 


BUFFER 


PKT010 


s PKT009+MCP 


LN + P 


10TH 


MSCP 


PACKET 


BUFFER 


PKT01 1 


= PKT010+MCP 


LN + P 


1 1TH 


MSCP 


PACKET 


BUFFER 


PKT012 


= PKT011+MCP 


LN + P 


12TH 


MSCP 


PACKET 


BUFFER 


PKT013 


= PKT012+MCP 


LN + P 


13TH 


MSCP 


PACKET 


BUFFER 


PKT014 


« PKT013+MCP 


LN + P 


14TH 


MSCP 


PACKET 


BUFFER 


PKT015 


= PKT014+MCP 


LN + P 


15TH 


MSCP 


PACKET 


BUFFER 


PKT01 6 


s PKT01S+MCP 


LN + P 


1 6TH 


MSCP 


PACKET 


BUFFER 


PKT017 


s PKT016+MCP 


LN + P 


17TH 


MSCP 


PACKET 


SUFFER 


PKTO 1 8 


= PKT017+MCP 


LN + P 


18TH 


MSCP 


PACKET 


BUFFER 


PKT019 


s PKT018+MCP 


LN + P 


19TH 


MSCP 


PACKET 


BUFFER 


PKT020 


s PKT019+MCP 


LN + P 


20TH 


MSCP 


PACKET 


BUFFER 


PKTENO 


= PKT020+MCP 


LN + P 


END 


}F MSCP PACKETS BUFFER 


; « • 


1SCP PACKET OUEUE POINTE) 


IS 









THE PACKET OUEUE POINTERS PRECEEO THE FIRST WORD OF THE MSCP PACKET AREA 
FOR EACH OF PACKETS. THERE ARE 'NPKTS' PACKETS. 'NPKTS' ARE USED TO 
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HOLD MSCP COMMANDS ANO 1 IS DEDICATED FOR USE WITH 'ATTENTION' ANO 
•ERROR LOG' PACKETS SENT FROM THE CONTROLLER. THIS DEDICATED 'LOG' PACKET 
IS ALSO USED TO HOLD AN IMMEDIATE COMMAND WHEN THE HOST HAS ALL OF THE 
OTHER PACKETS IN USE. THE QUEUE POINTERS CONSIST OF A NEXT PACKET POINTER 
AND STATUS BITS (P. LINK) AS DESCRIBED BELOW: 



RELATIVE REFERENCES TO FLAGS WITHIN A QUEUE POINTER 



lOOOOO 
040000 



PSTAT 
PACTV 



B IT 1 5 
8 I T 1 4 
BITS 13 - 



O i MSCP PACKET AVAILABLE, 1 = MSCP PKT IN USE 

= PACKET IN OUE, 1 = PACKET ACTIVE 

OsLAST PACKET IN CHAIN, NEQ O3POINTER TO NEXT PACKET 



MSCP PACKET COMMAND OP CODES - MSCP VERSION 1.0 28-JAN-3I 



000001 
000020 
000017 
000O1O 
0O002 1 
000040 
00001 3 
000022 
000023 
000002 
0000 1 6 
000003 
000030 
00003 1 

0000 1 1 
0O0O4 1 
000024 
0O00O4 

00001 2 
0O0042 



OP 


ABO 


s 1 


OP 


ACC 


= 20 


OP 


ATT 


= 17 


OP 


AVL 


: 10 


OP 


CCD 


= 21 


OP 


CMP 


i 40 


OP 


DAP 


• 13 


OP 


ERS 


■ 22 


OP 


FLU 


= 23 


OP 


GCS 


3 2 


OP 


GST 


3 1 6 


OP 


GUS 


3 3 


OP 


MRO 


3 30 


OP 


MWR 


3 3 1 


OP 


ONL 


3 1 1 


OP 


RD 


s 4 1 


OP 


RPL 


3 24 


OP 


sec 


s 4 


OP 


sue 


3 12 


OP 


WR 


3 42 



MSCP 


ABORT OP 


MSCP 


ACCESS OP 


CONTROLLER - ATT 


MSCP 


AVAILABLE 


MSCP 


COMPARE C 


MSCP 


COMPARE H 


MSCP 


DETERMINE 


MSCP 


ERASE OP 


MSCP 


FLUSH CAC 


MSCP 


GET COMMA 


CONTROLLER - GET 


MSCP 


GET UNIT 


CONTROLLER - MAI 


CONTROLLER - MAI 


MSCP 


ONLINE OP 


MSCP 


READ OP C 


MSCP 


REPLACE 


MSCP 


SET CONTR 


MSCP 


SET UNIT 


MSCP 


WRITE OP 



CODE 

CODE 
ENTION PROCESSING OP CODE 

OP CODE 
ONTRQLLER DATA OP CODE(NOP) 
OST DATA OP CODE 

ACCESS PATHS COMMAND 
CODE 

HE OP CODE(NOP) 
ND STATUS 

DRIVE STATUS OP CODE 
STATUS OP CODE 
NTENANCE READ COMMAND 
NTENANCE WRITE COMMAND 

COOE 
ODE 

P CODE 

OLLER CHARACTERISTICS OP CODE 
CHARACTERISTICS OP COOE 
CODE 



MSCP COMMAND PACKET OFFSETS 



c 



OOOOOO 
00000 1 
OOOOOO 



OOO0O1 
000002 



000002 
KDBDP 



P . LINK 
P . VCID 
UQ CNT 



= P-2 

= P" 1 

s P. LINK 
LOW 4 BITS 



PACKET STATUS AND LINK WORD 

VIRTUAL CIRCUIT IDENTIFIER 

UQ PORT MSG LENGTH OVERLAID BY PACKET LINK 



OF P. VCID ARE CLEARED BY U . RECV I ARE USED AS FLAGS 



; (E121 1 



KDBSO. MICROCODE . 



PABRT 
PONER 



P . CRFO : s P+0 
, 22-APR- 1988 11:27: 16.96 



3 BITOO 
3 BITOI 
3 BITS 3-2 



3 OK. 1 
O 3 OK, 1 
UNUSED 



PACKET MARKED FOR ABORT 

AVAIL PART OF FAILED ONLINE COMMAND 



COMMAND REFERENCE NUMBER (LO) 



KOBOP DIGITAL EQUIPMENT CORP. 
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000003 
000004 
OOOOOS 
000004 
000006 
000007 

0000 1 
OOOO10 

00001 1 
000012 
000012 
000013 
000014 
0000 IS 
0000 IS 
000017 
000012 
0000 13 
000020 
000021 
OOOOIO 
OOO0 1 1 
00001 1 
00O022 
000022 
OOO023 
000012 
000013 
OO002O 
00002 1 
OOOOIO 
O0001 1 
OO001O 
0000 1 1 
000012 
000020 
00002 1 
000022 
000023 
000026 



p 


CRF1 


= P.CRFO+1 


COMMAND RE 


p 


UNIT 


= P + 2 


UNIT NUMBE 


p 


RS03 


= P + 3 


RESERVED T 


p 


CONS 


= P + 2 


OMDT CONSO 


p 


OPCD 


= P + 4 


OPCODE FIE 


p 


MOD 


* P + S 


MODIFIERS 


p 


RSOS 


■ P + 6 


RESERVED S 


p 


BCNO 


= P + 6 


BVTE COUNT 


p 


BCN1 


: P.BCNO+1 


BYTE COUNT 


p 


RSOS 


: P + S. 


RESERVED E 


p 


BUFO 


= P + S. 


BUFFER DES 


p 


BUF1 


= P.BUFO+1 


BUFFER DES 


p 


BUF2 


s P.BUF1+1 


BUFFER OES 


p 


BUF3 


: P.BUF2+1 


BUFFER DES 


p 


BUF4 


« P.BUF3+I 


BUFFER DES 


p 


BUFS 


. P.BUF4+1 


BUFFER DES 


p 


BUFL 


. P. BUFO 


CONTROLLER 


p 


BUFH 


s P.BUF1 


CONTROLLER 


p 


LBNO 


i P+14 . 


LOGICAL BL 


p 


LBN1 


» P.LBNO+1 


LOGICAL BL 


p 


RFNO 


> P + 6 


ABORT/GET 


p 


RFN1 


= P.RFNO+1 


ABORT/GET 


p 


UNFL 


= P + 7 


ONLINE/SET 


p 


SHUN 


= P+16 . 


SHADOW UNI 


p 


RS1S 


= P+16 . 


reserved F 


p 


RSI 7 


: P+17 . 


reserved f 


p 


HSTO 


= P + 8 . 


HOST 10 (L 


p 


HST1 


= P.HSTO+1 


HOST ID (H 


p 


ELGO 


= P+14 . 


ERROR LOG 


p 


ELG1 


: P.ELGO+1 


ERROR LOG 


p 


RBNO 


5 P+6 . 


REPLACE RB 


p 


RBN1 


• P.RBNO+1 


REPLACE RB 


p 


VRSN 


s P + 6 


SET CONTRO 


p 


CNTF 


■ P + 7 


SET CONTRO 


p 


HTMO 


I P + 8 . 


SET CONTRO 


p 


RGIO 


s P+14. 


MAINTENANC 


p 


RGI 1 


= P . RGIO+1 


MAINTENANC 


p 


RGOO 


= P+ 16 . 


MAINTENANC 


p 


RG01 


= P.RGOO+1 


MAINTENANC 


p 


CVLS 


= P+20. 


GET UNIT S 



(HI) 



sFERENCE NUMBER 

!R FIELD 

THIRD WORD 

OLE ADDRESS [=0 FOR 777560) 

ELD (LO BYTE1/HI B VTE = RESERVED 

FIELD 
5IXTH WORD 
(LO) 
(HI) 
EIGHTH WORD 

SCRIPTOR (1ST WORD) LO 16 BITS OF AODR 
SCRIPTOR (2ND WORD) HI 2 BITS OF ADDR 
SCRIPTOR (3RD WORO ) 
SCRIPTOR (4TH WORD) 

SCRIPTOR (STH WORD) SAVE LO LBN OF 1ST BAD BLOCK 
SCRIPTOR I6TH WORD I SAVE HI LBN OF 1ST BAD BLOCK 
»/MSCP BUFFeR DESCRIPTOR LO 
R/MSCP BUFFER DESCRIPTOR HI 
LOCK NUMBER (LO) 
LOCK NUMBER (HI ) 

COMMAND STATUS REF * (LO) 

COMMAND STATUS REF # (HI) 
T CHAR UNIT FLAGS 

Field at offset 16. ;[E122l 
Meld at offset 17. ;[E122] 
LO) 
HI) 

FLAGS (LO) 

FLAGS (HI) 
(LO) 
»N (HI ) 

DLLER CHAR MSCP VERSION 
3LLER CHAR CONTROLLER FLAGS 
OLLER CHAR HOST TIMEOUT 
CE READ/WRITE REGION ID (LO) 
CE READ/WRITE REGION ID (HI) 
CE REAO/WRITE REGION 
CE READ/WRITE REGION OFFSET (HI) 
STATUS CYLINDER SIZE 



o 



OFFSET (LO) 



0O0022 
000023 
000024 
OO002S 
000026 
000016 
000017 
000027 
OOO030 
00003 1 
0O003 1 

KDBDP 



THESE OFFSETS ARE TO STORE SOI I/O INFO AT THE END OF I/O PACKETS *«* 

CURRENT HOST MEMORY TRANSFER ADDRESS (LO) 

CURRENT HOST MEMORY TRANSFER ADDRESS (HI) 

SOI LO CYLINDER # 

SOI HI CYLINDER # 

SOI GROUP NUMBER 

CURRENT HEADER (LBN) LO - OVERLAYS P.BUF4 

CURRENT HEADER (LBN) HI - OVERLAYS P . BUFS 

SOI TRACK NUMBER 

SDI START SECTOR 

SDI INDEX SECTOR 

OP CODE AND FLAGS FOR REAO/WRITE COMPARE 



s 


ADRL 


: P+1S. 


s 


ADRH 


: S.ADRL+1 


s 


CYLL 


= P+1S. 


s 


CYLH 


= S.CYLL+1 


s 


GRUP 


= S.CYLH+1 


s 


LBNL 


= P.BUF4 


s 


LBNH 


= P .BUFS 


s 


TRAK 


■ S.GRUP+1 


S 


SECS 


= S.TRAK+1 


s 


SECI 


> S.SECS+1 


s 


OPFL 


< S .SECI 



KDBSO. MICROCODE.. 22- APR- 1938 



t 
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MSCP END PACKET OFFSETS 



OOO006 
OO0OO7 
OOOOIO 
000020 

00002 1 

00001 2 

00001 3 

0000 1 4 
OO0015 

00001 6 

00001 7 
O00O23 
000024 
00002S 
000026 
000027 
000030 

00003 1 
00003 1 
000020 
OO0O21 
000024 
00002S 
000026 
000027 
000025 

00001 2 
OOOOI 3 
O00014 
0000 IS 
OOOOI 6 
0O0O17 



p 


FLGS 


= P + 4 


FLAGS 






p 


STS 


: P + 5 


END 


PACKET STATUS 


P 


MLUN 


= P + 6 


MULTI-UNIT CODE 




p 


FBBO 


s P+14. 


FIRST BAD BLOCK 


(LO) 


p 


FBB1 


= P.FBBO+1 


FIRST BAD BLOCK 


(HI) 


p 


CMSO 


s P + S . 


COMMAND STATUS 


[LO) 


p 


CMS1 


t P.CMSO+1 


COMMAND STATUS 


[HI) 


p 


UNTO 


= P+ 10 . 


GET 


UNIT 


STATUS 


UNIT IDEN 


p 


UNT 1 


a P.UNTO+1 


GET 


UNIT 


STATUS 


UNIT IDEN 


p 


UNT2 


= P .UNT1+1 


GET 


UNIT 


STATUS 


UNIT IDEN 


p 


UNT3 


= P.UNT2+1 


GET 


UNIT 


STATUS 


UNIT IDEN 


p 


SHST 


■ P+17. 


GET 


UNIT 


STATUS 


SHADOW ST 


p 


TRCK 


= P+18. 


GET 


UNIT 


STATUS 


TRACK SIZ 


p 


GRP 


= P+19 . 


GET 


UNIT 


STATUS 


GROUP SIZ 


p 


CYL 


= P+20. 


GET 


UNIT 


STATUS 


CYLINDER 


p 


USVR 


= P + 21 . 


GET 


UNIT 


STATUS 


UNIT S/W 


p 


RCTS 


= P+22. 


GET 


UNIT 


STATUS 


RCT TABLE 


p 


RBNS 


t P+23. 


GET 


UNIT 


STATUS 


RBNS/TRAC 


p 


RCTC 


= P+23. 


GET 


UNIT 


STATUS 


RCT COPIE 


p 


MED1 


■ P+14 . 


1ST 


WORO 


OF MEDIA TYPE 


p 


MED2 


■ P.MED1+1 


2ND 


WORD 


OF MEDIA TYPE 


p 


UNSO 


= P+18. 


ONL 


NE 8 


SET UNIT CHAR UN 


p 


UNS1 


= P.UNSO+1 


ONL 


NE 8 


SET UNIT CHAR UN 


p 


VSEO 


= P+20. 


ONLINE 8 


SET UNIT CHAR VO 


p 


VSE1 


= P.VSEO+1 


ONLINE 8 


SET UNIT CHAR VO 


p 


RSI 9 


= P+19 . 


RESERVED 


NINETEENTH WORD 


p 


CTMO 


= P + 8 . 


SET 


CONTROLLER 


:har contr 


p 


CSVR 


: P + 9 . 


SET 


CONTROLLER 


:har contr 


p 


CNTO 


■ P+IO. 


SET 


CONTROLLER 


:har contr 


p 


CNT1 


= P.CNTO+1 


SET 


CONTROLLER 


:har contr 


p 


CNT2 


" P .CNT1+1 


SET 


CONTROLLER 


CHAR CONTR 


p 


CNT3 


= P.CNT2+1 


SET 


CONTROLLER 


CHAR CONTR 



TIFIER ( 1ST WORO) 

TIFIER (2ND WORD) 

TIFIER (3RD WORD) 

TIFIER (4TH WORD) 
ATUS 



SIZE 

8 H/W VERSION NUMBERS 
SIZE 



IT SIZE ( L ) 

IT SIZE (HI ) 

L SERIAL NUM8ER (LO) 

L SERIAL NUMBER (HI) 

OLLER TIMEOUT 

OLLER S/W 8 H/W VERSION #S 

OLLER 10 WORD 1 

OLLER ID WORO 2 

OLLER ID WORD 3 

OLLER ID WORD 4 



END PACKET STATUS CODES 



000037 
000040 
000007 
000000 
000001 
000002 
000003 
000004 
OOOOOS 
000006 
000007 
OOOOIO 



ST .MSK 
ST .SUB 

ST SHF 
ST .SUC 
ST . CMD 
ST .ABO 
ST. OFL 
ST . AVL 
ST .MFE 
ST .WPR 
ST . CMP 
ST . DAT 



STATUS/EVENT CODE MASK 

SUB CODE MULTIPLIER 

COMMAND OFFSET RIGHT ROTATE 

SUCCESS 

INVALID COMMAND 

COMMAND ABORTED 

UNIT OFFLINE 

UNIT AVAILABLE 

MEDIA FORMAT ERROR 

UNIT WRITE PROTECTED 

COMPARE ERROR 

DATA ERROR 



c 



KDBDP 
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00001 1 

00001 2 

00001 3 



ST .HST 
ST . CNT 
ST .DRV 



HOST BUFFER ACCESS ERROR 
CONTROLLER ERROR 
DRIVE ERROR 



STATUS SUB-CODE VALUES 



SUCCESS SUB-CODE VALUES 



OOOOOO 
000040 

oootoo 

000400 



SC . NML 
SC .SDI 
SC . SCN 
SC . AOL 



0»ST SUB 
1*ST SUB 
2«ST SUB 
8 «ST.SUB 



NORMAL SUB-CODE 
SPIN DOWN IGNOREO SUB-CODE 
STILL CONNECTED SUB-CODE 
ALREADY ONLINE SUB-CODE 



UNIT OFFLINE SUBCODE VALUES 



OOOOOO 
00004O 
000100 
000400 
000200 



020O0O 

10000 



SC . UNK 
SC . NVL 
SC . IOP 
SC . DIS 
SC . DUP 



SC .WPH 
SC .WPS 



0*ST .SUB 
1 »ST .SUB 
2«ST .SUB 
8.«ST.SUB 
4*ST .SUB 



UNKNOWN UNIT SUB-CODE 

NO VOLUME MOUNTED OR DRIVE RUN/STOP SWITCH OUT 

UNIT INOPERATIVE 

UNIT DISABLED BY FIELD SERVICE 

UNIT IS A DUPLICATE (SUCCESS SUBCODE ALSO) 



WRITE PROTECTED SUB-CODE VALUES 



BIT13 
BIT12 



HARDWARE WRITE PROTECTED 
SOFTWARE WRITE PROTECTED 



OOOOOO 
00O1OO 
000 140 
000340 
000400 
000440 
OOOSOO 
0O0540 
OOOSOO 
0O064O 
0OO7OO 
000740 



DATA ERROR SUB-CODE VALUES (SC.ECC USED FOR MEOIA FORMAT ALSO 

CED ERROR 
SER COMPARE ERROR 
SYNC TIMEOUT 
ERROR (UNCORRECTABLE! 
SYMBOL ECC ERROR 
SYMBOL ECC ERROR 
EE SYMBOL ECC ERROR 
SYMBOL ECC ERROR 
SYMBOL ECC ERROR 
SYMBOL ECC ERROR 
EN SYMBOL ECC ERROR 
HT SYMBOL ECC ERROR 



SC 


FER 


s 0*ST.SUB 


FORC 


SC 


HOR 


s 2*ST.SUB 


HEAD 


SC 


OSY 


: 3*ST.SUB 


DATA 


SC 


ECC 


= 7»ST.SUB 


ECC 


SC 


EC1 


: S.*ST.SU8 


ONE 


SC 


EC2 


= 9.*ST.SUB 


TWO 


SC 


EC3 


■ 10.>ST.SUS 


THRE 


SC 


EC4 


= 11. *ST .SUB 


FOUR 


SC 


EC5 


■ 12.*ST.SUS 


FIVE 


SC 


EC6 


: 13. *ST .SUB 


SIX 


SC 


EC7 


= 14. *ST .SUB 


SEVE 


SC 


EC8 


= 15.»ST.SUB 


EIGH 



MEDIA FORMAT ERROR SUB-CODES 



000240 
000300 



SC. N12 
SC .BAD 



5»ST .SUB 
6*ST .SUB 



NOT S12 BYTE FORMAT 
DISK NOT FORMATTED 



DRIVE ERROR SUB-CODE VALUES 



000040 
000 1 00 
0001 40 

000200 

KOBDP 



SC .STO 
SC . INV 
SC . POS 
S C . RWR 



1*ST.SUB 
2*ST .SUB 
3*ST.SUB 
4*ST.SUB 
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SDI RESPONSE TIMEOUT 
INVALID SDI RESPONSE 
POSITIONER ERROR 
LOST READ/WRITE READY 
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000240 
OO030O 
000340 

000400 



SC 


OCL 


: 5*ST.SUB 


SC 


RRD 


= 6.«ST.SUB 


SC 


ODE 


= 7 . «ST .SUB 


SC 


LVO 


: 8 . *ST . SUB 



LOST DRIVE CLOCK OPERATION 

LOST DRIVE RECEIVER READY 

DRIVE DETECTED ERROR 

RTDS PULSE ERROR/RTDS PARITY ERROR/DATA PULSE ERROR 



CONTROLLER ERROR SUB-CODE VALUES 



00004O 
00010O 
0001 40 



000040 
000100 
000140 
OOO20O 
000240 



SC 


OVR 


-■ 1 . »ST 


SUB 


SC 


EOC 


: 2 .*ST 


SUB 


SC 


CNT 


: 3 ,*ST 


SUB 



SERDES OVERRUN ERROR 

[EC0#1 IEDC ERROR 

[EC0#1 1 INCONSISTENT CONTROLLER STATE 



BUS ERROR SUB-CODE VALUES 



SC 


OOT 


: 1*ST 


SUB 


SC 


OOB 


: 2»ST 


SUB 


SC 


NOM 


: 3»ST 


SUB 


SC 


PAR 


- 4*ST 


SUB 


SC 


ifflP 


: 5*st 


sub 



ODD TRANSFER ADDRESS 

000 BYTE COUNT 

UNI8US NONEXISTANT MEMORY ERROR 

UNIBUS PARITY ERROR 

INVALID MAPPING REGISTER 



MSCP ERROR LOG ATTENTION PACKET AND MESSAGE OFFSETS 



o 



000002 
O0O003 
000004 
OOOOOS 
000006 
000006 
000007 
00OO10 
0000 1 1 
00001 2 
000013 
0000 14 
0000 14 
0000 IS 
OOOOI 6 
0000 17 
OOOOI 6 
0000 17 
000020 
00002 1 
000022 
000022 
000023 
000024 
000025 
000O26 
000027 
000030 
00003 1 
000032 
000O33 



L 


CRFO 


= P+0 


L 


CRF1 


s L .CRFO+1 


L 


UNIT 


= P + 2 


L 


SEO 


: P + 3 


L 


FMT 


= P + 4 


L 


FLGS 


= P + 4 


L 


EVNT 


= P + S 


L 


CNTO 


= P + 6 


L 


CNT 1 


i L.CNTO*! 


i. 


CNT2 


= L .CNT1-M 


L 


CNT3 


' L CNT2+1 


L 


CSVR 


: P+10. 


L 


CHVR 


: L.CSVR 


L 


MLUN 


= P+11. 


L 


BAOO 


• P+12 . 


L 


BAD 1 


: L.BADO-M 


L 


UNTO 


= P+12 . 


L 


UNT1 


• L.UNTO+1 


L 


UNT2 


= L.UNT1+1 


L 


UNT3 


= L.UNT2H 


L 


USVR 


s P+1 6 . 


L 


UHVR 


= L.USVR 


L 


RTRY 


a P+17 . 


L 


VSEO 


= P+1S . 


L 


VSEI 


= L.VSEO+1 


i. 


HORO 


* P+20. 


L 


HORI 


• L.HDRO-M 


I 


SOIO 


• P+22. 


L 


SOI 1 


■ L.SDIOtl 


L 


SDI 2 


: L .SOI 1*1 


L 


SDI3 


= L.SDI2-M 



LO COMMAND REFERENCE NUMBER 

HI COMMAND REFERENCE NUMBER 

UNIT NUMBER 

SE9UENCE NUMBER 

FORMAT 

FLAGS 

EVENT CODE 

CONTROLLER ID WORD 1 

CONTROLLER 

CONTROLLER 

CONTROLLER 



10 WORO 2 

ID WORD 3 

ID WORD 4 
CONTROLLER SOFTWARE REVISION (LO) 
CONTROLLER HARDWARE REVISION (HI) 
MULTI-UNIT CODE 
HOST MEMORY ADDRESS LO 
HOST MEMORY ADDRESS HI 
UNIT ID WORD 1 
UNIT ID WORD 2 
UNIT ID WORD 3 
UNIT ID WORD 4 

UNIT SOFTWARE REVISION (LO) 
UNIT HARDWARE REVISION (HI) 
RETRY COUNT 

VOLUME SERIAL NUMBER (LO) 
VOLUME SERIAL NUMBER (HI) 
HEADER (LO) 
HEADER (HI) 
SDI STATUS WORD O 
SDI STATUS WORD 1 
SDI STATUS WORD 2 
SDI STATUS WORD 3 



KDBDP 
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PAGE 058 



OO0034 

00003S 



SDI4 
SOIS 



L .SO I 3* I 

L . S0I4»I 



SDI STATUS WORD 
SOI STATUS WORD 



040000 
000400 
100000 



LP . CON 
LF .SNR 
LF .SUC 



LOG PACKET FLAGS 



BIT06*2S6 . 
BIT00125S . 
BIT07*2S8 . 



OPERATION CONTINUING FLAG 
SEQUENCE NUMBER RESET FLAG 
OPERATION SUCCESSFUL FLAG 



o 



MSCP PACKET CONTROLLER TO HOST OP CODES 



VIRTUAL CIRCUIT 



O0O100 
OOOIOI 
000102 
OOO200 



OP 


AVA 


= 100 


OP 


DUP 


- 101 


OP 


ACP 


: 102 


OP 


END 


: 200 



AVAILABLE ATTENTION MESSAGE 

DUPLICATE UNIT NUMBER ATTENTION MESSAGE 

ACCESS PATH ATTENTION MESSAGE 

END PKT FLAG OR UNRECOGNIZED COMMAND END 



VIRTUAL CIRCUIT 1 



oooooo 

0OOOO1 

000002 
000003 



FM. CNT 
FM. BAO 
FM. OSK 
FM.SDI 



ERROR LOG FORMAT 1 (CONTROLLER ERROR) 

ERROR LOG FORMAT 2 (UNISUS ACCESS ERROR) 

ERROR LOG FORMAT 3 (DISK TRANSFER ERROR) 

ERROR LOG FORMAT 4 (SDI ERROR) 



MSCP PACKET MODIFIER COOES 



1 OOOOO 
040000 
020000 
O20000 
1 0000 
OO4000 
002000 
001000 
000400 
000200 
000 100 
000040 
000020 
000020 
000002 

00000 1 

00000 1 
000002 
000004 
OOOOO 1 
000001 



MO 


EXP 


■ BIT1S 


MO 


CMP 


= 8IT14 


MO 


CSE 


i BIT 1 3 


MO 


NOV 


= BIT 13 


MO 


ERR 


: BIT 1 2 


MD 


SCH 


■ BIT1 1 


MO 


SCL 


• BIT10 


MD 


SEC 


= BIT09 


MD 


SER 


: BITOS 


MD 


SSH 


= BIT07 


MD 


WBN 


= BITOS 


MD 


WBV 


• BITOS 


MD 


SEO 


= BIT04 


MD 


SHD 


= BIT04 


MD 


ALL 


•- BIT01 


MD 


SPO 


■ BITOO 


MD 


FEU 


= BITOO 


MD 


VOL 


s BITOI 


MD 


SAV 


: BIT02 


MD 


NXU 


s BITOO 


MO 


RIP 


= BITOO 



EXPRESS R 
COMPARE M 
CLEAR SER 
[CONTROLL 
FORCE ERR 
SUPPRESS 
SUPPRESS 
SUPPRESS 
SUPPRESS 
SUPPRESS 
WRITE BAC 
WRITE BAC 
WRITE SHA 
SHADOW UN 
ALL CLASS 
SPIN OOWN 
FLUSH ENT 
VOLATILE 
SUPPRESS 
NEXT UNIT 
ALLOW SSL 



EOUEST MODIFIER 
ODIFIER 

OUS EXCEPTION 
ER1N0 SEEK OVERLAP MODIFIER 
OR MODIFIER 

CACHING (HIGH) [ras02] 

CACHING (LOW) |rae02] 

ERROR CORRECTION MODIFIER 
ERROR RECOVERV MODIFIER 
SHAOOWING [rae021 

(NON-VOLATILE) Iraa02] 
(VOLATILE) Irae02] 

SET ONE UNIT AT A TIME (rae02) 
IT SUPPLIED (ERROR ON CONTROLLER) 



DRIVERS 
MODIFIER 

IRE UNIT 
ONLY 



Irae02| 



[rae02| 
[rae02l 



AVAILABLE ATTENTION MSG MODIFIER 
MODIFIER 
DESTRUCTION MODIFIER 
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000004 
OOO002 
OOOOO 1 
00000 1 
000040 



MD 


SWP 


* BIT02 


MD 


IMF 


a BITOI 


MD 


PRI 


= BITOO 


MD 


FKC 


= BITOO 


MD 


EXC 


= BITOS 



SET WRITE PROTECT 

IGNORE MEDIA FORMAT ERROR MODIFIER 

PRIMARY REPLACEMENT MODIFIER 

Flush Encrypt i on/Ooepypt i on Key Cache [chio] 

Exclusive Access (unit) [chio] 



END PACKET FLAGS 



1OOO0O 
040000 
020000 



EF.BBR : : BIT 15 
EF.BBU : : BIT14 
EF . LOG : s BIT13 



BAD BLOCK REPORTED 
BAD BLOCK UNREPORTED 
ERROR LOG GENERATED 



REFERENCES WITHIN THE SDI INTERCONNECT CONTROL BLOCK 



SDI .ST : I O 



STATUS OF SDI INTERCONNECT 



SDI INTERCONNECT STATUS FLAG EQUATES 



OOOOO 1 
000002 
000004 
OOO01O 
000020 
000040 
OOOIOO 
000200 
OOO40O 
00 1000 
002000 
004000 
O1O0O0 



0OOOO1 
KDBDP 



PKIP 


: BITOO 


SEEK 


« BITOI 


DERR 


= BIT02 


VECT 


= BIT03 


BFRO 


■- BIT04 


SUSP 


= BIT05 


BFSV 


= BIT06 


XCMP 


: BIT07 


DATT 


: BIT08 


GSEL 


: BIT09 


ORDUP 


= BIT10 


DRVOL 


: BIT1 1 


DRAVL 


: BIT 1 2 



SDI SI : = SDI . 3T-M ; 
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NO 

NO 

NO 

VEC 

OK 

TASK RU 

OK, 



PKT, 

SEEK 

ERRO 

CTOR 

1 



O = OK, 
O : OK, 
MOD I FIE 
ORDUP, 

000 » D 

001 : D 
O10 = D 
01 1 s 

100 = D 

101 = N 
1 10 = N 
111 s D 
O : NOP 
IN AOOI 
DETERMI 
O • NO 
IN ADOI 
TO FORC 
O : NO 
IF THIS 
THEN RE 



1 
S " 
DRVO 
RIVE 
RIVE 
RIVE 
RIVE 
RIVE 
OT U 
OT U 
RIVE 
, 1 t 
TION 
NING 
ERROR 
TION 
E INI 
REVEC 

BIT 
VECTO 



1 
NE 

R, 

LEV 
BU 

NNI 
SU 
TR 
DR 

EEK 

L , 



SED 
SEO 



PACKET IN PROGRESS 
EDEO, 1 = SEEK INITIATE NEEDED 
1 i FATAL ERROR ON I/O COMMAND 
EL DONE, 1 = STATE VECTOR LEVEL ACTIVE 
FFER CONTROL BLOCKS NEEDED 
NG, 1 : TRANSFER TASK SUSPENDED 
FFER SERVICE REQUIRED FROM U.PROC 
ANSFER TASK COMPLETED 
IVE ATTENTION PENDING 
"; OiSEEK, IrGROUP SELECT ONLY 
AND DRAVL ARE ENCODED AS FOLLOWS: 
LINE 

LINE AND DUPLICATE 
FLINE AND NOT USABLE 
FLINE AND DUPLICATE 
AILABLE (SPINABLE OR NOT SPINABLE) 



: IE121 ] 



FFLINE AND UNKNOWN TO CONTROLLER 

SEND LOG OR ATTENTION PKT TO HOST 

LAT IS USED AS A FLAG TO AID IN 

F A DRIVE IS ALREADY ONLINE TO THE CONTROLLER 

RECOVERY, 1 < LEVEL RECOVERY ACTIVE 

RRIP IS USED AFTER INITIALIZATION 

TO ALL DRIVES 
ORING REQUIRED, 1 : REVECTORING REQUIRED 

1 AND "RVCSDI" POINTS TO THIS SOI BLOCK, 
ING IS IN PROGRESS FOR THIS DRIVE. 



HEADER COMPARE SEARCH LIMIT 
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000002 
OO0OO3 
OO0OO4 
OO0OO5 
OO0O08 
OO00O7 



POINTER TO CURRENTLY ACTIVE UNIT CHARACTERISTICS 

STATE WORD - MSCP END STATUS/ERROR LOG CODE 

SDI INTERCONNECT ACKNOWLEDGE/COMMAND TIMER 

U.PROC GROUP WORD (USED BY U.CPRM) 

ADDRESS OF U.PROC'S BUFFER CONTROL BLOCMFOR I/O) 

ADDRESS OF D.PROC'S BUFFER CONTROL BLOCMFOR I/O) 

NOTE - THE FOLLOWING 4 WORDS ( SO I . I T , SD I . C L , SD I . CH , SD I . GP ) ARE USED TO SEND 
THE SDI LEVEL 2 SEEK COMMAND DIRECTLY FROM THE SDI CONTROL BLOCK 



SDI 


CP 


s 


SDI 


SL + 1 


SDI 


SW 


i 


SDI 


CP+1 


SDI 


TM 


i 


SDI 


SW+1 


SDI 


UG 


i 


SDI 


TM+1 


SDI 


UB 


9 


SDI 


UG+I 


SDI 


DB 


: 


SDI 


UB+1 



OO0O1O 
O000 1 1 

0000 1 2 

0000 1 3 

0000 1 4 
OO0O1 s 
0000 1 B 



SDI 


t T 


SDI 


CL 


SDI 


CH 


SDI 


GP 


SDI 


ss 


SDI 


XL 


SDI 


XH 



SDI 


08+1 


SDI 


1T+1 


SDI 


CL + t 


SDI 


CH+1 


SDI 


GP+1 


SDI 


SS+1 



= SDI .XL + 1 



TEMP WORD (USEO FOR ERROR LOG/ATTN CODE. SEEK COMMAND) 

CURRENT CYLINDER ADDRESS LO (FORMS SEEK COMMANO ) 

CURRENT CYLINDER ADDRESS HI (FORMS SEEK COMMANO) 

CURRENT GROUP NUMBER (FORMS SEEK COMMAND) 

* OF SECTORS TO TRANSFER BEFORE SEEK REOUIREO 

LO NUMBER OF BYTES REMAINING TO BE TRANSFERRED 

HI NUMBER OF BYTES REMAINING TO BE TRANSFERRED 



SOI CONTROL BLOCK ERROR STATE CONTROL WORDS »»» 



OO00 17 
OO0020 

000377 
001400 



007400 
03B000 
OO200O 
OO4OO0 
1 0000 
0200OO 
040000 

100000 

00002 1 
000022 
000023 
000024 

OO0025 
OO002 6 
00000 1 
000002 

O000O4 

OO0O2O 

000040 



SDI . El 
SDI . EO 



SDI . XH+1 

SDI . El +1 



SDI . SV 

SDI .PO 
SDI .RO 

SDI OE 

SDI . OM 

5DI.ES 



ERRVEC 
LV2CNT 



RETCNT 
IORTY 



: SDI . EO+1 
a SDI .SV+1 
a SDI . PQ+1 

a SOI . RO+1 

: a SOI . 0E+ 1 

: a SDI . 0M+ 1 
RVWRIT 
OFFTRK 
FSEEK 



RVACTV 
URETRY 



LEVI 
USEI 
LEVI 
USEI 
AND 



FOR 
FOR 



: a LOBYT 
: a 1 400 



: a 7400 
: a 3 6000 

IOCNT 
IOSEK 
IOCLK 
IORWR 
: a BIT14 



T10 
T1 1 
T12 
T13 



ERRO 
REA 

ERRO 
SDI 

READ 

ERRO 

a 

SDI 

INCR 

USED 

I/O 

I/O 



STA 

RET 

STA 

LEVE 

WRIT 

STA 

LEVEL 

LEVEL 

EMENT 

WITH 

RETRY 

RETRY 



BIT1S 



SDI 
POI 
ROT 

SOI 
a 
STO 

SDI 



LEVE 
NTER 
ATION 

OVER 

DISA 
RAGE 

EXTE 



USED 
O a 
USED 

2 
TO 

AL 
LAP 
BLE 
FOR 
NDED 



NO IN 

WITH 
NO RE 

WITH 
FUNCT 
EAD 
PTIMI 
ENABL 

1 a 
CURRE 

STAT 



BITOO 
BIT01 
BIT02 
BIT03 
BIT04 
BIT05 
BIT06- 



TE CONTROL 
RIES (EDC 
TE CONTROL 
L 2, I ERRO 
E, COMPARE 
TE VECTOR 

INACTIVE. 

TWO RETRY 

RETRY COU 

SDI . EO 

COUNT (US 

INDICATOR 
EAO/WRITE 
EEK ERROR 
RIVE CLOCK 
/W ROY OR 
IT DONE, 1 

SDI .EO 
COVERY, 1 

SDI . EO AN 
ION STATE 
F CONTROL 
2ATI0N COU 
E FLAG; 
A L L OW , 
NT MSCP PK 
US 

EVECTOR WR 
EEK REOUIR 
ORCE SEEK 
OT USEO 
EVECTORING 
.PROC RETR 
NUSEO 



WORO 
AND ECC ERRORS) 

WORD 
RS 

DRIVE ERROR RETRIES 
(SDI . EO AND SOI .El ) 

NEO O a LEVEL ACTIVE 

COUNT (2 BITS LONG) 
NT WITH AOOC #377, REG 

ED WITH SOI . EO) 

FLAGS 
RETRY INDICATOR (taLAST RETRY) 
IRECAL , RESEEK IN RECOVERY) 

TIMEOUT ERROR UNIT, RESEEK IN RECOVERY) 
SERDES LATE ERROR (RETRY I/O IN RECOVERY) 

a INIT DONE ON RECOVERY 

a RECOVERY IN PROGRESS 

SDI . El 

VECTOR 

BLOCK MSCP PACKET QUEUE 

NT 

D.PROC SAW LAST BUFFER 
T PTR WHILE OVERLAPPING 

ITE FLAG FOR U.BFLC 

ED DUE TO ERROR RECOVERY LEVEL USED 

FLAG 

ACTIVE 
IN PROCESS 
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O77400 
100000 



FAIRCT 

ELEV 



BIT0S-BIT14 

77400 

BIT 15 



SEEK FAIRNESS COUNTER 
SEEK FAIRNESS COUNT MASK 
SEEK ELEVATOR FLAG 



0O0027 
OO0O30 
00003 1 
OOOQ32 



SDI BL 

SOI BH 

SO] tL 

SDI RH 



SDI .ES+1 
SDI . BL + 1 
SDI .BH+1 
SOI . RL+t 



LO BAD BLOCK DETECTED (CLEAR IN U.ALOC) 

HI BAD BLOCK DETECTED (CLEAR IN U.ALOC) 

LO LBN OF PRIMARY RBN 

HI LBN OF PRIMARY RBN 



START OF DRIVE GENERAL CHARACTERISTICS (SOI V3.7, I5-JUNE-81) 



Q 
< 

o 

I! 

s 

cc 

o 

Li. 
</} 

o 
to 



000033 
0O0033 

00003 4 
000034 
100000 
000035 
OO0035 
OO0036 
1O0OOO 
OO0O37 
O0004O 
OO0O4 1 

00004 2 
000043 
000010 



010000 
020000 
O400O0 
100000 
170000 

000044 



SOI . TO 
SDI XR 
SDI . LT 

SOI sc 

SOI .ER 
SOI EC 
SOI RS 

SDI . I 1 

SOI . 12 
SDI . 13 
SDI . TI 

SOI UE 

SOI DL 



a SDI 
a SDI 
a SDI 
a SDI 
UNC .SS 
SDI 
SDI 
SDI 
FDIAG 
SDI 
SDI 
SDI 
SDI 
SDI 
<SD 



.TO+1 
. LT 

. LT+1 
. ER 
. ER+1 

. RS+1 
.11 + 1 
.12+1 
.13+1 
. TI + 1 
I . TI + 



LD BYTE a SHORT T.O. (10) /SDI VERS (HI) 
HI BYTE a TRANSFER RATE 

LO BYTE a LONG T.O. (L01/RETRY # (HI) 
HI BYTE a RCT COPIES ( L ) /RESERVED (HI) 

; O a 512 BYTE ONLY, 1 a 512 OR 576 BYTE SECT 
LO BYTE a ERROR RECOVERY LEVELS 
HI BYTE a ECC ERROR THRESHOLD 
HARDWARE REV I S I ON #( H I ) /SOFTWARE REVISION >|L0I 

; 1a LIMITED OIAG, O a FULL DIAG SUPPORT 
UNIQUE DRIVE ID #1 
UNIQUE DRIVE ID #2 
UNIQUE DRIVE ID *3 

DRIVE TYPE IDENTIFIER (L01/0RIVE REVS/SEC (HI) 
END OF CONTROLLER CRITICAL ORIVE COMMON CHARACTERISTICS 
T0>; LENGTH OF DRIVE COMMON CHARACTERISTICS 



[E 1 21 ) 



START OF SDI STATUS STORAGE (7 WORDS) »«* 

:a SOI.UE ; SDI STATUS WORO O (UNIT NUMBER INFORMATION) 

; *---.- .-..__....._._..................... ...... ...... 

; * ORIVE STATUS UNIT WORO SIT DEFINITIONS 



DRV 


U1 




a BIT12 


ORV 


U2 




a SIT13 


DRV 


U3 




a BIT14 


ORV 


U4 




a SIT1S 


DRV 


SU 




a <DRV. 


: a SDI 


u 


(+1 



' a NO SUBUNIT , 

> a NO SUBUNIT, 

> a NO SUBUNIT, 
< a NO SUBUNIT , 

<DRV.U1+0RV.U2+DRV.U3+0RV.U4>; 



SDI STATUS WORD I 



1 a SUBUNIT PRESENT 
1 a SUBUNIT PRESENT 
1 a SUBUNIT PRESENT 
1 a SUBUNIT PRESENT 
SUBUNIT MASK 



DRIVE STATUS 1ST WORD BIT DEFINITIONS 



00000 1 
OOO0O2 

OO0O1O 
000020 
000040 
000 1 00 

KDBOP 



ORV 


RU 


z 


BITOO 


ORV 


PS 


a 


BITOI 






a 


BIT02 


ORV 


EL 


a 


BIT03 


DRV 


SR 


s 


BIT04 


DRV 


OR 


» 


BITOS 


ORV 


RR 


= 


BIT06 



O a RUN/STOP SWIT OUT, 

O a PORT SWITCH OUT, 1 

NOT USED 

a NO ACTION 



a RUN/STOP SWIT 
PORT SWITCH IN 



a PLEASE SENO A LOG PACKET 
SPINDLE NOT AT SPEED, 1 a SPINDLE AT SPEED 
NO OIAG REQ'O, 

NO READ J REQ'O , 



1 a DIAGNOSTIC LOAD REO'D 
1 a READJUSTMENT REQ'O 
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000200 
O0040O 
00 1000 
002000 
004000 

otoooo 

020000 
040000 
100000 

000045 



ORV . 

DRV . 
DRV . OB 
DRV . FO 
DRV . OD 

DRV .W1 

DRV .W2 
DRV.W3 

DRV ,W4 
SDI ,S2 



.S7 



BITOT 

bitos 

BIT09 
BIT10 
BIT1 1 
BIT12 
B I T 1 3 
BITI4 
BIT15 
SOI .S 1+1 



0..1 ONLINE/AVAILABLE, I i ONLINE TO OTHER PORT 



SI2 BYTE SECTOR, 

O = NO DIAG CVL ACCESS 

O : NO FORMATTING, 1 > 

O s DRIVE ENABLED, I < 

O = W.P. SWITCH OUT, 1 

O : W.P. SWITCH OUT, 1 

O i W.P. SWITCH OUT, 1 

= W.P. SWITCH OUT, I 

SOI STATUS WORD 2 



* S76 BYTE SECTOR 

1 s YES DIAG CYL ACCESS 
FORMATTING ENABLED 

ORIVE DISABLED FOR DIAGNOSTICS 
» W.P . SWITCH IN 



W.P . 
W.P . 



SWITCH IN 
SWITCH IN 
SWITCH IN 



b 



000010 
000020 
000040 
000100 
000200 
OO0 17O 

000400 
00 1000 
002000 
004000 
010000 
020000 
040000 
100000 
170000 



•LOWER BYTE OF S0I.S2 IS STATUS ERROR BYTE 



ORV .WE 
ORV .OF 
ORV . PE 
DRV .RE 

ORV OE 
OCMASK 

ORV . C4 
DRV . C3 
DRV . C2 
DRV . CI 

DRV SI 
ORV .S2 
DRV . S3 
DRV ,S4 
ORV .SN 



BITOO 

BIT01 
BIT02 
BIT03 
BIT04 
BITOS 
BITOS 
BIT07 
<DRV .WE 

BITOS 
BITOS 

SIT 10 
BIT1 1 
BIT12 
BIT13 
BIT 1 4 
BIT1S 
0RV.S1+ 



NOT USED 

NOT USED 

NOT USED 

■ OK. 



1 



I = INIT D 

I = OK, 1 

I -- OK, 1 

I a OK, 1 

♦ORV .DF+ORV .PE+ORV 

DRIVE CLEA 

CONTROLLER 

CONTROLLER 

CONTROLLER 

CONTROLLER 

CONTROLLER 

CONTROLLER 

CONTROLLER 

CONTROLLER 

DRV .S2+DRV .S3+DRV 



* WRITE LOCK ERROR 

IAG OK, 1 < INIT DIAG FAILURE 

= PROTOCOL ERROR 

= RETRYASLE ERROR- RE I SSUE COMMAND 

s DRIVE ERROR 

RE> 
R COMMAND ERROR CLEAR MASK 



STATUS 
STATUS 
STATUS 
STATUS 
STATUS 
STATUS 
STATUS 
STATUS 



IGNORED 
IGNORED 
IGNORED 
IGNORED 



DRI VE 
ORIVE 
DRIVE 
DRIVE 



- IGNORED BY ORIVE 

- IGNORED BY ORIVE 

- IGNORED BY ORIVE 

- IGNORED BY DRIVE 



S4 



MASK FOR TESTING S BITS 



*«» SDI CONTROL BLOCK PRIVATE ATTENTION PACKET *»* 

•«• NOTE - BIT OF THE PACKET CONTROL WORD ADDRESS DIFFERENTIATES BETWEEN 

**« ATTENTION PACKETS AND NORMAL MSCP PACKETS, I.E. BIT : 1 MEANS IT IS 

»«« AN INTERNAL ATTENTION PACKET AND BIT O < MEANS IT IS A MSCP PACKET. 



000046 
000047 
000050 
OOOOS1 
000052 
000053 
000054 
000055 



SOI AT 
SOI . 2T 

SDI . St 
SDI .SS 
SDI . SG 

SOI S7 

SOI OP 
SOI .PL 



SOI S2+1 
SDI . AT+1 
SDI . AT+P .CRFO 
SDI . AT+P .CRF1 
SDI .AT+P UNIT 
SOI .AT+P .RS03 
SOI .AT+P . OPCO 
SOI .AT+P .MOO 
SOI .AT+8. 



ATTENTION PACKET CONTROL WORD 
2ND TEMP WORD 
UNUSED IN ATTN PKT 
UNUSED IN ATTN PKT 
UNUSED IN ATTN PKT 



ATTENTION VIRTUAL CIRCUIT NOT NEEDED 

SOI EXTENDED STATUS 

EXTENDED STATUS 

EXTENDED STATUS 

EXTENDED STATUS 



SOI 
SOI 



UNUSED IN ATTN PKT - 
USED FOR ATTENTION/GET STATUS INTERNAL OP CODE 
WRITE PRELOAO COUNTER (NOTE MSB MUST BE ZERO! 
LENGTH OF SDI CONTROL BLOCK 



START OF SUBUNIT CHARACTERISTICS BUFFER »*« 



SDI .CW 
SDI . CW 



s O 

= SDI .PL+1 



BITS 15 



SUBUNIT BUFFER CONTROL WORD 
[VOS1SUBUNIT BUFFER CONTROL WORD 

; SUBUNIT CODE (0001,0010,0100,1000) 
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004000 
002000 



ORV . AV 

DRV .AT 



DRV . UM 
; IF SDI 



» BIT11 ; O > SUBUNIT ONLINE, 1 : SUBUNIT AVAILABLE 

= BIT10 ; O s ATTENTION SENT, 1 = NEED TO SEND ATTENTION 

BITS 9-0 ; UNIT NUMBER (0 - 1023) FOR THIS SUBUNIT 
s DRV . SU ! ORV . AT ! ORV . AV; UNIT NUMBER MASK (USE WITH 'SIC') 

CW IS ZERO THEN IT IS AVAILABLE, OTHERWISE IT IS IN USE. 



OOOOS7 
000060 



SDI .SO 
SDI . UF 



SDI. CW+ 1 
SDI SD+1 



PARENT SDI CONTROL BLOCK POINTER 
UNIT FLAGS FOR MSCP PACKET 



UNIT FLAG BIT DEFINITIONS 



100000 
020000 
OIOOOO 
OOO200 
000004 
000002 
000001 
000003 



UF . RPL 
UF .WPH 
UF .WPS 
UF . RMV 
UF .576 
UF .CMW 
UF . CMR 

UF . MSK 



BIT1S 
BIT13 
BITI2 
BIT07 
BIT02 
BIT01 
BITOO 
<UF. CMW+UF .CMR> 



NO HOST BBR ON THIS UNIT 

WRITE PROTECTED HARDWARE 

WRITE PROTECTED SOFTWARE 

REMOVABLE MEDIA 

VOLUME MOUNTED HAS 576 BYTE SECTORS 

COMPARE ON ALL WRITE OPERATIONS 

COMPARE ON ALL READ OPERATIONS 



00006 1 
000062 
000063 
000064 
0O0O65 
00006S 
000067 



SDI . V1 
SDI . V2 
SDI . H1 
SOI .H2 
SOI GC 
SOI .TG 
SDI .RT 



: SDI 

! SDI 

> SDI 

: SOI 

= SOI 

: SDI 

: SDI 



UF+1 
V1 + 1 
V2+1 



GC+1 
TG+1 



VOLUME SERIAL NUMBER WORD 1 

VOLUME SERIAL NUMBER WORD 2 

LO ORDER LBN SPACE IN CYLINDERS 

HI ORDER LBN SPACE IN CYLS (LOI/HI CYL * (HI) 

GROUPS PER CYL (LOI//HI START LBN (LOI/HI START XBN (HI) 

TRACKS PER GROUP (LOI//HI START RBN (LOI/HI START DBN (HI) 

# REPLACEMENTS PER TRACK, RM FLAG ( L ) /RESERV ED (HI) 



SUBUNIT CAPABILITIES BIT DEFINITIONS 



000200 
000070 
00007 1 
000072 
000073 
0OOO74 
OO0074 
00007S 
00OO76 
000077 
000100 
000101 





UNC .RM 




SDI 


DP 


■ SDI 


RT 


SOI 


M1 


= SOI 


DP 


SDI 


M2 


= SDI 


M1 


SOI 


FC 


3 SOI 


M2 


SDI 


12 


■ SOI 


FC 


SDI 


GO 


-- SOI 


1 2 


SDI 


L 1 


: SOI 


GO 


SOI 


L2 


: SDI 


L 1 


SDI 


RV 


= SDI 


L2 


SOI 


PH 


= SOI 


RV 


SDI 


LL 


= SOI 


PH 



NO REMOVABLE MEDIA, 



1 



REMOVABLE MEDIA 



DATA PREAMBLE SIZE (LOI/HEAOER PREAMBLE SIZE (HI) 
MEOIA TYPE LO ORDER 
MEDIA TYPE HI ORDER 
FCT COPY SIZE IN XBNS 
# 512 BYTE LBNS PER TRACK (LO) 
GROUP OFFSET (HI) 
LBN'S IN HOST AREA (LO) 
LBN'S IN HOST AREA (HI) 
RCT SIZE IN LBN'S 
;[V051 TEMP FOR PRIMARY HDR DURING REVECT 
LENGTH OF UNIT CHARACTERISTICS 



HOST MAPPING INFORMATION 



000101 
OOO 1 02 
OOO103 



MAP . CH 
MAP . NX 
MAP .MO 



SOI . PH+1 
MAP . CH+ 1 
MAP . NX+1 



;PTR TO START OF PTE CACHE 

;PTR TO CURRENT PTE ENTRY 

.ADDRESS OF NEXT UNREAD PTE IN HOST MEM LOW 
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o 



000 104 
0OO105 
0OO106 
000107 

0001 10 

0001 1 1 

0001 t 2 
OOOI t 3 
OOO 1 1 4 
000 1 1 5 
000 1 1 6 
00O12O 



MAP 


M1 


" MAP 


MO+1 


MAP 


RO 


: MAP 


M1 + 1 


MAP 


UR 


: MAP 


RD-M 


MAP 


OF 


: MAP 


UR+1 


MAP 


SI 


: MAP 


OF+1 


MAP 


vo 


= MAP 


S 1 + 1 


MAP 


VI 


= MAP 


VO-M 


MAP 


V2 


= MAP 


V 1 + 1 


MAP 


V3 


= MAP 


V2+1 


MAP 


ST 


= MAP 


V3* 1 


MAP 


NO 


= MAP 


ST+1 


SOIB. L 


= MAP 


ND + 2 



ADDRESS OF NEXT UNREAD PTR IN HOST MEM HIGH 

NUMBER OF CACHED 8UT UNUSED PTE'S 

NUMBER OF REMAINING UNREAD PTE'S FOR THIS REQ 

OFFSET INTO PAGE 

SEGMENT 1 SIZE 

LOW ORDER MAPPING REGISTER NUMBER 

HIGH ORDER MAPPING REGISTER NUMBER 

LOW ORDER MAPPING BASE ADDRESS 

HIGH OROER MAPPING BASE ADORESS 

STATUS -- 1 = MAP INIT DONE, O : NOT DONE tkjkl 

END OF MAPPING INFORMATION 

[V05] LENGTH OF SOI CONTROL BLOCK PLUS EXTRA 



DATA BUFFER CONTROL BLOCK DEFINITIONS 



; POINTER TO NEXT DATA BUFFER CONTROL BLOCK 
DATA BUFFER USE FLAGS (UPPER 2 BITS OF BUF.NL) 



lOOOOO 
040000 



BLAST 
BFULL 



: ■ BIT 1 5 
: = BITII 



BUF.ST it BUF.NL+1 



i.O ■ CONTINUE, 1 : LAST BUF/SEEK REO 
; = BUFFER EMPTY, 1 = BUFFER FULL 



BUFFER CONTROL BLOCK STATUS WORD 



BUFFER CONTROL BLOCK STATUS BIT DEFINITIONS 



100000 
040000 
020000 
1O0O0 
004000 
0O2OO0 
00 1000 
000400 

000040 
000020 
OOO010 
000004 
000002 
OOOOO t 

OO0002 
00O0O3 
000004 
OOOOOS 
OO00O6 
000007 

KDBDP 



BUF . BP 
BUF. HL 
BUF. HH 
BUF. TA 
BUF.SD 
BUF.UA 



BRTRY 

BLSTB 

SECER 

BECC 

BGOOD 

BDSNF 

BLRWR 

BERDN 

BRCTS 

BRARS 

BMAPDN 

BNXCOP 

BCGRP 

BGRUP 



BIT1S 

BIT14 

BIT13 

BIT12 

BIT1 1 

BITIO 

BIT09 

BIT08 

BITS 7-6 

BITOS 

BIT04 

BIT03 

BIT02 

BIT01 

BITOO 



BUF .ST+1 
BUF. BP+1 
B U F . H L + 1 
BUF.HH-H 
BUF.TA+1 
BUF.SDtl 



NORMAL, 1 . U.PROC READ RETRY 

NOT LAST, 1 = RETRY REALLY IS LAST BUFFER 

NORMAL, 1 • FATAL ECC ERROR, BUT GIVE BEST GUESS DATA 

NO ECC ERROR, 1 ■ ECC ERROR 

NO HEADERS OK, 1 ■ AT LEAST 1 HEADER OK 

NO DATA SYNC ERR, 1 • DATA SYNC NOT FOUND [EERREC] 

NO RD/WR ROY ERR, 1 i LOST RD/WR ROY [EERREC] 

NO ERR REC CMO ISSUED, 1 = ERR REC CMD ISSSUED [EERREC1 

USED 

RCT HAS NOT BEEN SEARCHED, t : HAS SEEN SEARCHED [EERREC! 

RCT HAS NOT ALREADY BEEN SEARCHED, 1 : HAS ALREADY BEEN SEARCH 

MAPPING NOT DONE, 1 : MAPPING DONE 

FATAL ERROR. 1 = READ NEXT RCT COPY 

SELECT GROUP NOT OONE. 1 '■ SELECT GROUP OONE 

NO ACTION, I : SELECT GROUP 



DATA BUFFER POINTER 

1ST WORD OF EXPECTED HEAOER 

2ND WORD OF EXPECTED HEAOER 

TRACK ADDRESS AND I/O COMMANO THIS SECTOR 

POINTER TO PARENT SDI CONTROL BLOCK 

HOST ADDRESS SITS 15-0 [FOR THIS SECTOR) 
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OOO010 

00001 1 

OOOOI 2 
0O00 1 3 
0000 1 4 



BUF . US 
BUF . GP 

BUF . BC 
BUF . Ul 
BUF . U2 
; SUP . U3 
BUF . LL 



BUF .UA+1 
BUF .US+1 

BUF . GP + 1 
BUF .BC+1 
BUF .U1+1 
BUF .U2+1 
BUF .U2+1 



IBDA] BI ADDR BITS 16/30 -> BITS <0.13> 

(BOA] GROUP FOR THIS SECTOR -> BITS <0.7> 

[BDA1 2ND SEGMENT WORO COUNT -> BITS <8.IS> 

[BOA] BYTE COUNT FOR U.PROC [TO/FROM HOST) 

2ND SEGMENT HOST ADDRESS LOW 

[BDA12N0 SEGMENT HOST ADDRESS HIGH -> BITS <0,13> 

IBDA] BYTE COUNT FOR SECOND SEGMENT -> BITS <0.a> 

[B0A1BUFFER CONTROL BLOCK LENGTH 



DATA BUFFER DEFINITIONS 



OOOOOO 
000400 
00040 1 
0004 IS 



BUF . 56 
BUF . ED 
BUF. EC 
BUF . DL 



BUF . 56+SECSZ 
BUF.EDft 
BUF . EC+12 . 



START OF 256 WORD DATA BUFFER 

DATA ERROR CORRECTION CODE (EDO 

START OF 12 WORDS HOLDING 17 PACKED ECC SYMBOLS 

DATA BUFFER LENGTH 



*********** END BUFFER MAP DEFINITIONS ********** 



SUBUNIT CHARACTERISTICS, 
BUFFER CONTROL BLOCK, 
SDI INTERCONNECT CONTROL BLOCK, 
BUFFER ALLOCATION 






000200 
00O05 1 



000010 
00OOO4 
001352 

OOOOOO 
00 1 355 
001 355 

OOOOOO 
001355 
001475 
001 SI 5 
001735 
002055 
005255 
00S255 
005 67 2 
033317 
033317 
033737 

OOOOOO 
034000 



NBCB 
NBUFR 



NSCB 
NSDI 
DM. BEG 



SDI . 1 
SDI . 2 
SDI . 3 
SDI . 4 
BUFBEG 
BUFENO 
BUFR1 . 
3UFR2 . 
OATEND 
STCACH 
ENCACH 

ASSUME 
ALGADR 



32 *4 

41 . 



4 . 
1352 



[BDA1NUMBER OF BUFFER CONTROL BLOCKS 

[ c h04 ] N umber of data buffers that are dynamically 
allocated. Buffer NBUFR+1 (ie. buffer 42) 
is reserved for use by the comparison routine. 

NUMBER OF SUBUNIT CHARACTERISTICS BUFFERS 

NUMBER OF SDI INTERCONNECTS 

DM MACHINE MUST START AT 1352 1,1 I ! ! I ! 



ASSUME PKTEND, LE.OM.BEG; MAKE SURE PACKETS DON'T INTRUDE ON DM SPACE 

UN. BUF ;:- DM.BEG+3 : START OF SUBUNIT CHARACTERISTICS BUFFERS 

SDIBEG = <UN . BUF3 17777BX-1 ; IV051START OF SDI CONTROL BLOCKS (ODD) 

ASSUME <SDIBEG3B I T00> , EO, 1 ; MAKE SURE START IS ODD 



SDIBEG ; START OF SDI INTERCONNECT #1 CONTROL BLOCK 

S0I.1+SDIB.L ; START OF SDI INTERCONNECT #2 CONTROL BLOCK 

SOI . 2+SOIB . L ; START OF SDI INTERCONNECT #3 CONTROL BLOCK 

SDI . 3 + SDIB. L ; START OF SDI INTERCONNECT #4 CONTROL BLOCK 

SDI ,4 + SDISJ.L ; START OF BUFFER CONTROL BLOCKS 

BUFBEG+<NBC8*BUF . LL> ; END OF BUFFER CONTROL BLOCKS 

BUFEND ; START OF 1ST DATA BUFFER 

BUFR1 .+BUF . DL ; START OF 2ND DATA BUFFER 

BUFR1 .♦<<NBUFR+1 >*BUF DL> ; [CH041END OF DATA BUFFERS (INCLUDING COMPARE BUFFER) 

DATEND ; START OF PTE CACHE AREAS 

STCACH+<NS0I*MEMSZ*2> i ALLOCATE CACHE FOR EACH SOI 



ENCACH, LT, ALGADR 
: : 34000 ; 



MAKE SURE NO OVERWRITTING ECC DATA 
ANTI-LOG ADDRESS 
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PAGE OSS 



LGADR 
PAGE 



: • ALGAOR+2000 



LOG ADDRESS 



w^ 
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CONTROLLER INTERNAL ERROR CODES 



OOOOOI 
000002 
0OO003 
OO00O3 
000003 
10000 
O00004 
O2O0O0 
000005 
030000 
000006 
000007 
000010 
0000 1 1 
000012 
000013 

00001 4 
000015 

0000 1 5 
0OO0 17 
000026 



0001 44 
000146 
000147 

0001 SO 
0001 50 

oooooo 



ER 


PRD 


a 


1 


ER 


PWR 


s 


2 


ER 


RP2 


= 


3 


ER 


WP2 


3 


3 


ER 


BP1 


= 


3 


ER 


SRP 


: 


1OO0O 


ER 


RAP 


: 


4 


ER 


SAP 


! 


20000 


ER 


ROP 


a 


5 


ER 


SOP 


i 


30000 


ER 


RRD 


= 


s 


ER 


RWR 


i 


7 


ER 


INT 


X 


6. 


ER 


HTO 


z 


9 . 


ER 


NIM 


I 


10. 


ER 


MST 


3 


1 1 . 


ER 


DMX 


: 


12 . 


ER 


TMO 


= 


13 . 


ER 


VCI 


: 


1 4 . 


ER 


IWR 


3 


IS . 


ER 


MRR 


s 


22 . 



ER . MER 

ER .STP 
ER. BCA 
ER.RTO 

BERMAX 

. PAGE 



s 100. 
3 102 . 
3 103 . 
s 104 . 
s ER.RTO 
ASSUME BERMAX. EO, ER.RTO 



UNIBUS 

UNIBUS 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

UNIBUS 

UNIBUS 

UNIBUS 

HOST AC 

HOST EX 

UNIBUS 

DM XFC 

CONTROL 

INVAL ID 

INTERRU 

MAPPING 

EITHER 

PTES PR 

TOO MAN 

ER.SUN 

elsewhe 

att empt 

sec 8.0 

BI MAST 

BI STOP 

BCAI PA 

[mjtos ] 



PACKET READ 
PACKET WRITE 
LER 



READ PA 
LER BI WRITE 
LER BCI PARITY 
LER BI PARITY 
LER RAM PARITY 
LER RAM PARITY 
LER ROM PARITY 
LER ROM PARITY 
RING READ ERRO 
RING WRITE ERR 
INTERRUPT MAST 
CESS TIMEOUT 
ECEEDED COMMAN 
BUS MASTER FAI 
FATAL ERROR 
LER HARDWARE E 

VIRTUAL CIRCU 
PT WRITE ERROR 

REGISTER READ 
TIMEOUT OR PAR 
OM HOST. See 
Y SUB-UNITS 
Is not refaren 
pa in code. 23 

to map when 

uqssp 
ER ERROR (must 

OCCURED 
RITY TO RAM ER 

BI RETRY TIME 



ERROR 
RROR 

RITY ERROR 2 
ARITY ERROR 2 

ERROR 1 
ERRORS/SHIFTED FOR LEDS 

ERROR 

ERROR/SHIFTED FOR LEDS 

ERROR 

ERROR/SHIFTED FOR LEDS 

OR 

ER FAILURE 

RROR 

D LIMIT 

LURE 

RROR 

IT IDENTIFIER 

ON UNIBUS 

ERROR 
ITY WHILE READING 
Sec 8.0 UOSSP. 

CONTROLLER kjn 
ced 

reserved for 
lapping not supported 

be controller specific) 



ROR 

OUT 
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SYSTEM MACROS 



.MACRO ASSUME VI,TST,V2 
.if tSt,<<V1>-<V2>> 



ASSUME TWO VALUES MEET CONDITION 



''ASSUME • VALUES VI ANO V2 ARE NOT TST 



. endc 
. ENOM 
. PAGE 
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SDI LEVEL O ANO 1 EQUATES 



152000 
I 64000 
1 3 1000 
O4640O 
02540O 
04S400 
013400 
070400 
1 22400 
1 07000 
1 75377 
1 3 lOOO 



OOOI 76 
00020 1 
O00202 
0O000 1 
0O020O 
000204 
OOOOOS 
000006 
000207 
0001 70 
OOOO 1 1 
0002 10 
000167 
OO0012 
0002 1 3 
000014 
00021 6 
OO00O3 
0OO20O 
00000 6 
000366 
000220 
000157 
00001 7 
0001 7 5 



OOOO 10 
000001 



CONTCD 

ECHOCO 

ENOCD 

NENOCD 

FORICD 

FORSCD 

READCO 

STRTCD 

WRITCD 

SGRPCD 

WRRDXI 

WRRDXR 



*H00400 

AHOESOO 

AH0B200 

<< -ENDCD/25S . 

AH02BOO 

AH04DOO 

1H01700 

«H07100 

AHOA500 

AHOSEOO 



CONTINUE FRAME CODE 
ECHO FRAME CODE 
END FRAME CODE 
■1>*256.i NOT END FRAME CODE (SET FOR XOR IN 
FORMAT ON INDEX CODE 
FORMAT ON SECTOR CODE 
SELECT HEAD AND READ CODE 
START FRAME CODE 
SELECT HEAD ANO WRITE CODE 
SELECT GROUP CODE 



<-<READC08WRITCD>- 1 > 
<<READCD (WRITCD >»WRRDX1>; 



REAO/WRITE XOR VALUE 



SDI LEVEL 2 EQUATES 



COMPLT 


: AH07E 


CHGMDD 


• *H0S1 


CHGFLG 


« »H082 


DCN.ST 


= BITOO 


DCN.TT 


= BIT07 


DISCDN 


= "H0S4 


DRVCLR 


= AH0O5 


ERECOV 


= *HOOS 


GTCCHR 


= "H037 


GTCRSP 


= *H07S 


GETSTA 


= AH009 


GTUCHR 


: AH0S8 


GTURSP 


: »H077 


INSEEK 


s AHOOA 


ONLINE 


= AHOSB 


RUNN 


s AHOOC 


RECALB 


= »H08E 


SDIRTV 


i 3 


SDTIMO 


» 200 


SEEKL 


I 6 


STARSP 


s AHOFS 


TOPOL 


: »H090 


TOPRSP 


: "H06F 


SDITMO 


= 15 . 


UNSUCC 


= "H070 



COMP 

CHAN 

CHAN 

DISC 

DISC 

DISC 

DRIV 

ERRO 

GET 

GET 

GET 

GET 

GET 

INIT 

ONLI 

RUN 

RECA 

SDI 

SERO 

LENG 

GET 

TOPO 

TOPO 

CONT 

UNSU 



LETEO OP 

GE MODE 
GE CONTRO 
ONNECT SP 
ONNECT TE 
ONNECT OP 
E CLEAR 
R RECOVER 
COMMON CH 
COMMON CH 
STATUS OP 
SU6UNIT C 
SUBUNIT C 
IATE SEEK 
NE OP COD 
OP CODE 
LIBRATE 
LEVEL TWO 
ES TIMEOU 
TH OF SDI 
STATUS RE 
LOGY OP C 
LOGV RESP 
ROLLER TI 
CCESSFUL 



CODE 

P CODE 

LLER FLAGS OP CODE 

IN DOWN FLAG 

RMINATE TOPOLOGY FLAG 

CODE 
CODE 
OP CODE 
ARACTERISTICS OP COOE 
ARACTERISTICS RESPONSE CODE 

CODE 
HARACTERISTICS OP CODE 
HARACTER 1ST I CS RESPONSE CODE 

OP CODE 



P CODE 
ERROR RETRY COUNT 



1 



LEVEL 2 SEEK COMMANO 
SPONSE 
ODE 
ONSE 

MEOUT VALUE (15 SECONDS! 
OP CODE 



SDI ERROR AND OTHER EQUATES 



CSERR 
OCERR 



: = BIT03 
: = BITOO 



CHECKSUM ERROR ON LEVEL 1 READ 

DRIVE CLOCK TIMEOUT ON LEVEL I READ/WRITE 
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000004 
O00O20 
000002 
000040 



FRERR 


: BIT02 


LNERR 


= BIT04 


SFERR 


i BIT01 


UNERR 


■ BITOS 




PAGE 



FRAMING ERROR ON LEVEL 1 READ 
RESPONSE LENGTH ERROR 
FIRST WORD NOT START FRAME ERROR 
UNSUCCESSFUL RESPONSE ERROR 



o 
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*X*XX**XXXXX*XXXX**« 



X* X X X 



fcXXXXXXX* 



xxxxxxxx 



1 6 


JAN 


81 


MATT 


20 


JAN 


81 


CURT 


27 


JAN 


81 


MATT 


23 


JAN 


81 


MATT 


30 


JAN 


81 


MATT 


1 2 


FEB 


81 


MATT 


1 8 


FEB 


81 


BILL 


25 


FEB 


81 


MATT 


27 


MAR 


81 


MATT 


1 7 


JUN 


81 


MATT 


i a 


JUN 


8 1 


MATT 


19 


JUN 


8 1 


MATT 


24 


JUN 


81 


CURT 


24 


JUN 


81 


MATT 


30 


JUN 


81 


BILL 


1 6 


JUL 


8 1 


BILL 


03 


AUG 


81 


MATT 


1 4 


AUG 


81 


MATT 


1 7 


NOV 


81 


MATT 


1 S 


FEB 


82 


MATT 


23 


FEB 


82 


MATT 


05 


MAY 


82 


MATT 


1 4 


MAV 


82 


MATT 


28 


MAY 


82 


MATT 


1 8 


JUN 


82 


CURT 


19 


JUN 


82 


CURT 


23 


JUL 


82 


MATT 


23 


NOV 


82 


MATT 


04 


FEB 


83 


MATT 


1 


OCT 


83 


MATT 


IS 


OCT 


83 


MATT 


1 


MAR 


1984 


MIKE 


24 


APR 


1984 


MIKE 


04 


MAY 


1984 


MIKE 


1 4 


MAY 


1984 


MIKE 


30 


MAY 


1984 


MIKE 


24 


AUG 


1984 


MIKE 


27 


AUG 


- 1984 


MIKE 


1 1 


SEP 


- 1984 


MIKE 


21 


SEP 


- 1984 


MIKE 


08 


•OCT 


1984 


MIKE 


22 


•OCT 


1984 


MIKE 


05 


-NOV 


1984 


MIKE 



NPR FIX 

FIX ZERO BUFFER, SAVE FAILURE 

FIXED TWO STEP BITS SET IN SA REG 

SOI TEST FIX 

TEST CRTDS BIT IN OCR 

LED CORRECTION 

BURST VALUE CORRECTION 

NPR ERROR REPORTING CORRECTION 

IMPLEMENT RICHY'S COOE SAVING 

CODE NOT TO TOUCH FAILUR WORD 

CORRECTIONS OF PREVIOUS EDIT 

PURGE/POLL WIPES RO FIXED 

ADD SIGNITURE ANALYSIS COOE - 1 WORD 

TOOK EXTRA WORD OUT OF ERROR ROUTINE 

REMOVE LAST FAILURE STORE 

FIX CROM TIMEOUT VALUES 

FIX STEP 1 OISPLAV ERROR 

ACLO FIXIONE LAST TIME) 

FROM 4K TO 1 6K 

SDI CHANGES FOR 8 PORT DIAGNOSTIC MO 

ADD '+DR1NIT' AT STEP4 : 

TOOK OUT OIAPRT -- FOR ALL REFERENCE 

FIXED MAX RING LEN NOT CLEARING RING 

FIXED WRAP FEATURE, LEOS FLASH ;MJT1 

UDA52 NEW BOARD CHANGES 

U0A52 NEW BOARD CHANGES - NOW IT WOR 

CHANGE OCRTST TO REPORT BOARD 2 ERRO 

COMMENTED OUT USD CR TESTS AS COOE R 

SPLIT UP U AND D PROC DIAGNOSTICS 

START CHANGING CODE FOR REAL ODA 

CONTINUE TO CHANGE FOR REAL ODA 

CONTINUE TO CHANGE FOR REAL UDA/ODA 

SOI PORT WRAP TEST 8 DFAIL U-CROM TE 

DEFINE OB, MP FOR STEP 1/MOVE OER TO 

PUT '.ORG 700' AT END OF DIAGNOSTIC 

CONDITIONED OUT 1 SECONO TIMEOUT COD 

ADDED LOOP-ON-TEST CODE, VERIFIED 8 

ADDED 8 CORRECTED ERROR CODES 

ADDED SA ERROR CODES TO ROUTINES 8 E 

GENERAL ROUTINE CLEAN-UP 8 ADDING C$ 

FOR BOA DEVELOPMENT 

GENERAL ROUTINE CLEAN-UP 8 ADDED PRE 

DELETED A FILLER INSTRUCTION FROM 'S 

AOD COMMENT TO ERROR ROUTINE OESCRIP 

CHANGE LITERAL IN RAM BUFFER TEST 

CLEANUP OF COMMENTS IN SDI TEST 



/COMMENT CHANGE 



S SEARCH FOR ;MJT(SDI> 
AREA PROBLEM 



KS 

R 

EDUCTION ; [US2ECI ) 



ST IBLO) 

UER IN ERROR ROUTINE. 

SECTION . 

E IN DDIAG. (BL2I 

CORRECTED ERROR COOES 

RROR CALLS 

TYPE CONDITIONAL 

LIMINARV BOA CODE. 
TEP' ROUTINE 
TION, 
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OS-NOV- 1984 
12-N0V- 1984 
26- JUL - 1985 
1 1 -DEC- 1985 
08- JAN- 1 987 



MIKE SOME COMMENT & RAM BUFFER TEST CHANGES 

MIKE SOME COMMENT CHANGES 

MIKE KBD UCODE FREEZE HERE... 

MIKE REMOVE ANY REFERENCES TO BI STOP TEST 

MIKE REMOVE REFERENCE TO BI FAST SELF-TEST IN KDA BUILD 



[mr 100 1 ] 
[mr 1002] 
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000000 
000001 



00004O 
000100 
000400 
000400 

00 1000 

000400 

001000 
100000 



000305 
02200O 
176000 

000003 
00001 3 



ECSUML 
ECSUMH 
ECCMSK 

SCLR 
RCLR 
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DIAGNOSTIC SPECIALLY USED REGISTERS 



LT400 


= 


U0A1 


= 1 


SM 


= BIT05 


MP 


= BIT06 


DIAG 


= BIT08 


D! 


= BIT08 


08 


= BIT09 


SF 


: BIT03 


B0ARD2 


: BIT09 


ERRBIT 


s BIT15 



: OLD CODE 

= NEW UDA1 ETCH 



;STEP1 SPECIAL MODE 

;STEPI MAPPING SUPPORTED 

;STEP1 ENHANCED DIAGNOSTICS SUPPORTED 

;STEP1 ENHANCED DIAGNOSTICS SUPPORTED 

;STEPI 22 BIT ADORESSING SUPPORTEO 

;STEP4 SPECIAL FUNCTION BIT 

.O •- BOARD »1 . I : BOARD *2 

.0 ■- NO ERROR. I : ERROR 



DIAGNOSTIC EQUATES 



305 

22000 

176000 



;ECC SUM LOWER BYTE 
;£CC SUM UPPER BYTE 
;ECC MASK 



SDI 
SDI 



SET SDI INFC I/O CLEAR 
RESET SOI INFC I/O CLEAR 
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******* 



******** 



Diagnostic test sequence, with respect to time and each processor 
U-PROC (TEST LABEL) D-PROC (TEST LABEL) 



U . RSTRT : 

SEQUENCER RELIABILITY 
SEQUENCER STACK TEST 
ALU TEST (ALUTST) 
CONTROL REG TEST (UCRTST) 
OFAIL TEST 



0. RSTRT: 



SEQUENCER RELIABILITY 
HANG ON t INSTRUCTION (TSTHNG) 
HANG D-PROC (TSTHNG) 
" (TSTHNG) 
RUNS THROUGH ALL OF U and D ROM 



o 



If an error occurs here, the D-PROC will continue to run 
thru the U or ROM, while the U-PROC reports the error. 



RELEASE D-PROC (RELES) 
HANG U-PROC (RELES) 
OISPLAV LEDS (DSLEDS) 
ROM PE TEST (UROMPE) 
RELEASE D-PROC (RELES) 
HANG U-PROC (RELES) 
■« (RELES) 
(RELES) 
" (RELES) 
" (RELES) 
" (RELES) 
(RELES) 
RAM PE TEST (URAMPE) 
BI FAST SELF-TEST ENABLED 
IF SO, 

RELEASE D-PROC, 

GOTO FAST TEST (FSTST) 

RELEASE D-PROC (RELES) 

HANG U-PROC (RELES) 

" (RELES) 

RAM BUFFER TEST (RAMTST) 

RELEASE D-PROC (RELES) 

HANG U-PROC (RELES) 

(RELES) 

(RELES) 

(RELES) 

(RELES) 



SEQU 
RELE 



ENCER 
ASE U- 
ANG 0- 



STACK 

PROC 

PROC 



ALU 

DISP 

ROM 

BOAR 

CONT 

RAM 

RELE 



TEST ( 
LAY LE 
PE and 
2 TE 
ROL RE 
PE TES 
ASE LI- 
ANG 0- 



ALUTS 

OS (0 

TIME 

T ( 

TES 

T ( OR 

PROC 

PROC 



BI FAST SELF-TE 



TEST 
(RELES) 
(RELES) 
(RELES) 
(RELES) 
T) 

SLEDS) 

OUT (DROMPEI 
2TST) 

T (DCRTST) 
AMPE) 
(RELES) 
(RELES) 
(RELES) 
(RELES) 
ST ENABLED? 



HANG 

RAM 

RELE 

H 

SDI 

SERD 

SERO 

ECC 

RELE 



OTO PA 
PRO 
BUFFER 
ASE U- 
ANG 0- 

TEST ( 
ES WRI 
ES REA 
TEST ( 
ASE LI- 



ST TEST (FSTST) 
C (RELES) 

TEST (RAMTST) 
PROC (RELES) 
PROC (RELES) 
(RELES) 
SOITST) 
TE (SDWRT) 
(SORO) 
ECCRO) 
PROC (RELES) 



Cont i nue . 
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a 

< 

a 

ii 

2 

x 
o 

u. 

o 
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U-PROC (TEST LABEL) 



D-PROC (TEST LABEL) 



FSTST : 



SET BI LOOPBACK MODE 

BCAI BUFFER TEST (BCATST) 

BI PE TEST (BIPEI *PART MFG* 

BIIC BUFFER TEST (BIITST) 

GET BI NODE ID (GETIO) 

SET BI NORMAL MODE 

BIIC BUFFER TEST (BIITST) 

POLL TEST (POLTST) 

BI MEMORY TEST (BIMEM) *MFG* 

LOAD BIOTYP REGISTER 

CLEAR BROKE BIT IN BICSR 

SET STEP 1 IN SA REGISTER 

U. END : 

WAIT 50ms FOR HOST RESPONSE 

REDO DIAGNOSTIC ??? 

IF SO , 

SET FLAG, RELEASE O-PROC, 
GOTO RESTART (U. RSTRT) 

GOTO INITIALIZATION 

STEP . 1 , 

STEP . 2 , 

STEP . 3, 

DMA TEST (OMATST) , 

STEP . 4, 

GOTO U-PROC IDLE LOOP. 



HANG O-PROC 



(RELES) 
(RELES) 
(RELES) 
(RELES) 
(RELES) 
(RELES) 
(RELES) 
(RELES) 
(RELES) 
(RELES) 
(RELES) 
(RELES) 



IF SO, 

GOTO RESTART (0. RSTRT) 



GOTO O-PROC IDLE LOOP 
INITIALIZE DRIVES 



4 \ 

if ) 



fc XX X XX X * 



KXXXXXX 



XX X X XX* * 



CXXXXXXXXXXXXXX* 
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KDBOP 
KDB D-P 



DIGITAL EQUIPMENT CORP. 
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** USES THE ENTIRE STACK «* 



TPie 2911 sequencers are tested with CONTINUES, JUMPS, CALLS and 
RETURNS to make sure they are functioning properly. The STACK is 
tested to make sure that it's 4 locations can be wrapped around. 

When the diagnostic is restarted, the 0-PROC will be within 2 cycles 
of the U-PROC. If it isn't, a race with the registers may occur and 
cause an error . 

REGISTERS USEO : 

(TSTCNT) is used as the test counter. 

R3 (HANG) holds the SA register STEP bits until the D-PROC 
hangs. Then, this register becomes a hand shaking mechanism 
between the U-PROC and the 0-PROC, to coordinate the HANG/ 
RELEASE process. 

R11 (DER) is used as the 0-PROC error register. 

R17 is used as the STACK counter. 



000000 
0O000 1 
OO0002 



1204S7 
013440 
034457 



O07477 
000000 
00401 7 



1 0000 

oooooo 

130005 



*********** 
INC 
NOP 
O.RSTRT: CLR 



t********* 
, .BAR 



R17, ,DCRD 



%CALL JMPTST 



WHEN RESET, INCREMENT R17 AND OISPLAY ON 

DATA BUS. FALL THROUGH TO RESET TIMERS 
NEEDED TO KEEP U-PROC AND D-PROC ALIGNED ON 

POWER-UP OR WHEN SST IS ENABLED 
CLEAR DCRD, R17. 

PUSH SEQERR ADDRESS ONTO STACK FOR 

POTENTIAL PARITY ERRORS. 



; ******************* 



********* 
FATAL 



THE SEQUENCE ERROR CODE IS EXECUTED IN AN ATTEMPT TO CONTROL 
SEQUENCER ERROR. 

NOTE: Fatal sequencer errors, try to display 104000 somewhere. 

;************************************************************************ 

SEQUENCER ERROR 
DISPLAY ALL LEDS / 
JUMP TO SEQUENCER ERROR. 



ERROR IF THIS JUMP WORKS / 
RESET D-PROC FLAG TO INDICATE 
NO LOOP ON TEST. 

ERROR IF THIS CALL WORKS. 

CLEAR TSTCNT(Q) / RESET I/O CLEAR / 
TRY FIRST JUMP. 

ERROR IF JUMP DID NOT WORK. 



000003 


133750 


0002 10 


120004 


SEOERR: 


MOV 


#ERROO, UDDI 


'/.CALL 


. + 1 


000004 


034444 


004004 


100003 




CLR 


CRI , , DCRD 


%JMP> SEOERR 


00O005 










ASSUME 


HANG ,E0,R3 






000005 


034443 


0O0603 


OO0OO3 


JMPTST : 


CLR 


HANG VRDPF 


%JUMPN 


SEQERR 


000006 


01 3440 


OOOOOO 


030003 




NOP 




7.CUMPN 


SEOERR 


000007 


004240 


00O6S0 


100015 




CLR 


TSTCNT IPRCLR 


%J MP 


JUMP 


000010 


133750 


0002 10 


1 30003 




MOV 


#ERRO0,U00I 


%CALL 


SEQERR 


KDBDP 




KD850.M 


[CROCODE 


,22-APR 


-1938 1 


:27 : 16.96 
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********* 



RETURN ROUTINE 



********* 



0000 1 1 
000012 



013440 
133750 



OOOOOO 
000210 



127777 
100003 



NOP 
MOV 



000013 013440 OOOOOO 137777 TSCRPE 



#ERROO,U0DI 

************************** 

CROM PARITY ERROR 
************************** 

.WORD 13440,0, 137777 

************************** 



7.RET 
%JMP 



;TRY FIRST RETURN. 

TERROR IF RETURN DID NOT WORK. 



******** 



********** 



IFORCE CROM PARITY ERROR WHEN 
; OFAIL BIT IS SET BY U-PROC. 



******** 



D-PROC WAIT HERE WHILE U-PROC RUNNING SEQUENCE TEST. OFAIL TEST WILL 

CAUSE D-PROC TO GO ALL THROUGH MEMORY THEN START EXECUTION AT 

'SEOTST:'. THE D-PROC CAN STAY HERE ABOUT 116.66 MSEC (380 MILLION 
INSTRUCTIONS) BEFORE TIMEOUT WILL OCCUR. 



********* 



000014 113740 004360 110014 TSTHNG: MOV 



***************** 
#LEDS, VN.DCRD 



******** 



************* 



(******* 



000015 013440 OOOOOO 120011 JUMP: 

000016 013440 OOOOOO 110014 

000017 013440 OOOOOO 110014 

000020 013440 OOOOOO OOOOOO 

000021 013440 OOOOOO OOOOOO 



*************** 
TEST RETURN 

*************** 

NOP 

NOP 
NOP 
NOP 
NOP 



** ** * * 


******** 


%CALL 


STEP 


%JMP 


TSTHNG 


%JMP 


TSTHNG 



LET D HANG HERE UNTIL 
; U-PROC SETS DFAIL BIT. 



************** 



CALL ROUTINE TO SEE IF RETURN WORKS 

RETURN WORKED. 
JUMP TO HANG FOR OFAIL IN 0-CROM. 
JUMP TO HANG FOR OFAIL IN U-CROM. 
NOP TO SYNC U 8 PROCESSORS 

IN THE DFAIL TEST 
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: ******* 



********** 



TEST STACK WRAP AROUND 



ASSUME TSTHNG+6, EQ, SEQTST 



000022 


033757 


000004 


100025 


SEOTST: 


MOV 


# 4 . R 1 7 


%JMP 


2* 


000023 


031477 


010O17 


070023 


1$: 


DEC\T 


R17 


7.CN2R0 


1$ 


000024 


030557 


0000 10 


137777 




ADO 


#8. ,R17 


7.RET 




0OO025 


031457 


000017 


130023 


2$: 


DEC 


R17 


•/.CALL 


1$ 


000O26 


01 6557 


010070 


100003 




XOR 


#56 . , R1 7\N 


%J2R0 


SEOERR 


000027 


033753 


1OOO4 


037777 




MOV 


#4 , R13 


%RN2R0 





000030 031453 0OOO13 130052 SE001: 



******* 



IF WE GET HERE. BOTH JMP , CALL 8 RET 

WORKED, ELSE 

ALU ERROR WILL RETURN TO 'SEOERR'. 
SET STACK PUSH COUNT 

LOOP HERE FOREVER IF ALU 

STACK OR NZRO FAILED. 
PUSH '.+1' ON STACK 3 TIMES. 
RETURN HERE 3 TIMES, THEN 

RETRUN TO '2$+1 ' . 
PUSH REAL RETURN ADDRESS 

STACK TEST RETURN HERE 
ERROR IF R17 IS ZERO / 

GO THRU HERE TWICE, 

ISt R17: 32. 8 2nd R17: 56. 
TEST STACK WRAP-AROUND 

EQUALS RETURN TO '1$*1' 

STAV THERE 3 TIMES UNTIL STACK 

WRAPS AROUND. 

IF WE GET HERE, WRAP-AROUND WORKS 

WORKS, ELSE RETURN TO 'SEOERR'. 
PUSH STACK FULL OF ERROR 

RETURN ADDRESSES. 



o 
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a 

a 
ii 
s 

cc 
O 
u_ 

CO 
O 
CO 



************ 



************************** 

LEVOO WILL HANG HERE 

ERROR ROUTINES 

Red LED codes displayed; 

9 (hex) - BOARD 1 BAD 
A (nex) - BOARD 2 BAD 

Yellow LED codes displayed; 

ON = NODE PASSED SELF-TEST 
OFF : NODE FAILED SELF-TEST 

Format of error code that will be put into the SA register 

15 14 13 12 11 10 9 8 7 6 5 4 3 2 1 O 
.. + ........ + -...,... + ........ + ........ + 

ESSSSPBT T 



CODE 



COUNT 






Board 1 (PR0C1 at fault 
Board 2 (SDI) at fault 



O-PROC detected error 
U-PROC detected error 



************* 



****************************************** 

; BOARD 1 ERROR - RAMPE/CROMPE/T IMEOUT RETURN ADDRESS 



000031 004240 

000032 033751 

000033 133551 

000034 133744 



000000 
000040 
000010 
000 144 



000000 
OOOOOO 
000000 
1 10042 



ERRB1A: 
ERRBIE : 



CLR 
MOV 
BIS 
MOV 



TSTCNT 
#ERR01 ,DER 
#STEP1 ,DER 



ALU TEST ERROR/TSTCNT MAY HAVE GARBAGE 

CONTROL PE/ALU TEST 

SET STEP 1 TO REPORT BRD1 ERROR 



#<LED4 + LED2 + DFAIL> ,CRI itJMP ERRSET ;LEDS '0110' 9 (HEX) = ON 



c 
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; ; BOARD 


2 ERRORS 






000035 


033751 


OOOIOO 


1O004O 


ERRB2E : 


MOV 


#ERRO2,0ER 


%JMP 


ERRB2 


000038 


03375 1 


OO0 140 


1 1004O 


ERRB2H: 


MOV 


#ERR03,DER 


%JMP 


ERRB2 


000037 


03375 t 


OO0200 


100040 


ERRB2I : 


MOV 


#ERR04,DER 


%JMP 


ERRB2 


0OO04O 


1 3355 1 


0000 12 


010000 


ERRB2: 


BIS 


#<STEP1+B0AR02> 


DER 




00004 1 


133744 


000 124 


OOOOOO 




MOV 


#<LED4+LE01+DFAIL>.CRI 
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RAM PE/RAM BUFFER/RAM ERROR (ANY PROCESSOR! 
SDI/SEROES/ECC ERROR 
CONTROL REG TEST ERROR 

;SET STEP 1 TO REPORT BRD2 ERROR 
;LEDS '0101' A (HEX) = ON 



;ERRSET is the diagnostic error trigger point. 



0O0O42 


1 3355 1 


000200 


130043 


ERRSET : 


SIS 


#ERRBIT,OE 


000043 


033OS1 


0000 1 1 


OOOOOO 


1$: 


BIS 


TSTCNT ,OER 


000044 


033447 


00001 1 


130I5S 




MOV 


OER.UER 


000045 


034443 


000003 


OOOOOO 




CLR 


HANG 


000046 


033444 


0O4O04 


OOOOOO 


DHANG: 


MOV 


CRI , , DCRD 


000047 


01 345 1 


00001 1 


OOOOOO 




TST 


DER 


OOOOSO 


01 3440 


OOOOOO 


1 00046 




NOP 





SET ERROR BIT IN ERROR REG 

SETUP RETURN ADOR IF VECTOR. 
SET TSTCNT(O) IN ERROR REG 
SEND ERROR STATUS TO U-PROC ERROR REG / 

WAIT, BI SELF-TEST MAY NOT BE COMPLETE. 
CLEAR HANG REG SO U-PROC CAN CONTINUE. 

SET LEDS ON BOARD 2 
TEST D-PROC ERROR REG 
LOOP HERE FOREVER .... 
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************** 



***«**«*«** 



CLEAR TSTCNT(O) BECAUSE IT COULD BE FILLED WITH GARBAGE AT TIME 
OF INI T . 



tx**»**« 



KX«XXX«* 



111*1*1.1 



XXXXXXX* 



OOO0S1 004 2 40 OOOOOO 127777 CLRTST: CLR 

; -xxxxxxxxxx 



;TSTCNT(Q) : (COULD BE GARBAGE) 



xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 



PUSH STACK FOR STACK WRAP TEST 



; xxxxxxxxxxxxx*x«*****x« 



imiit«(iiitit(«iif in 



*sx*xxx*xx 



0000S2 000OS7 10017 040030 PSTACK: ADO\F R17, TSTCNT %JNZRQ SEQ01 ;JUMP BACK UNTIL STACK FULL, ELSE 

; INCREMENT TSTCNT(O). 



4T% 
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********* 



133544 004003 120136 



D. DIAG 
HD. TO 
HO. T1 
HD. T2 



************************************************************** 
The D-PROC calls its 'BOARD 1 diagnostics 

************************************************************************* 



#<ODDP+INDIAG>,CRI , DCRD '/.CALL RELES ;SET ODD PE « INOIAG SITS FOR U-PROC, 

.AND HANG 0-PROC, LET U-PROC DO UROMPE 



o 



000054 

000055 
000056 

000057 

000060 

00006 1 
000062 



0371 60 
013460 

014471 

013460 

133764 

013460 
014471 



010000 
010000 
06001 1 

10000 

014363 

010000 
06001 1 



160166 
060131 
IS0054 

17015 1 

160266 

050131 
1 40060 



XNOR\T RO.RO 

NOP\T 

CLR\T DER,\N 



XCZRO 

%JNZRO 

XJDPF 



ALUTST 
D .END 
T3 



i INITIALIZE RO TO 

;JUMP IP ERROR 

;LOOP IP 0-PROC FLAG SET 



1 / DO ALU TEST 



NOP\T 
MOV\T 



NOP\T 
CLR\T 



7.CZR0 OSLEDS ; ROTATE LED DISPLAY 



#<LEDS«ODDP*INDIAG> ,CRI , OCRO %CZRO DROMPE ;RESTORE CRI REG / 

; DO ROM PARITY ERROR TEST 
%JNZRO O.END ;JUMP IF ERROR 
DER,\N %JDPF T4 ;LOOP IF D-PROC FLAG SET 
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********* 



The D-PROC cal is its 

********************** 



000063 


01 3460 


010000 


17016 1 




NOP\T 






000064 


013460 


O1000O 


170251 


T5 : 


NOP\T 






0O0065 


013460 


010000 


050131 




NOP\T 






000066 


014471 


06001 1 


15O064 




CLR\T 


DER 


\N 


000067 


133764 


014363 


160304 


T6 : 


MOV\T 


#<LEDS*ODD 


OO007O 


01346O 


010000 


160136 




NOP\T 






O0O07 1 


013460 


010000 


050131 




NOP\T 






000072 


01447 1 


06001 1 


150067 




CLR\T 


DER 


\N 


000073 


013444 


000004 


OOOOOO 




TST 


CRI 




000074 


013447 


030007 


010114 




TST 


UER 




000075 


01 3460 


010000 


170322 


T7: 


NOP\T 






0OOO76 


013460 


10000 


0S013 1 




NOP\T 






000077 


1 447 1 


0600 1 1 


150075 




CLR\T 


OER 


\N 


0OO10O 


01 3460 


010000 


160136 


HD.T6 


NOP\T 






0O0101 


035564 


014317 


160354 


T9 : 


BIC\T 


#<RAMPE+OP 


000102 


033544 


010010 


040131 




BIS\F 


#10 


CRI 


000103 


013440 


050000 


1001 1 1 




NOP 






000104 


013440 


050000 


1001 1 1 




NOP 






0O0105 


003740 


000012 


OIOOOO 


1$: 


MOV 


#12 


TSTCNT 


000106 


033444 


OO4004 


130354 




MOV 


CRI 


.DCRD 


0OO107 


054544 


000017 


OOOOOO 




AND\R 


#17 


CRI 


000 1 10 


133544 


O10363 


000105 




BIS 


#<LEOS+OOD 


000 1 1 1 


013451 


00001 1 


OOOOOO 


2$: 


TST 


DER 




OOOI 12 


01447 1 


06001 1 


140101 




CLR\T 


OER 


\N 


0001 13 


034464 


O10004 


1501 14 




CLR\T 


RLL 





*************** 

80AR0 2 diagno 

************** 

XCZRO B2T 

XCZRO OCR 
%JNZR0 O.E 
%JOPP TS 



St i CI 

* * * * i 

ST 

TST 
ND 



;SEE IF BOARD 2 IS THERE 

00 CONTROL REGISTER TEST 

JUMP IF ERROR 

LOOP IF D-PROC FLAG SET 



HNDIAG> , CRI , DCRD XCZRO DRAMPE ,'RESTORE DCR / 

; DO RAM PARITY ERROR TEST 
;HANG D-PROC, LET U-PROC DO RAM PE TEST 
,'JUMP IF ERROR 
;LOOP IF D-PROC FLAG SET 
;ARE WE IN BI FAST SELF-TEST MODE? 
;JUMP IF YES / 
; DID THE U-PROC HAVE AN ERROR? 



%CZRO REL 
XJNZRO D.E 
%JDPF T6 



•/.JNNEG FSTST 



XCZRO RAMTST 

xjnzro D. END 

XJOPP T7 
XCZRO RELES 
111), CRI, DCRD XCZRO 
XJNZRO O.END 



XJNTEST 2$ 
XJNTEST 2$ 



XCALL SDITST 



XJDPF T9 
XTZRO 



RAM BUFFER TEST 

JUMP IP ERROR 

LOOP IF D-PROC FLAG SET 

;HANG D-PROC, LET U-PROC DO RAM BUFFER TEST 

SDITST ;SOI INTERCONNECT TEST / DISABLE RAM PE 8 
; ENABLE DIAGNOSTIC WRAP PORT. 
JUMP IF ERROR, ELSE 

SDI PORT 3. 
ON SDI PORTS 
ON SOI PORTS 



; START TESTING WITH 
;JUMP IF NOT LOOPING 
;JUMP IF NOT LOOPING 
; LOAO TSTCNT(O) . 

;RESTORE CRD / 00 SDI PORT TEST 
;SAVE PORT SELECT BITS / 
; SELECT NEXT PORT FOR TEST. 
UNDIAG) ,CRI XJNZRO 1$ ; JUMP IF NOT DONE TESTING PORTS 
; RESTORE CRI 
;ANY ERRORS? 

;LOOP IF 0-PROC FLAG SET. 
;END DIAGNOSTIC MOOE IF NO ERROR 



I 
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******** 



******** 



The 0-PROC waits for BI testing to complete on BOARD 1 

******************************************************** 



000 1 14 
O001 IS 



0001 1 6 
000 1 1 7 
000 1 20 
00012 1 

0001 22 

0001 23 

0001 24 

0001 25 

0001 26 
000127 



133744 
033444 



013440 
01344O 
013440 
013440 
013447 
013440 

013440 
013440 
013447 
013440 



010363 000131 FSTST: 
004004 130136 



MOV #<LEDS+ODDP+IN0IAG> . CRI %JN2R0 D 
MOV CRI..DCRD '/.CALL RELES 



oooooo 
oooooo 
oooooo 
oooooo 

000007 
01OO0O 



120524 
120524 
120524 
120524 
OOOOOO 
12013S 



OOOOOO 120524 

OOOOOO 120524 

000007 OOOOOO 

010000 120142 



NOP 
NOP 
NOP 
NOP 
TST 
NOP 

NOP 
NOP 

TST 
NOP 



7.CALL TSTRTN 

%CALL TSTRTN 

7.CALL TSTRTN 

%CALL TSTRTN 

%CZRO RELES 



"/.CALL 
'/.CALL 



TSTRTN 
TSTRTN 



O0013O 034464 10004 



**************** 



******** 



O00131 
O00132 



013447 
013451 



0OO0O7 OOOOOO D.ENO: 
010011 050046 



000133 013240 O 1 OOOO 050O40 

000134 133751 010361 100002 

000135 033S51 004300 10070 1 



TST 


UER 




TST\F 


DER %JN2R0 


OHANG 


TST\F 


TSTCNT %JNZRO 


ERRB2 


MOV 


#<LEDS*ODDP> , R1 1 %JZRO 


. RST 


BIS 


#<RAMPE+OPM> ,R1 1 , OCRD 


/.JMP 0. 



END ;JUMP IF ERROR / 

; RESTORE CONTROL REG IMAGE 

HANG 0-PROC, 
LET U-PROC INIT RAM W/ ODD PARITY a 
WAIT FOR U-PROC TO CAUSE WR PE2 VECTOR (7762) 

WASTE SOME TIME TO SYNC UP WITH THE U-PROC 
AFTER OOING VECTOR DURING SCI PARITY TEST. 



DID THE U-PROC HAVE AN ERROR? 
HANG D-PROC AGAIN, 

WAIT FOR U-PROC TO CAUSE RO PE2 VECTOR (7761) 
WASTE SOME TIME TO SYNC UP WITH THE U-PROC 

AFTER OOING VECTOR DURING BCI PARITY TEST. 
DID THE U-PROC HAVE AN ERROR? 
GO TEST EXT.TEST_L CONDITION, 

HANG D-PROC AGAIN, 

LET U-PROC DO REST OF BI TESING 
END DIAGNOSTIC MODE IF NO ERROR 

****************************** 



****************************** 

DID THE U-PROC HAVE AN ERROR? 
IF SO, HANG THE D-PROC, ELSE 

DID THE 0-PROC HAVE AN ERROR? 
IF SO, REPORT SOMETHING WENT WRONG WITH 

WAS TSTCNT(O) CLEARED BY U-PROC? 
REDO DIAGNOSTICS IF TSTCNTsO / 

LEDS OFF WITH OOD PARITY ON. 

I ENABLE RAM PE / 

; GOTO REGULAR FIRMWARE. 
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******** 



*************** 



********* 



RELEASE THE U-PROC FROM HANGING AND LET 0-PROC HANG. 
WHEN THE HANG REGISTER ( R3 I IS CLEARED. 



********* 



RETURN WILL OCCUR 



The U-PROC ERROR REGISTER ( R7 ) will be tested on return 

******************************************«C««X**********4 



OOOI 36 


034443 


00OO03 


120524 


RELES : 


CLR 


HANG 


7.CALL 


TSTRTN 


OOOI 37 


033743 


OOOOOI 


OOOOOO 




MOY 


#1 , HANG 






0001 40 


013447 


10007 


137777 


1$: 


TST 


UER 


°/.RZRQ 




000 1 4 1 


013443 


000003 


1 101 40 




TST 


HANG 


%JMP 


1$ 



RELEASE U-PROC AND 

WASTE ONE INSTRUCTION. 
KEEP SOMETHING IN HANG 

IF ZERO, TEST U-PROC ERROR / RETURN 
SEE IF PROC SHOULD LEAVE LOOP? 



This routine tests the EXT.TEST_L condition to determine if the 
diagnostic should use a special RELEASE routine for executing the BI 
or Bus MEMORY test in the manufacturing only code. 

IF EXT. TEST_L CONDITION IS ALWAYS ENABLED OR DISABLED, DO THE NORMAL 
RELEASE OF THE U-PROC AND LET 0-PROC HANG BY JUMPING TO THE -RELES' 
ROUTINE. RETURN TO THE MAIN PROGRAM FLOW WHEN THE HANG REGISTER ( R3 I 
IS CLEARED. 

IF EXT.TEST_L CONDITION IS TOGGLING (indicating mfg model. 00 NORMAL 
RELEASE OF THE U-PROC AND LET D-PROC HANG BY CALLING THE 'RELES' 
ROUTINE. RETURN TO THIS ROUTINE WHEN THE HANG REGISTER ( R3 ) IS 
CLEARED. NOW WAIT FOR THE U-PROC TO COMPLETE THE BI MEMORY TEST BY 
WAITING FOR R1I (DER) TO BE NON-ZERO. 



********** 



**** * ** * * 



c 



O00142 


013440 


050000 


100144 


TSTXL : 


NOP 




OO0143 


01344O 


05OOOO 


010136 




NOP 




OOOI 44 


013440 


O50OO0 


100136 


1$: 


NOP 




OOOI 45 


013440 


OOOOOO 


1 30136 




NOP 




OOOI 4 6 


01 3451 


000O1 1 


OOOOOO 




TST 


Rl 1 


000147 


034471 


01001 1 


0401 36 


2$: 


CLR\T 


R1 1 


OOOI 50 


01 345 1 


0000 1 1 


100 147 




TST 


Rl 1 



%JNTEST 1$ 
7.JTEST RELES 



XJNTEST RELES 
'/.CALL RELES 



%JNZRO RELES 
•/.JMP 2$ 



**************** 



CHECK EXT.TEST_L FOR TOGGLE MODE 

RELEASE IF EXT. TEST_L DID NOT TOGGLE AND 

RETURN FROM RELEASE ROUTINE. 
RELEASE IF EXT. TEST L DID NOT TOGGLE AND 

RETURN FROM RELEASE ROUTINE. 
HANG D-PROC AGAIN, 

LET U-PROC DO SOME 31 TESING AND 



GET INTO THE 



RETURN HERE T 

SPECIAL WAIT LOOP. 
IF ZERO, TEST U-PROC ERROR / RETURN 
WE ARE IN A SPECIAL TEST MODE. SO 

WAIT FOR Rl 1 TO CHANGE 

****************************** 



; ROTATE LEO DISPLAY 
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TO SHOW THAT THEY DO FLASH AND THAT THE CODE IS WORKING 



3 


4 


2 


1 


off 


off 


off 


on 


off 


off 


on 


off 


off 


on 


off 


off 


on 


off 


off 


off 



CALLS WAIT 



o 



CR nas leds set off a in diagnostic mode . 

x**xx************xx*xxx**kx***x***x****x*x 



*X X X X * XX* * 



000151 


133742 


000020 


000000 


DSLEDS: 


MOV 


#<LE01 > , R2 






;START WITH LED#1 


0001S2 


013471 


03001 1 


167777 


1$: 


TST\T 


DER 


%RNEG 




;JUMP IP DONE, ELSE 


000 153 


035 1 44 


004002 


130166 




SIC 


R2, CRI , DCRD 


•/.CALL 


WAIT 


;LED ON 


000154 


033 1 44 


004002 


000000 




SIS 


R2,CRI , DCRD 






;LEO OFF 


000155 


073442 


000002 


1 10182 




SHF\L 


R2 


%JMP 


1$ 


;NEXT LED 
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WAIT 

WAIT APPROXIMATELY 10ms, BASED ON 346ns SEQUENCER CLOCK 

Input : 



Out put : 



none 

RO i s changed . 

*********** 



000 1 56 


133740 


0001 61 


000000 


WAIT : 


MOV 


#70400, RO 




000157 


031440 


OIOOOO 


010157 


1$: 


DEC 


RO 


7.JNZR0 


0001 60 


013440 


OOOOOO 


127777 




NOP 




%RET 



********* 



t************** 



********* 



:************ 



********* 



.'INITIALIZE LOOP TO 1 . ms COUNT 
;KEEP LOOPING TIL DONE 
: RETURN 



************* 



******** 



Input : 
Out put : 



Test for the existence of SDI board (BOARD 2). 

none 
none 



Errors in this routine display the following in the SA register: 
105 102 - No board 2 error 



000161 
000162 



000163 
000164 



013440 
013440 



013440 
013440 



000600 
060400 



060500 
000600 



OOOOOO 

1S0035 



050035 
1 10524 



******************** 

B2TST: NOP 

NOP\F 

NOP\F 
NOP 

******************* 



**************** 



****** 



:******* 



***** 



(PRDPF 
9S0PF 



(PRSE 

(PRDPF 



7.JN0PF 
%JMP 



ERRB2E 

TSTRTN 



RESET OPF TO SEE IF BOARO 2 IS THERE. 
ERROR IF NO BOARO 2, ELSE 

SET OPF TO SEE IF BOARO 2 IS THERE. 
ERROR IF DPF NOT SET 
TEST DER / RETURN 



******* 



******* 



:LEV01 OR LEV02 
CLRERR 



:********* 
CLRERR: CLR 



CLEAR THE ERROR REG (R11) 

*********************************************************** 
OER ?.RET ;CLEAR AND RETURN 



c 
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TEST DESCRIPTION: 

The 2901 routine tests the internal 2901 registers, ALU functions, 
SHIFT/ROTATE functions and ALL ALU associated flags (ZERO, CARRY, 
NEGATIVE, LSB, OVERFLOW) . 



I nput : 



FFFF NEG/LSB SET 



All registers are used in verifying register integrity & 
some registers are used in the ALU functionality. 

If any ERROR is detected within the 2901 test, the processor will report 
immediately and Stop any further execution. 

NOTE: Errors in this routine display the following in the SA register; 
104040 - ALU test error 



000186 


136S40 


O4O2O0 


140031 


ALUTST: 


XOR\F 


#BIT15, 


RO 


OO0 167 


03S540 


030O0 1 


140031 




BIC\F 


•BITOO, 


RO 


000 170 


004240 


040000 


050031 




CLR\F 







000171 


033441 


010000 


050031 




MOV\F 


RO, R1 




OO0172 


020140 


017001 


140031 




ADD\P 


R 1 \0 , RC 


, BAR 


000173 


100240 


030000 


040031 




INC\F 







000174 


102240 


020000 


1 50031 




NEG\F 







00017S 


00004 1 


O40O01 


1 4003 1 




ADD\F 


R1\0,0 




OO0176 


007240 


O20O00 


05003 1 




COM\F 


9 




OO0177 


004260 


030000 


050200 




CLR\T 







OO020O 


101 640 


030002 


050031 




SUB\F 


#2.0 




O002O1 


O33240 


040000 


040031 




MOV\F 


0. RO 




OO0202 


1 16540 


010200 


150031 




XOR\F 


KBIT 15 , 


RO\N 


OOO203 


03374 1 


010017 


050031 




MOV\F 


#15 . ,R 




000204 


043440 


010000 


140206 


1$: 


SHF\ROF 


RO 




O0020S 


031441 


000001 


1 10204 




DEC 


R1 




000206 


01344O 


000000 


000000 


2$: 


TST 


RO 




000207 


013240 


040000 


14003 1 




TST\F 







000210 


043440 


04O0O0 


14003 1 




SHF\ROF 


RO 




0002 1 1 


013440 


000000 


OOOOOO 




TST 


RO 




00021 2 


1 14 640 


030200 


O4003 1 




BIT\F 


#BIT15, 





000213 


003740 


030017 


14003 1 




MOV\F 


#15 . .0 





7.JNLSB 


ERRB1A 


RO = 7FFF NEG CLEARED 




%JNEG 


ERRBIA 


RO = 7FFE LSB CLEARED 




%JLSB 


ERRS1A 


> ZERO SET 




7.JN2R0 


ERRB1A 


R1 > 7FFE ZERO CLEARED 




%JZRO 


ERR31A 


AD ■ 2/RO = FFFC/NEG SET 




•/= J N N E G 


ERRB1A 


= 1 CARRY CLEARED 




%JCRV 


ERRB1A 


= FFFF LSB SET 




7.JNLSB 


ERRBIA 


= 7FFD CARRY SET 




%JNCRY 


ERRS 1 A 


! 8002 NEG SET 




%TNNEG 




DO NOT EXECUTE AN INSTRUCTION/SIGNAL CHANGE 


•> 


7. J N N E G 


ERRB 1 A 


= 6000 LSB CLEARED 




7.JLSB 


ERRB 1 A 


RO : 6000 ZERO CLEARED 




%JZRO 


ERRBIA 


RO = BIT15 ZERO SET 




7.JNZR0 


ERRBIA 


COUNTER R1 : 15. 




7.JZR0 


2$ 


SHIFT RIGHT WITH 0, RO . . . I F ZERO FLAG 
SET HERE... GO CHECK RO AND FOR SWAP 




7. J MP 


1$ 


IF NOT DONE DECREMENT SHIFT COUNTER 
IS LSB SET IN R07 




7.JNLSB 


ERRBIA 


ERROR IF NOT 

IS LSB SET IN 0? 




7.JNLSB 


ERRBIA 


ERROR IF NOT, ELSE 

SHIFT RO 6 RIGHT ONCE MORE 
SET HERE... GO CHECK RO AND FOR SWAP 
IS MSB SET IN RO? 




7.JNMSB 


ERRB 1 A 


ERROR IF NOT 
IS MSB SET IN 0? 




7. J MSB 


ERRB 1 A 


ERROR IF YES 
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******* 



If NOT 0, then hang otherwise load with 15. , for checking pest of 



r eg isters. 



Loop to check all registers by WALKING a 



f r oni carry to 

carry with a register and writing and comparing it with the rest of 
the registers. Any stuck bits will propagate and be detected. 

RO should be 100000 now 

This loop should start with RO equal to 1OO0OO 



0002 14 
000215 
000216 
0002 17 
000220 
000221 
000222 
000223 
000224 
000225 
000226 
000227 
OO023O 
00023 1 
000232 
000233 
000234 

000235 

000236 

000237 



073440 
033441 
033442 
033443 
033444 
033445 
033446 
033457 
O33450 
033451 
033452 
033453 
033454 
033455 
033456 
033447 
036147 

001240 

053440 

133744 



OOOOOO 
OOOOOO 
0O0O01 
000002 
000003 
000004 
0OOO05 
0O0006 
0000 17 
0O0O10 
00001 1 
000O12 
0000 1 3 
0000 14 
0000 15 
0000 16 
OOOOOO 

010000 

OIOOOO 

030362 



OOOOOO 
OOOOOO 
OIOOOO 
OOOOOO 
OOOOOO 
OOOOOO 
010000 
10000 
OOOOOO 
OOOOOO 
OIOOOO 
OOOOOO 
OOOOOO 
OOOOOO 
OIOOOO 
OIOOOO 
OOOOOO 

05003 1 

040214 

1OO03 1 



Errors 
104040 



ROT\L 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

XOR 



n this routine display the following in the SA register; 
ALU test error 



RO 

RO, Rl 
R1 , R2 
R2, R3 
R3, R4 
R4, R5 
R5, R6 
R6. R17 
R17. RIO 
R10.R1 1 
Rl 1 .R12 
R12.R13 
R13 ,R14 
R14.RI5 
R15 ,RI 6 
Rl 6 ,R7 
RO, R7 



DEC\F %JN2R0 ERRBIA 

R0T\RF RO 7.JN2R0 SFT20 

MOV #<L60S+IN0 I AG> , CRI 7.JNEG ERRBIA 



ROTATE RO LEFT WITH BIT 15->BIT 



R2 = R1 


R3:R2 


R4iR3 


R5 = R4 


RS = R5 


R17iR6 


R10:R17 


Rl 1 :R10 


R12:R1 1 


R13:R12 


R14:R13 


R1S:RI4 


Rl 6:R15 


R17iR1 S. 


HERE COMP 


SUPPOSEOL 


ERROR IF 


DECREMEN 


LOOP IF 


CHECK TO 


ERROR IF 


ALL LEOS 



.LINKS ALL REGISTERS 

ARE RO (IMAGE) WITH LAST REGISTER 

Y CONTAINING THE SAME INFO AS RO 

NOT EOUAL , ELSE 

T SHIFT COUNTER. 

NOT ZERO. ELSE 

SEE NEG ISN'T SET. 
STILL NEG AFTER RIGHT ROTATE / 

OFF 8 SET OIAG MODE. 
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*************** 



********************* 
FORCE THE PAR (pipeline address re 



ister! 



INTO THE VECTOR TABLE 



R11 IS THE DBR. AS INPUT INTO THE VECTOR TABLE, IT EQUALS THE 

RAM PARITY ERROR SHIFTED VALUE. ON RETURN IT SHOULD EQUAL THE RAM 

PARITY ERROR. 

PAR WILL HOLD THE ADDRESS IN THE VECTOR TABLE WHERE THE PROC WILL 

GO TO. CRI IS TESTED IN THE VECTOR. OPM BIT HAS TO BE CLEARED. 

Errors in this routine display the following in the SA register; 
104040 - ALU test error 



iD 



******** 



********************** 



QQ0240 
OQ024 1 



OO0374 
OO0242 



000243 

000243 



000244 
0O0245 



000003 
000246 



000247 
000247 



1737B1 
Q36SS1 



1737S1 
03B5S1 



000040 
000004 



013740 002374 



130242 
100243 



000040 
0QOOO4 



12024B 
I 10247 



013740 002003 



HI . OFF 
1$: 



013440 0100O0 0OOO32 2$: 



LO. OFF 

3$: 



013440 O10O00 OOOQ32 4$: 



MOV\L 
XOR 



#ER.SAP,RI 1 
#ER . RAP , Rl 1 



i HIPAR - 740O 

MOV #HI . OFF,\N , PAR 



ASSUME HI .OFF, EQ, 374 
NOP 



MOV\L 
XOR 



#ER.SAP,RI I 
#ER.RAP,R1 1 



= LOPAR - 7400 

MOV OLO.OFF, \N.PAR 



ASSUME L0.0FF,E0,3 
NOP 



'/.CALL 

7.JMP 



%CALL 

7.JMP 



1$ 
2$ 



7.JNZR0 ERRB1E 



3$ 
4* 



7.JNZR0 ERRB1E 



;TEST THE PAR / SET RETURN IN STACK 
;TEST RESULTS OF R11 OURING PAR VECTOR. 



;LOAD PAR OFFSET TO VECTOR TO HI ADDRESS / 
; ERROR IF PAR NOT FORCED TO HI VECTOR ADR. 



ERROR IF INCORRECT RESULTS DURING 

VECTOR ROUTINES 

TEST THE PAR-SET RETURN IN STACK 

TEST RESULTS OF R11 DURING PAR VECTOR. 



;LOAO PAR OFFSET TO VECTOR TO LO ADDRESS / 
; ERROR IF PAR NOT FORCED TO LO VECTOR ADR. 



;ERROR IF INCORRECT RESULTS OURING 
; VECTOR ROUTINES 



0O025O 100240 000000 110524 



********************************************* 

INCREMENT TEST (TSTCNT* 0) AND RETURN 
********************************************* 
INCRTN: INC TSTCNT 7.JMP TSTRTN 



INCREMENT TSTCNT(O) * RETURN 
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*************** 



********** 



CONTROL REGISTER DATA INTEGRITY TEST 

Loop data around the O-PROC Control Register. 

Don't test BITOS, this bit is not loadable from this register. 
Don't test BIT06, this bit is the enable RAM PE high and will 
be t est ed later . 



REGISTERS USED: 

Rl is a temporary register. 

This code starts at bit position BITOO, 
skips over bit position BITOS (SERIAL), 
Skips over bit position B I TOS ( RAMPE ) , 
and ends at bit position BIT1S (LEDS). 

Errors in this routine display the following in the SA register; 
105102 - Control register test error 



******************** 



************ 



*********** 



*********** 



0002S1 
000252 
000253 
000254 
000255 
0OO256 
000257 



000261 
000282 



033741 
013440 
033702 
03SS42 
016141 
073441 
016541 



000001 
004001 
OOOOOI 
0QQ040 
000002 
O10OO1 
030040 



01 6541 
073461 



0QQ100 
1Q001 



010000 
000000 
OOOOOO 
OOOOOO 
OOOOOO 
040035 
15QS24 



000260 073461 1 OOO 1 140261 



010000 
150263 



MOV 

MOV 

MOV 

BIC 

XOR 

ROT\LF 

XOR\F 



#BIT00, Rl 

Rl , OCRD 

(OCRS) ,R2 

•/SERIAL, R2 

R2, R1\N 

Rl 

♦SERIAL, R1\N 



ROT\LT Rl 



XOR #RAMPE,R1\N 

ROTXLT Rl 



000263 013440 OOOOOO 110252 



7.JNZR0 
7.JMSB 



7.TZR0 
7. J MP 



ERRB2E 
TSTRTN 



LOAD Rl WITH STARTING POINT 

LOAD CONTROL REGISTER 

GET OATA FROM CONTROL REG 

IGNORE LO BYTE 

HAS DATA BEEN DESTROYED? 

ERROR IF SO, ELSE SHIFT DATA. 

EXIT IF LAST BIT TESTED, ELSE 

IS THIS THE SERIAL BIT? 
ROTATE LEFT IF YES, ELSE 

CONTINUE. 
IS THIS THE RAMPE BIT? 
ROTATE LEFT IF YES, ELSE 

CONTINUE. 
DO NEXT BIT POSITION 






KDB50. MICROCODE., 22- APR-1988 11:27:16.96 



KDBOP DIGITAL EOUIPMENT CORP. 

KDB O-PROC DIAGNOSTICS 



2901 ASSEMBLER VERSION 32 



PAGE 092 






*********************************** 

TEST ROM PARITY ERROR 

I nput : 

STACK set fop return. 

Errors in this routine display the 
104041 - ROM parity test error 



following in the SA register; 



000264 
0002S5 



013440 
013440 



000000 
000000 



130O13 
100032 



TSBRPE: NOP 
NOP 



7.CALL 

% JMP 



TSCRPE 

ERRB1 E 



A CONTROL ROM PARITV ERROR 
ERROR IF IT DOESN'T VECTOR, 
SHOULD VECTOR BEFORE JUMPING TO ERROR ROUTINE. 
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a 
< 

a 

H 

s 

cc 
O 

u. 

CO 

o 

CO 



177777 
141520 

00026S 
000267 
000270 






034453 
036551 
133752 



00001 3 
000005 
010377 



120264 

oooooo 

050032 



000271 033552 000377 120276 

000272 036551 0000 15 010000 

000273 131153 O 1 00 1 2 050032 



000274 133744 034363 100032 

000275 013440 OOOOOO 100250 



********************************************************************** 

D-PROC CROM PE S TIMEOUT TEST 

REGISTERS USED: R11 (OERI HOLDS THE VECTOR ERROR CODE 

CALLS TSCRPE -> A KNOWN BAD PARITV LOCATION. 

TSTRTN - ONE INSTRUCTION (RET) FOR TIMING AND SETTING 

THE STACK 
TMOUT TO TEST THE D-PROC'S TIMEOUT CAPABILITY 

NOTE : 

THE MAXIMUM TIME ALLOWABLE FOR A TIME OUT IS 

.177778 SECONDS . 45H2«8. SO THE NUMBER OF 

TIMES THROUGH A NINE INSTRUCTION LOOP = 61220. 

.177778 = 91* OF 1NSTI « 3 63* 1 0* * - 9 I I NST TIME) « 61220. 

THE MINIMUM TIME ALLOWABLE FOR A TIME OUT IS 
.107778 SECONDS : 65H2«7. SO THE NUMBER OF 
TIMES THROUGH A NINE INSTRUCTION LOOP < 37114. 
.107778 r 8 * 363*10**-9 * 37114 

THE DIFFERENCE BETWEEN THE TWO TIMES IS .07 SECONOS 
THE LOOP DIFFERENCE * 24106 IF THE MINIMUM TIME OUT 
OCCURED. R12 SHOULO s 24106. 

Errors in this routine display the following in the SA register; 
104041 - ROM parity test error 
104041 - Timeout test error 



MAXTIM 
MINTIM 



********** 



: = 65535 . 
: = 50000. 



*********** 



********** 



CLR 
XOR 
MOV\F 

BIS 
XOR 
SUB\F 



MOV 
NOP 



R13 %CALL TSBRPE 

*ER. ROP, R1 I 

#MAXTIM«HIBYT,R12 %JN2R0 ERRB1E 

#MAXTIMgL0BYT,R12 XCALL TMOUT 

#BR. TMO, R1 1 

R12.R13 %JN2R0 ERRB1E 



********* 



TEST ROM PE / R13 : O FOR TIME OUT TEST 
CHECK ERROR CODE IN D ERROR REG 
ERROR IF NOT ZERO, ELSE 

R12 : LOOP COUNTER 
GO TO A TIMEOUT 

CHECK ERROR CODE IN ERROR REG 
ERROR IF NO VECTOR OCCURED. ELSE 

SEE IF TIME OUT TOO SOON. 



#<LEOS+OOOP+INDIAG>, CRI , DCRO %JNEG ERRB 1 E ; ERROR IF TIMEOUT / 

; ALL LEDS»ODO PAR I T Y-t-0 I AG MOOE. 
7.JMP INCRTN ;JUMP TO INCREMENT TEST NUMBER ANO 
; RETURN. 
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******** 



TIMEOUT ROUTINE 

The timeout circuit is enabled when ever a successful jump is 
executed. Falling through to the next instruction resets the 
timeout circuit. Timeout errors DO NOT occur on the UPROC. 

This routine will loop until a timeout occurs or until the 
maximum timeout limit is exceeded. 

REGISTER USeO: 

R12 is used for loop control. 

R13 gets the value reflecting the minimum timeout allowed. 

Errors in this routine display the following in the SA register; 
104041 - Timeout test error 



O 



***************** 



******** 



00027S 


1 33544 


014362 


010300 


TMOUT : 


BIS 


000277 


013440 


oooooo 


100032 




NOP 


000300 


133553 


000074 


100301 


1$: 


BIS 


000301 


033553 


000257 


1 10302 


2$ 




BIS 


000302 


013440 


OOOOOO 


1 1O303 


3$ 




NOP 


000303 


031452 


0000 12 


1 10276 


4$ 




DEC 



#<LEDS+INOIAG> .CRI , OCRO 7.JN2R0 1$ 
*/.JMP ERRB1E 

#<MAXTIM-MINTIM>«HIBYT,R13 %JMP 2$ 
#<MAXTIM-MINTIM>«LOBYT, R13 %JMP 3S 

%JMP 4$ 
R12 7.JMP TMOUT 



END OF ALL BOARD 1 TESTING 
;*************************************** 



;IF NOT DONE, WASTE MORE TIME 
;ERROR IF HERE. 

IFOLLOWING LOOP FOR TIME OUT 

; MAX TIME OUT = .17776 SEC « 4SHZ*S 

;LOOP ITERATION! 61220-MAX OR 37116-MIN) 

**************************** 



******** 



********* 
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*********************** 



RAM PE 

USES RO, R1 1 (DER) 



BAR AND BUF LOC O S 1 



CALLS THE ' RAMPET • ROUTINE FORCES A RAM PARITY ERROR 
FOR ITSELF, THEN SETS UP A PARITY ERROR FOR THE 
U-PROC BY SETTING A PARITY ERROR IN ADDRESS 
OF RAM. ITS PARITY ERROR IS IN ADDRESS 1 OF RAM. 

RAM ADDRESS O CONTAINS THE U-PROC RAM PE 
RAM ADDRESS 1 CONTAINS THE D-PROC RAM PE 

- Only the D-PROC can enable RAM PARITY errors - 

I nput : 

Output : 



Set ODD PARITY (OOOP) in OCR. 



R1 is a temporary reg. 
R1 1 (DER) is cleared. 

Errors in this routine display the following in the SA register; 
1O5102 - RAM parity error 



************ 



**************** 



000304 133745 00O100 130311 

000305 013440 OOOOOO 13031S 

000306 036551 00OO04 010000 

000307 013440 O 1 OOOO 010035 

000310 033444 004004 100250 



RAMPE: 


MOV 


#<1024 .*16 


>,UBAR %CALL 


RAMZAP 




NOP 




7.CALL 


RAMPET 




XOR 


#ER .RAP, R1 








NOP 




7.JNZR0 


ERRB2E 




MOV 


CRI , .OCRD 


%JMP 


INCRTN 



000311 031445 

000312 016S45 

000313 034442 

000314 013440 



007005 010000 RAMZAP 

030034 127777 

010002 173602 

003002 100311 



***************************************** 
ROUTINE TO SAVE LAST FAILURE AND ZAP RAM 

***************************************** 
DEC UBAR, , BAR 

XOR #FAILUR, UBAR\N %RNEG 
CLR\F R2 7.CZR0 S.L0R2 

MOV R2.SUF %JMP RAMZAP 



****************************** 

SET UBAR TO 16K, ZERO RAM WITH 000 PARITY SET 
FORCE PARITY ERROR 

TEST RESULTS OF R11 DURING RAM PARITY VECTOR. 
ERROR IF INCORRECT RESULTS DURING 

VECTOR ROUTINES. 
RESET LEDS 1 REENABLE SIGNALS / 

INCREMENT TSTCNT(O) 4 RETURN. 



LOAD RAM ADDRESS / 

DONE ZEROING RAM? 
RETURN IF DONE / 

IS UBAR * FAILUR7 
SAVE BUFFER DATA IN R2 , ELSE 

CLEAR R2. 
LOAD R2 INTO BUFFER / NEXT RAM LOCATION 



W^ 
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************ 



SET UP THE RAM PARITY ERROR IN LOC AND I 



fl 

V^ 



0003 IS 
00031S 

0003 1 7 

000320 
00032 1 



133744 
014440 
133544 

033544 
013740 



004362 
007OO0 
00OO01 

004100 
00700 1 



OIOOOO 
133623 
123623 

010O00 
I 10035 



NOTE: Errors 
105102 



MOV 
CLR 
BIS 



n this routine display ttle following 
RAM parity error 



the SA register; 



****** 



BIS 
MOV 



#<LEOS*INOIAG>,CRI,OCRO 
,\N,BAR 7.CALL 

#ODDP,CRI '/.CALL 

#RAMPE, CRI , DCRD 

# IAN, BAR %JMP 



S . CLRB 
S . CLRB 



WRITE EVEN PARITY 
WRITE EVEN PARITY / 



SET EVEN RAM PARITY. 
LOC O <- PARITY ERROR. 
LOC 1 <- PARITY ERROR. 

SET ODD PARITY IN CRI 
ENABLE RAM PE . 
CAUSE PROC TO VECTOR BY LOADING 

THE DBAR -> ADRS 1 WITH ODD PARITY. 

VECTOR WILL OCCUR AFTER THIS INSTRUCTION, 

IF NOT, REPORT ERROR. 
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************** 



RAM BUFFER TEST (Duration 
I nput : 
Out put : 



none 

Each l ocat i on 



in RAM will De ZERO . 



a 

< 

D 

a 

ii 

2 
a 
O 
u. 

co 
o 
en 



REGISTERS USED: 

RO has OLD buffer value 

R1 has NEW buffer value 

RSIUBAR) has BAR value 

R6 is the increment value (1 or -1} 

RIO saves the starting value 

TEST DESCRIPTION: 

The A 1 gor i t hm; 

1. Fill the RAM with all zeros. 

2. Starting with the lowest address, read a location, 
verifying the previous write, write a one in a single 
bit position (starting at the LSB), and read the same 
location, verifying the write. 



Repeat step 2 until the highest 
is reached. 



iddr ess 



in the 



RAM 



Starting again at the lowest address, repeat steps 2 
and 3 for every bit of the data word. 

Starting again at the lowest address, repeat steps 2, 
3, and 4, but this time putting zeros back into each 
Bit . 

Now, starting with the highest address, repeat steps 

2, 3, 4, and 5, but stepping through the memory in 

reverse order, from highest address to lowest 
address . 



c 



Errors in this routine display the following in the SA register; 
10S103 - RAM buffer error 



- s*x*x****x******* 



*«**«*** 



c*s**ssx* 
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000322 

000323 

000324 
00032S 

000326 
000327 

OOO330 

000331 

000332 
000333 
000334 

000335 
00033S 

000337 
000340 
000341 



0O0343 
000344 



033746 

13374S 

034440 
133750 

016542 
033445 

OISSOO 

013441 

033445 
01S501 

0301 45 

033442 

I3SS42 

033440 

176541 
13244B 



OOOOOI 

000100 

000000 
000100 

000034 
017005 

030003 

013001 

007005 

000003 
010006 

000005 

000300 

000001 
010200 
000006 



1 30250 

13031 1 

000000 
100343 

010000 
140334 

100337 

040035 

oooooo 

10000 
050035 

OOOOOO 
100326 

OOOOOO 

010344 
10000 



137750 030300 010250 



033741 

033445 



000001 
007010 



10000 
1 10326 



4$: 
5$: 



MOV 

MOV 

CLR 
MOV 

XOR 
MOV\F 

XOR 

MOV\F 

MOV 
XOR 

AOO\F 

MOV 
BIC 

MOV 

XOR\L 

NEC 



MOV 
MOV 



#1 , R6 

#< 1024 . * 16. > 



%CALL INCRTN 
UBAR '/.CALL RAM2AP 



RO 

*< 1024 . * 1 



6. > ,R10 7.JMP 4$ 



#FAILUR, R2\N 
UBAR, , BAR 

I BUF) , RO\N 

R1 , \N.BUF 

UBAR, , BAR 
(BUF) ,R1\N 
R6.UBAR 

UBAR.R2 
#BIT15! BIT 14, 

R1 ,R0 
#100000, R1 

R6 

#<1024 . * 1 6. >- 

#1 , R1 

RIO, UBAR , BAR 



7.JZR0 


2$ 


7.JN6G 


3$ 


%JNZRO 


ERRB2E 



%JNZRO ERRB2E 
R2 7.JMP 1$ 

7.JNZR0 5$ 
1 ,R10 7.JNNEG INCRTN 

%JMP ' 1$ 
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INITIALIZE R6 VALUE / 

INCREMENT TSTCNT(O) S RETURN. 
GO INITIALIZE RAM 

INITIALIZE OLD BUFFER VALUE 
INITIALIZE R10 VALUE (16K) 

DOES UBAR : FAILUR? 
JUMP IF IT DOES, ELSE 

IS UBAR NEGATIVE? 
EXIT LOOP IF DONE / 

IS OLD BUFFER VALUE OK? 
ERROR IF NOT, ELSE 

WRITE NEW VALUE TO BUFFER. 
RESET RAM ADDRESS 
IS New BUFFER VALUe OK? 
ERROR IF NOT, ELSE 

SET NEXT RAM AOORESS. 
SAVE RAM ADDRESS IN R2 
GET RID OF JUNK BITS a 

DO NEXT COMPARE. 
THE NEW SUFFER VALUE IS NOW THE 
COMPUTE NEXT NEW BUFFER VALUE 
CHANGE SENSE OF RS 

OONE WITH TEST (DID R6 GO FROM -1 
;RETURN IF DONE / 

RIO HAS NEW ENDING ADDRESS (16K-1) 
INITIALIZE NEW BUFFER VALUE 
RESET STARTING VALUE 



o 



OLD BUFFER VALUE 
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LEV02 
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*********** 



SDI CLOCK ROUTINE 



Errors in this routine display the following 
105152 - SDI error 



:n the SA register; 



********* 



******** 



000345 

0003 4 6 
000347 



00035 1 
000352 



034515 
016155 
013440 



I 10002 
150014 
010000 



1704SS 145016 



013440 
133755 



1 lOOOO 
150200 



000036 
000036 
010036 



140036 

100036 



ANO 
XOR 
NOP 



(RTDS) , R1 5 
R14, R15\N 



•SJNCSR 
7.JN0SR 
•.JNZRO 



ERRB2H 
ERRB2H 
ERRB2H 



SDICL1: INC\LF R16,,RTCS 



7.JDSER ERRB2H 



NOP\F 
MOV 



%JCSR 
%JDSR 



ERR62H 
ERRB2H 



0003S3 033555 000163 



0RWRDV.R1S 

#<ATTN+DRDY+SEC+IDX+AVAIL> ,R15 XJMP 0CLK4S 



;ERROR IF RTCS NOT READV 

;ERROR IF RTDS NOT READV 

TERROR IF RTDS DATA NOT RECEIVED AS SENT BY 

;ERROR IF RTDS PULSE OR PARITV ERROR 
; RTCS: 1 ,3,7, F, IF, 3F.7F, FF 

;ERROR IF RTCS NOT CLEARED BY RTCS LOAD 

;ERROR IF RTDS NOT CLEARED BY RTCS LOAD 



SEND NEXT RTCS FRAME. 
R15: RTCS MASK 



KDBSO. MICROCODE., 22- APR- I 966 11:27:16.96 



KOBOP 
KDB D 



PROC DIAGNOSTICS 



DIGITAL EQUIPMENT CORP., 2901 ASSEMBLER VERSION 32 



************ 



************ 



********* 



SDI INTERCONNECT TEST 

This test sends data to the diagnostic wrap port by clocking it 
x amount of times, then checks fop the proper signals. All SDI 
related signals are checked for stuck at high or low states. 
Data is clocked thru the TTL (32. clocks) and ECL (33. clocks], 
t hen ver i f i ed . 

If a port wrap connector is inserted in J3 on the SDI board and 
PIN 23 EEXT.TEST L) is grounded, then all 4 ports (3 - o) will 
be tested in the same manor as the diagnostic wrap port. This 
ensure that the SI RCV/DRV components will be tested for each 
se 1 ect ed port . 

REGISTERS USED: 

R11 is NOT USED 

R12 has CL0K16 shift data to serdes read input 

R13 has CL0K16 number of clocks 

R14 has RTDS compare data 

R1S has RTDS bit mask 

RIG has RTCS data 

Errors in this routine display the following in the SA register; 
105152 - SDI error 



0003S4 13SS64 0643SO 1403S5 SDITST: BIC\T 



************************* 
#LEDS , CRI , DCRD %TDPF 



******** 



********** 



;IF OPF IS SET, REMEMBER WE ARE DOING 
i LOOP-ON-MICROTEST 

;;Get RTDS in sync with DPROC - RTCS a RTDS will always be at an unknown sync 



000355 034456 005478 130506 

000356 033756 005001 120507 

000357 073456 005016 000000 



000360 013440 150000 120510 

000361 034454 000674 120350 



000362 033554 000002 120345 

000363 133554 000200 130345 

000364 033554 000001 120345 



000365 031456 0000 16 120350 

KD80P KDB50 . MICROCODE ., 22-APR 



CLR RIE..RTCS IPSCLR '/.CALL OCLKRS 
MOV #1, R16, RTCS '/.CALL 0CLK48 
ROT\L R1 6, , RTCS 



;Sync RTDS to DPROC 



NOP 
CLR 



BIS 
BIS 
BIS 



7.CDSR 
(PRCLR %CALL 



#ATTN , R1 4 
#RWRDY , R14 
#DRDY , R1 4 



7.CALL 

•'.CALL 
7.CALL 



0CLK1 
S0ICL1 



SDICLK 
SDICLK 
SDICLK 



;CLEAR OUT RTCS / SET CLEAR / DO MANY CLOCKS 
•SET CONTINOUS S SEND FRAME WITH CORRECT PARITY 



CLOCK RTDS ONCE IF RTCS LOAD DID NOT CLEAR 5SDSR 
R14i RTDS COMPARE DATA / GET FIRST FRAME IN RTDS / 
RESET I/O CLEAR. 



Test for on next call: 

RTDSs #ATTN 

RTOSi RTDS*#RWRDY 

RTOSs RTDS+#DR0Y 



;RTCS= #WRT, 
;RTCS= RTCS+#RD, 
;RTCS» RTCS*#CRDY. 



;;Sand I WORD of ZERO'S 
DEC R16 
' 1988 11:27:16.96 



- RTDS Stays the same 

7.CALL S0ICL1 ;SEND NEXT DATA FRAME IF #CONT FAILURE* #SEC+#IDX 
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000366 053456 0000 16 10000 



000367 033554 00OO2O 120345 

000370 033554 000040 12034S 

000371 033554 0001OO 12034S 
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ROT\R R16 



:, 'These bits match between RTCS 5 RTDS 



BIS 
BIS 



#SEC,R14 
#I0X ,R14 
•AVAIL , R14 



7.CALL SDICLK 
'/.CALL SDICLK 
'/.CALL SDICLK 



Test for on next call : 

RTDSi RTOS+0SEC 
RTDSs RTDS+#IDX 
RTDS: RTOS*#AVAIL 



RTCS: RTCS+#INI , 
RTCSi RTCS+#RTCS13, 
RTCS: RTCS+»RTCS14, 
PARITY ERROR WILL BE GENERATED AFTER CLOCK CALL 



;;Force PARITY ERROR 



000372 
000373 



034456 
034452 



1 40476 
000672 



040036 
130345 



CLR\F 


R1 6 


IPS CLR 


7.JNDSER 


ERRB2H 


CLR 


R12 


PRCLR 


•/.CALL 


SDICLK 



ERROR IF NO RTDS PARITY ERROR 

SEND CORRECT PARITY TO STOP FUTURE ERRORS / 
RESET I/O CLEAR. 



; ; SO I t est done 



RTCS DATA s RTDS DATA: 
WRITE DATA = READ DATA: 



???? , 
0000, 



101, 01 
OOOI , 0003 , 



0007, OOOF, OOtF, 003F, 007F , OOFF, 01FF 



C 
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: ******* 



******** 



SDWRT : 
SDRD : 



SERDES WRITE MODE TEST 
SERDES READ MODE TEST 



FOR THE SERDES WRITE TEST: 
;NRZ SERIAL DATA IN >.- + (1)' 



o 



-( 1 S 1 - - 

2SBCH, 
FFFFH 



V V 
♦WRT--RD* 



SERDES 
IS 



+ TS- 
I 
V 



•TTL* I 
I I 
♦ -( 1 )-( -• 

(IS) 



+WRT- -RD+ 

SERDES 
10 

♦TS- -TTL + 



RSGEN 

ERR 



i 1 ) - > 



■-> NRZ SERIAL DATA OUT 



SOFTWARE CALCULATES THE SUM 



WHAT HAPPENS IF IPSSE I IPS E C C 



1 



WRITE MODE 

WRITE MODE 

READ MODE 

READ MODE 



TTl WRAP S016 -> SD10 ->S016 S NRZ OUT 

TTL WRAP SD16 -> SD16 < NRZ OUT 

TTl WRAP NRZ DATA IN -> SD1S a SD10 

TTL WRAP NRZ DATA IN -> SD16 * SD10 -> NRZ OUT 



The Diagnostic Clock and data out can be injected at the ECL encoder 
then wrapped through to the ECL decoder to the NRZ serial data in. It 
can also be wrapped bypassing the ECL and only using TTL paths. There 
is a one clock delay through the ECL path. 



********** 



******** 



********** 
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■PROC DIAGNOSTICS 



********** 
I nput : 
Out put : 



t ****** * 



ECC output will change 
REGS R7-R16 " " 



********** 



REGISTERS USED: 
R1 1 
R12 
R13 
R14 
R15 
R16 
R17 



USED FOR LOOP COUNTER 

HOLDS SERIAL DATA 

HOLDS * OF CLOCKS 

TEMP S HOLDS ECC REGISTER VALUE 

(D8AR) FOR BAR INCREMENT 

HOLDS ECC SUM 

SERDES PARALLEL DATA. ( READ ) = EDC, 



(WRITE)s WRITE DATA, 



LOAD R17 WITH VALUE 



CALLS SO.RS, CLK, SOCLK, GENSVN , GETECC, . GECC 

******************************************************** 



******** 



< 

O 

II 

s 

EC 

o 

u. 

v> 
o 



c 
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P™\ 



WRITE MOOE 



********************* 
WRAP SERDES 16 ONLY 



********* 



This test checks the parallel data, residue ready, overrun and 
WRC signals for being stuck high or low. A sync pattern is 
loaded in the SERDES 16. After the required amount of clocks, 
a pattern is read. The pattern has become skewed by this 
method, but is equal to a specific value. The pattern is 
verified and checked for stuck at high or low states. 



WORD 1 2 3 

WRITE DATA : 26BC, 8000, COOO, EOOO 



= 2 BIT TIMES 



FOOO, . . . FPPF , O, 
WRC RELATIONSHIP IF SERDES 16 



SOOO, 
IN WRONG MODE 



254 
FFFF 



2S5 2S6 257 
0, 8000, EDC: 



258 -> 
COOO, ECC 



6 BIT 
SD16 



10 BIT 
S016 



16 8IT 
SO 16 



10 BIT 

S010 



TEST WRAP HERE S HERE 



TEST 7.RRDY 



NOTE: Errors in this routine display the following in the SA register; 
1051S3 - Write mode, wrap SERDES 16 error 



000374 0337S1 OOOOSO 130514 SDWRT: 



000375 
000376 

000377 
000400 

000401 

000402 
0004O3 



033453 
014440 

024452 

133754 

150454 

013440 
016514 



0007 1 1 
0O5740 

006452 

170257 

000774 

160720 
170646 



130533 
010000 

120513 

1 1003S 

1 205 10 

010036 
01003S 



********************** 
MOV #<39.+1>,R11 
;;Send PARALLEL data 

MOV R11.R13 0>SSE 7.CALL GENSYN 

CLR RO.RTCS IPSECC 

;;Send the SYNC character 

CLR R12\0,R12,SD IFSCMD 7.CALL OCLKOO 

MOV ##257, R14 */.JWRC ERRB2H 

INC\R R14 IPSECCT SCALl 0CLK1 

NOP PSRM 5UN0VER ERRB2H 

XOR (SD),R14\N (PRCMD XJNWRC ERRB2H 



************************************************ 
%CALL SD.RST ;CLOCKS TO FIRST TEST POINT. INITIALIZE SERDES 



; t emp bic #bit15,cri 
KOBSO. MICROCODE. .22-APR-I93S 11 :27: 16.96 



%jnzro errb2h 



SET SERDES ENABLE / 

GENERATE SYNC PATTERN 8 SERDES 
SET ECC ENABLE (SERDES 10 ENABLE] FOR RRDY TEST 



SEND SYNC PATTERN TO SERDES 8 RETURN FROM CLOCK 

ROUTINE JUST BEFORE WRC DOWN THIRD TIME 
ERROR IF WRC TO EARLY / 

R14 s SHIFTED SYNCs D780H 
CLOCK 1 TIME / SET ECC TIME 

ALLOWS FOR ECL OR TTL CLOCK WRAP 
ERROR IF OVERRUN NOT TURNED ON 
ERROR IF WRC LATE / 

SD: D780H: 153600 
ERROR IF NOT WRAP PROPERLY. R16= ECC SUM 
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000404 013440 01O6OO 010O36 



000405 033753 000045 1305 11 

000406 033755 007060 120525 



PROPF %JNZRO ERRB2H .ERROR IF NOT WRAP PROPERLY. R16: ECC SUM 
; WRITE MOOE - G>ROPF= WRITE CLKS 



; ; Test 7.RRDY 



MOV 
MOV 



#37 . ,R13 
#60, OBAR.BAR 



%CALL OCLK ;GENERATE 37. CLOCKS 

%CALL D . RRDY ;TEST %RROY / OBAR. BAR -> LOC 60 
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000407 033751 000021 130514 



000410 033453 0007 11 130533 



000411 024452 006752 120453 TP010: 



000412 033750 1OOO60 020452 



000413 033751 000005 120501 

000414 034456 1000 16 010036 

000415 073751 0003 12 130501 



000416 033751 000004 130S01 



O00417 033455 O0777O 010000 TP011: 
000420 033751 000020 13050 1 



000421 033751 0000 10 OOOOOO 

000422 034457 O0O577 130501 



000423 133753 000060 12053 1 

000424 013440 010520 000036 



♦ ••at************************************* 

WRITE MODE - WRAP SERDES 16 3 SERDES 10 
***************************************** 

MOV #17.,R11 %CALL SD.RST 

;;Send PARALLEL data 

MOV R11.R13 IPSSE %CALL GENSVN 

;;Send the SYNC character 

CLR R12\0,R12,S0 (PSECC 7.CALL CLKP 

;;Se1f adjustment for TTL or ECL wrap 

MOV #60,R10 %CNPRDV CLK1 

;;Send 256. WOROS of data (10. BITS at a 

MOV #S . ,R1 1 %CALL SOCLK 

CLR R16 %JNPRDV ERRS2H 

MOV\L #<404 . /2>, R1 1 %CALL SOCLK 



******************* 



RESET I0CS/R11 HAS CLOCK COUNT 



GENERATE SYNC PATTERN 1 SERDES 



SEND SYNC PATTERN TO SERDES CLOCK 17 TIMES SO 
RETURN FROM CLOCK ROUTINE AT START OF WORD. 
CLEAR R17 SO OATA» 1,3.7, ... FFFF, 0. 1 ... 
READ DATA > 1,3,7 77? 



ADJUST FOR ECL OR TTL WRAP. 

tliasl 

WORDS 1- 4. GET TO WHERE ECC IS VALID 

ERROR IF 4TH PROY NOT Set . (IN WORD 4 BEFORE LOAD) 

WOROS 5-256 



o 



; ; Load WORO 257 . 
MOV #4 . , R1 1 



'/.CALL SDCLK 



;WORD 257-255. R11: 4 10 BIT WORDS FOR SPRECCT 

; LET WORD 257= COOOH . IT IS NORMALLY THE EDC WORD 



;Load word 259. and set ECC time enable (CPSECCT) 



MOV 
MOV 



RIO.DBAR.BAR (PSECCT 
#1 6 . . R 1 1 7.CALL 



;ECC1 IN BAR: 62. 
;WORDS 259-265 



HERE IN WORO 2S9 BEFORE LOAO 



; ; Load word 269 . 



SOCLK 
and reset ECC time enaole (CRecCT) 



MOV 
CLR 



#» . ,R1 1 

R17 IPRECCT 



KDB5O.MICR0C00E. ,22-APR- 



; ; Load WORD 274 . 
MOV ##60,R13 
NOP IPRRM 

; Load WORD ??? . 
1965 1 1 :27 : 1 6 . 96 



%CALL S.SRM 
7.JNZR0 ERRB2H 



R11 = 273-269 WORDS IN 10 BIT MOOE 
WORDS 269-274. HERE IN WORD 274 BEFORE LOAD 
R17: O SO WRAP DATA = 3000H 



SET READ MOOE AND XOR (S0J,R11\N IPRECC 

HERE IN WORD 274 BEFORE LOAO 
ERROR IF IPRECCT DID NOT WORK PROPERLY. 

WRAP DATA WRONG BECAUSE PRCMD NOT WRAPPING 

SD16 -> SD10 -> SD1 6 
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0004 2 5 03375 3 000040 1304 6 4 
00042B 133751 000337 120531 

000427 O30156 O 1 OO 1 1 010036 
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MOV 


#32 . , R13 


7.CALL 


CLK 


MOV 


##337, R1 1 


7.CALL 


S .SRM 


ADD 


R1 1 , R1 6 


7..JNZR0 


ERR52H 



CLK16-> 1 CLK32-> O 
R13= O. R17: EDC VALUE 
ERROR IF ORECC NOT WORKING. 

DATA SHOULD BE : O 

R16 ADDITION TO MAKE ZERO FOR TEST 
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KDB D-PROC DIAGNOSTICS 

******************************** 



READ MODE - SERIAL LOAD SERDES 16 « SERDES 10 
NOTE: This uses 4 LEVELS so may have to be in calling level 

************************************************************* 



000430 
0O043 1 



000432 
000433 



OO0434 
OO0435 



000436 
000437 



030666 
033766 



030156 
030156 



0337S1 
013444 



01 3460 
133644 



000000 
037060 



0000 17 
030017 



000042 
10004 



030600 
004360 



1 30440 
010036 



120440 
1 10036 



120S37 
040036 



150437 
1 102S0 



TP014 : 
TP016 : 



ADD 

MOV 



ADD 
ADD 



MOV 
TST\F 



#0,R1 6 

#60, 08AR, BAR 



R17.R1 6 
R17, R1 6 



#< 17. *2> . R 1 1 
CRI 



0ROPF 
#LEOS. CRI ,OCRD 



•'.CALL 
%JNNEG 



"'.CALL 
"/.JNEG 



•/.CALL 
7.JN2R0 



% T N E G 
%JMP 



ECCRD 
ERRB2H 



ECCRD 
ERRB2H 



GETECC 
ERRB2H 



;MAKE R16= FOR LAST TEST 

;ERROR IF RSGEN GIVES ECC ERROR 

; CLEAR OBAR SO ECCRD: WILL WRITE OVER ECC SYMBOLS 

jTEST FOR ECC ERROR. ADD READ EDC TO ECC SUM 

;ERROR IF RSGEN NOT GIVE ECC ERROR 

; ADD READ EDC TO ECC SUM 

;GET ECC RESIDUES: ECC ERROR 

;ERROR IF ECC SUM (RI6) NOT CORRECT 

;RESET DPF IF NO LOOP-ON-TEST 

.'DESELECT DIAGNOSTIC WRAP PORT 
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************************************ 
READ MODE - TEST SERDES 16, SERDES 
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10, RSGEN AND ECC CIRCUITRY 



This test simulates writing a sector's worth of data to the disk 
and makes sure that the timing between the SERDES 16 and SERDES 
10 is correct and the summation of wrapped data doesn't get 
altered. Then, the test simulates a read from a disk. It 
tests the ECC circuitry and the RSGEN chip. An error indicator 
on the RSGEN is tested for being stuck high or low. The timing 
between the SEROES 16, SERDES 10 and the RSGEN is checked. 

Errors in this routine display the following in the SA register; 
105154 - Read mode, SEROES 16, 10 RSGEN and ECC circuitry error 



000440 013440 OOOOOO 130518 ECCRD: 



000441 01345S 000716 130533 



000442 170451 000753 130460 TP012: 



;:Entry condition, R13 : o 

NOP 7.CALL 
;;Send PARALLEL data 

TST R1S IPSSE 7.CALL 

;;Send the SYNC character 
INC\L R13.R11 CPSECC %CALL 



PRESET IOC'S 8 DO NOT CLOCK. RI3: CLOCK COUNT 



GENERATE SYNC PATTERN S SERDES 
ADD R17 TO R16 SO R16 WILL KEEP ECC AND EDC SUM 
TST R16 is for DEBUG. 
NOP may be used. 



;SENO SYNC PATTERN TO SERDES CLOCK 17 TIMES SO 
; RETURN FROM CLOCK ROUTINE AT START OF WORD. 



; temp 
; t amp 



bis 
clr 



#bit 1 5, cr i 
r 12 



#*Y 



000443 034452 000412 12OS01 

000444 033757 000105 OOOOOO 



00044S 033751 000377 120501 



000446 034452 000772 1 OOOO 

000447 033753 000O10 130464 



CPSOPF 



leal 1 
'/.CALL 



CLR R12 

MOV #69 . , R1 7 

;; Send 255. WORDS of data (16. 

MOV #255 . , R1 1 7.CALL 



sdc Ik 
SDCLK 



BITS at 
SDCLK 



;S6ND 2 WORDS. R 1 1 = 2. (PSOPF: 



;SEND 2 WOROS. R 1 1 * 2. 0>SOPP: 
; CLEAR R12 SO DATA: 1,3.7. .. 



READ CLKS 



REAO CLKS 

, FFFF, 0. 1 . 



tins) 
;WORDS 3-257. 



LET EDC: COOOH 



;;Unloacl word 256. and set ECC time enable (PSECCT) 



CLR 

MOV 



R12 (PSECCT 
#8 . ,R13 



000450 033755 00706 1 OOOOOO 

000451 033751 OOOO 1 6 120500 TP013: 
KDBDP KDBSO. MICROCODE ., 22-APR- 



7.CALL CLK iSEND FILL 8 I TS 
;;Send WORD 257. - 265. and ECC symbols 1 - 14. 
MOV #6 1 , DBAR, BAR 



ECCt AT DBAR: 610. 
HERE IN WORO 2S7 BEFORE UNLOAD 



MOV #14 . ,R1 1 

19 8 8 11:27:16.96 



■/.CALL RDCLK 



.UNLOAD WOROS 257- 265. 



KOBOP DIGITAL EOUIPMENT CORP. 
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000432 013440 000S60 000000 

000453 033751 000007 120500 

000454 013700 000007 127777 



, 2901 ASSEMBLER VERSION 32 PAGE 110 

; R11:I4 10 BIT WORDS TO CPRECCT 

; i Send WORD 266. and reset ECC t i ma enable (fPRECCT) 

;HERE IN WORD 268 BEFORE UNLOADED 
DCLK ;SEND EXTRA CLOCKS TO SEE IF RSGEN CLOCKS STOP 
;TEST FOR eCC ERROR ON RETURN. ERROR IF NEG: 1 



NOP 




CRECCT 




MOV 


#7. ,R1 i 




•/.CALL 


TST 


(ECC) 




%RET 



*Wv-^ 
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; ************ 



*********** 



********* 



- LEV03 BY RESET 
CLK: 
CLKI : CLKtO: 

I nput : 

R 
Output : 



*********** 
CLOCKING SUBROUTINES 



NUMBER OF SPECIFIED PULSES FOR THE CONTROL REGISTER 



R12 SHIFTED RIGHT R13 TIMES. 

REGISTERS USED: 

R11 s TESTED ON RETURN. USED FOR LOOP COUNTER 

R12 = HOLDS SERIAL DATA 

R13 s HOLDS # OF CLOCKS 

R16 s HOLDS ECC SUM 

R17 s SERDES PARALLEL DATA. (READ): EDC. (WRITE)* WRITE DATA 

CALLS SD.RS, CLK, SDCLK, GENSYN, , D.GECC 

Errors in this routine display the following in the SA register; 
105154 - Read mode, SERDES (6, 10 RSGEN and ECC circuitry error 



*********** 



000455 


0337S3 


000100 


100464 


CLK64 : 


MOV 


#64 . 


R13 




7.JMP 


CLK 


000456 


033753 


000040 


1O04 6 4 


CLK32 : 


MOV 


#32 . 


R13 




%JMP 


CLK 


000457 


0337S3 


000006 


1 10464 


CLK6 : 


MOV 


#6. , 


»13 




%JMP 


CLK 


0OO460 


033753 


000020 


100464 


CLK16 : 


MOV 


#16. 


R13 




%JMP 


CLK 


00046 1 


033753 


000012 


1 10464 


CLK10: 


MOV 


#10. 


R13 




%JMP 


CLK 


000462 


033753 


00000 1 


100464 


CLKI : 


MOV 


#1 . R13 




7.JMP 


CLK 












; ; Clock 


rout 


i ne 


Write 


= tpRDPF 


Read : 8 


000463 


013453 


1OO013 


100036 


CLKP: 


TST 


R13 






%JPRDY 


ERRB2H 


000464 


053452 


01001 2 


140505 


CLK: 


ROTNRF 


R12 






7.JZR0 


CLK01 


000465 


133564 


044010 


040466 




BIS\T 


#000 


CRI 


DCRD 


51TLSB 




000466 


133544 


1 64004 


150036 




BIS\F 


#DDC 


CRI 


DCRD 


7.J0VER 


ERRB2H 


OO0467 


135544 


004004 


oooooo 




BIC 


#D0C 


CRI 


DCRD 






0O047O 


135544 


004010 


000000 




BIC 


#0DD 


CRI 


DCRD 






000471 


031453 


10OO13 


01O464 




DEC 


R13 






%JNPR0Y 


CLK 


OO0472 


013457 


170017 


050464 


CLKOO: 


TST\F 


R17 






%JNWRC 


CLK 



GENERATE 64. 

GENERATE 32. 

GENERATE 6. 

GENERATE 16. 

GENERATE 10. 

GENERATE 1 . 



**************** 

CLOCKS 
CLOCKS 
CLOCKS 



CLOCKS 
CLOCKS 
CLOCK 



ERROR IF PROY NOT RESET BY SD16 LOAD/UNLOAD 

SHIFT DATA PATTERN 

IF DATA LSB = 1, ODD TO CR 

ERROR IF S016 NOT UNLOADED IN TIME 

CLEAR DIAGNOSTIC CLOCK/DATA 
LOOP FOR NEXT CLOCK 
**NOP\F 



;;Load or Unload SERDES 16 when PRDY a WRC only 



; t amp 
; t amp 



000473 076537 060O06 140463 



tSt cri 
xor\lt (Sd).r17 



XOR\LT (S0I.R17 
; ; Can save t WORD 



%jneg CIKp iBEAO MODE - GET DATA ANO CALCULATE EDC 
7.JDPF CLKP ;READ MODE - GET DATA ANO CALCULATE EDC 
n figure how to use INC\L for read mode 
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000474 
00047S 



150457 
013457 



000017 
00601 7 



OOOOOO 
100463 



INC\R 
MOV 



R17 

R17, \N,SD 



;WRITE MODE 

;DATA= 8000, 



' UPDATE DATA AND LOAD SERDES 
COOO, EOOO, ... FFFF, O, 8000, 



KOBSO MICROCODE, 22- APR-I9SS 11:27:16.96 



c 
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************************************ 



ROCLK : 
SDCLK . 



OBARs BUFFER POINTER TO START OF DATA STORAGE 

REGISTERS USED: 

RI1 ■ USED FDR LOOP COUNTER 

R12 ■ HOLDS SERIAL DATA 

RI3 : HOLDS » OF CLOCKS 

R1S =(DSAR) FOR BAR INCREMENT 

RtS s HOLDS ECC SUM 

RI7 : SERDES PARALLEL DATA. (READ): EDC. (WRIT 
CALLS CLKIO 



WRITE DATA 



iitttnttt 



******* 



********* 



, ; Load RESIDUES 



< 
a 

II 

s 
o 

u. 

o 



000476 031451 000011 120461 RDCLKO: 

000477 130455 017015 127777 
OOOSOO 033712 000003 110476 ROCLK: 



000501 1504S2 

000502 031451 



060012 03O461 
06001 1 130460 



120455 017015 



000504 013451 000011 127777 CLK02: 

000505 030516 0O3OO7 110504 CLKOt: 



OEC 


R1 1 




•/.CALL 


CLKIO 


INC 


DBAR, 


BAR 


7.RZR0 




MOV 


(BUF ) 


R12 


%JMP 


RDCLKO 



; ; C lock 1 oop 



tst 


CP i 


i nc\p 


r 12 


tst 


cr \ 


dec 


r 1 1 


INC\R 


R1 2 


DEC 


R1 1 



%cnneg elk 10 
%cneg elk 16 



V.CNOPF 
V.CDPF 



CLK10 
CLK16 



INC DBAR\0,,8AR %JNZRO SDCLK 
;;Return tor SDCLK 8 CLK routines 
TST R1 1 %RET 

ADO (ECCI , R16, BUF %JMP CLK02 



;READ MODE - SEND OATA 16 SITS AT A TIME 

; IS THE LOOP DONE? 

;GET NEXT ECC RESIDUE FOR SERIALIZING 



; WRITE MODE 
;REAO MODE 



;WRITE MODE 
;READ MODE 



SEND DATA 10 BITS AT A TIME 
SEND DATA 16 BITS AT A TIME 



SENO DATA 10 BITS AT A TIME 
SENO DATA 16 BITS AT A TIME 



IS THE LOOP DONE? 



;R1 1 s WORD COUNT 

: RETURN TO SDCLK OR CLK ROUTINE 

;R16= ECC SUM FOR DATA FIELD - CLOCK AT IO BIT RATE 

; SAVE ECC VALUES IN BUFFER 



\J 
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OCLK: ONLY CLOCK 

Input : 

R13 a NUMBER OF SPECIFIED PULSES FOR THE CONTROL REGISTER 
Output : 

R13 a O 

R12 SHIFTED RIGHT R13 TIMES. 

REGISTERS USED: 

R13 a HOLDS # OF CLOCKS 



; ******** 



000506 133753 

000507 033753 

000510 033753 

000511 133544 

000512 135544 

000513 031453 



0004 1 1 
000S04 



OO04 17 
0O0504 



000377 

ooooeo 

000001 


100511 OCLKRS: 
1 1051 1 0CLK4S: 
100511 0CLK1: 


MOV 
MOV 
MOV 


#177400, 
#48 . , R13 
#1 . , R13 


R13 


%JMP 
%JMP 
%JMP 


OCLK 
OCLK 
OCLK 


14004 
004OO4 

00001 3 


167777 OCLK: 
OOOOOO 

1 1051 1 OCLKOO : 


BIS\F 

BIC 

DEC 


#DDC 
#DOC 
R13 


,CRI 
,CRI 


, OCRD 
, DCRD 


%RZRO 
7.JMP 


OCLK 




START 
ONLY 


a TP010 
= CLK02 






; WRITE 


MODE 










SYM2 a 
SYMS a 
SYM10 a 
SYM407a 
SUM : 


H 
H 
H 
H 
H 




SYM3 i H 
SYM7 = H 
SYM11 = H 
SYM40Sa H 


SYM4 = » 
SYM8 a 1 
SYM12 a ► 
SYM409 a 1 




< 
( 


START 
INLY 


= TP01 1 
: CLK02 






; WR I T E 


MODE 





**************************** 

^GENERATE LOTS OF CLOCKS FOR RESET 
;GENERATE 48. CLOCKS 
; GENERATE 1 . CLOCK 

SET DIAGNOSTIC CLOCK 
RESET DIAGNOSTIC CLOCK 
NEXT CLOCK PLEASE / 
DONE WITH ALL CLOCKS? 



SYMS a H 

SYMS a H 

SYM13 : H 

SYM410: H 



ACTUAL ECC SYMBOLS ARE THE LOWER 10 BITS 
ECC-2 a E089H ECC-1 a EF62H 



ECC01 a 8F29 ECC02 a 8F5A 

ECCOS a 8C01 ECC06 = 8037 

ECC09 a 8C24 ECC10 : 8C68 

ECC13 a 8E9F 7? ECC 1 4 a SC81 

ECC16 a SCD3 ECC17 : 8F62 



ECC03 a 8CC7 ECC04 ■ SDB3 

ECC07 a 8CB1 ECC08 a 8C79 

ECC11 a 8F8E ECC12 a 8DA2 

GARBAGEa OOOF ECC1S a SF15 



0004 17 
000503 
000472 



START 


a TP011 


THEN 


a TP017 


THEN 


a CLKOO 



;T0 TRIGGER ANALYSER AT START OF ECC SYMBOL 
;OATAa OOODH 
;DATAa OOOEH 
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000430 

000451 
000476 



START 


■- SDRD 


THEN 


a TP013 


ONLY 


: RDCLKO 



;READ MODE LOADING SERIAL DATA 
ACTUAL ECC SYMBOLS ARE THE LOWER 10 BITS 



ECC01 a 8F29 ECC02 a 8P5A 

ECC05 a 8C01 ECC06 a 8037 

ECC09 a SC24 ECCIO -- 8CE8 

ECC13 a 8E9F ?? ECC14 a 8C81 

ECC17 a 8F62 



ECC03 a 8CC7 

ECC07 a 8CB1 

ECC11 a 8F8E 

ECC15 a SF15 



ECC04 a 8DB3 

ECCOS a 8C79 

ECC12 a 8DA2 

ECC16 a 8CD3 



000442 
OOOS04 



START 
ONLY 



a TP012 
■ CLK02 



READ 



; READ MODE 



SYM2 = H 

SYM6 a H 

SYM10 a H 

SYM407a H 

SUM = H 



SYM3 a H 

SYM7 a H 

SYM11 a H 

SYM408a H 



SYM4 a 
SYM8 - 
SYM12 a 
SYM409a 



SYM5 a H 

SYMS a H 

SYM13 a H 

SYM410a H 



a 

< 

o 

II 

s 

cc 
O 

LU 

w 
o 

V) 



c 
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"i 



OOOS 14 
0005 1 5 
0005 t S 
OOOS 17 
0O052O 

000S21 
OO0S22 
000523 



********* 



****************** 



SD.RST: SERDES RESET ROUTINE 

RESISTERS USED: 

R13 : HOLDS # OF CLOCKS 

R17 : SERDES PARALLEL DATA. (READ): EDC . (WRITEI: WRITE DATA 

YOTE: Errors in this routine display the following in the SA register; 

105153 - Write mode, wrap SERDES 16 error 

105154 - Read mode, SERDES 16, 10 RSGEN and ECC circuitry error 

*************************************************************************** 
;;Initia1iie SERDES and DIAGNOSTIC HARDWARE (ERROR CODE : S.) 



013440 


000520 


120250 


SD . RST : 


NOP 


034457 


000577 


120S06 




CLR 


013440 


000500 


OOOOOO 


SD . RS : 


NOP 


013440 


10054O 


1 10036 




NOP 


013440 


1 60620 


1 10036 




NOP 


013440 


000420 


OOOOOO 




NOP 


013440 


120460 


100038 


SDRRDY : 


NOP 


013440 


1 40660 


1 10036 




NOP 



%CALL 

'/.CALL 



S>RRM 

"RECCT 

PRSE 

IPRECC %JPROV 

PSRSGEN 7.J0VER 

PRRSGEN 

(PSCLR %JRRDY 

(PRCLR %JDSER 



INCRTN 
OCLKRS 



ERRB2H 
ERRB2H 



ERRB2H 
ERRS2H 



******** 



SET TO WRITE MODE 
RESET ECC TIMING 

ERROR IF PRDY NOT RESET BY IPRSE 
ERROR IF LATE NOT RESET BY (PRSE 
CRY MUST BE A 1 TO SEE WRC 

ERROR IF RRDY NOT RESET BY IPRECC 3 (PRRSGEN 
ERROR IF DSER NOT RESET BY ffSCLR S CLOCKS 
RESET I/O CLEAR. 



TSTRTN ROUTINE 



********************* 



*************************** 



* * * 



OOOS24 0134S1 000671 127777 TSTRTN: TST 



RESET I/O CLEAR / RETURN 
THIS RETURN IS USED BY OTHERS 
FOR THE SAME PURPOSE: SET RETURN STATUS 
TO SEE IF THE NEXT TEST IS EXECUTED 
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OO052S 
OOOS26 
OO0527 
000530 

000531 
000532 
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TEST 7.RRDY SUBROUTINE 

tPSECC, tPSECCT => ECC START H s 



Errors in this routine display the following in the SA register; 

105153 - Write mode, wrap SERDES 16 error 

105154 - Read mode, SERDES 16, 10 RSGEN and ECC circuitry error 



*************** 



133S44 
013472 
1 3S544 
053452 

013440 
016513 



124004 
OOOOI 2 
004004 
0000 1 2 

0OO72O 
000546 



1 10036 
040000 
OOOOOO 
100522 

OOOOOO 
127777 



BIS 

TST\T 

BIC 

ROT\R 

NOP 
XOR 



; ****** 
LEV02 



GENERA1 
Output : 



#DDC,CRI ,DCRD 

R12 

#DDC , CRI , DCRD 

R12 %JMP 

IPSRM 

[ SD) ,R13\N IPRECC %RET 

*********************** 



E THE SYNC PATTERN 



%JRRDV ERRB2H ; ECC SYMBOL CLK L POSITIVE TRANSITION 



.TEST IF RRDY RESET BY INSTRUCTION EXECUTION 



;SET READ MODE 

.TEST WRAP DATA AND RETURN 



SYNC PATTERN 023274 OR 268CH 



****************** 



000533 


033752 


0O0274 


OOOOOO 


GENSYN : 


MOV 


»SYNCL 


R12 


000534 


133552 


0OOO46 


1 27777 




BIS 


»SYNCH 


R12 



SYNC : 023274: 26BCH: 9916. 
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************ 



************ 



SEND ECC SYMBOLS (STORED IN RAMI THROUGH SEROES 10 
FOR READ ECC TEST AND READ RESIDUES 



R1 1 : LOOP COUNT 

DBAR = WHERE YOU WANT TO GET ECC SYMS FROM THE BUFFER 



o 



RI2 WILL BE ALTEREO 
DBAR GETS INCREMENT BY 
BUF GETS NEW ECC'S 



# TIMES THROUGH LOOP 



REGISTERS USED: 

DBAR : ADDRESS OF RAM BUFFER 

R11 = USED FOR LOOP COUNTER 

R12 : HOLDS SERIAL DATA 

R13 = HOLDS # OF CLOCKS 

R14 = TEMP * HOLDS ECC REGISTER VAL 

R1S =(OBAR) FOR BAR INCREMENT 

R1S : HOLDS ECC SUM 

R17 : SERDES PARALLEL DATA. (READ): 

CALLS SD.RS, CLK, SDCLK, GENSYN, GETECC, 



; *********** 



********* 



EDC. (WRI 
D.GECC, CL 

*********** 



IE): WRITE 
0K10 



000432 

000S3S 



START : TP0I4 
ONLY : TP015 



;RESIDUES * O 
;RES01 - RES17 : O 



000432 

000536 



START 
ONLY 



TP01S 
TP01S 



;RESIDUES = ERROR RESIDUES 



FOLLOWING RESIDUES SHOULD BE SAVED IN REGEN: 



RES01 : 
RES05 ■ 
RES09 
RES 13 
RES17 



RES02 
RESOG 
RES 10 
RES14 



RES03 
RES07 
RES1 1 
RES15 



RES04 : 

RESO0 i 

RES 12 > 

RES IE •- 
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GET ECC 

************* 



000S35 
000S3S 



000537 
000540 



120455 
0201 55 



013476 
031451 



0070IS 
0030 I 4 



01001 6 
000O1 1 



133002 

1 30461 



177777 
1 10535 



GBTECO: 

TP01S: 

GETECC: 



INC 
ADD 



TST\T 
DEC 



DSAR\0, . BAR 
R14\0, R1 5. BUF 



R1 6 
R1 1 



******** 

•'.CALL 

•/.CALL 

•/.RZRO 
7.JMP 



i**************************x************ 

D.GECC ;UPDATE BAR AND GET ECC IN RI4 

; WITH UPPER BITS CLEARED 
CLK10 ;SAVE RESIDUES 

;TEST R16: ECC SUM FOR RETURN 



.FILL 
ORG 

. PAGE 



13 440,0, <BIT15+BIT12+SEQERR> 
700 



;JUMP TO SEOERR 



Q 
< 
D 

a 

ii 

cc 
o 

U- 

cn 
o 
en 
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D.PROC IDLE LOOP AND OP COOE PROCESSOR (»* * NEW SDI TIMING ***) 



c 



.SBTTL D.PROC 
:* 09-JULY-S3 

ROUTINE NAME: 

D.IDLE (DRIVE IDLE LOOP! 



IDLE LOOP AND OP CODE PROCESSOR (»» « 
UDAS2 MICROCODE 



NEW SDI TIMING **» ) 



FUNCTI 

T 

AS SUCH 



ONAL DESCRIPTION: 

HIS CODE IS THE MAIN SCHEDULING LOOP FOR THE ORIVE PROCESSOR AND 
IT PERFORMS THE FOLLOWING FUNCTIONS: 

MONITOR SDI INTERCONNECT DRIVE STATE 

MONITORS 'DMODE' FLAG OF SYSTEM STATUS AND SHORTENS IDLE LOOP 

ACCORDINGLY IF IT IS SET 

MONITORS SOI INTERCONNECT STATUS WORDS FOR DRIVE PROCESSOR ACTIONS 

REQUIRED 



SDI CONTROL BLOCK STATUS 



INPUTS : 








1 . SDI 


ST 




OUTPUTS : 






1 . SDI 


ST 




EOUATES USED 






• *.» FOB 


SDI STATUS 


PKIP 




i 


OOOOOl 


SEEK 




3 


000002 


DERR 




i 


000004 


VECT 




s 


00O010 


BFRQ 




= 


000020 


SUSP 




s 


000040 


BFSV 




: 


000 100 


XCMP 




s 


0O0200 


DATT 




: 


000400 






B 


001000 


DROUP 




3 


002000 



SDI CONTROL BLOCK STATUS 



DRVOL 
DRAVL 



: 3 004000 
: : 10000 



: s 020000 



: s 040000 



RVCT : s lOOOOO 

«** FOR REAL TIME DRIVE 
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; = 


NO PKT, 1 3 


; o s 


NO SEEK NEED 


; o = 


NO ERROR, 1 


; o : 


VECTOR LEVEL 


; o = 


OK, 1 s BUFF 


i ' o ■ 


TASK RUNNING 


; o ■- 


OK, 1 3 BUFF 


; O s 


OK, 1 ■ TRAN 


; O = 


OK, 1 : ORIV 


; NOT 


USED 


; DRDUP, DRVOL, AN 


DOD 




RRR 




AVO 




VOU 




LLP 




; 000 


-- DRIVE ONLI 


; 001 


: DRIVE ONLI 


; OIO 


■ DRIVE OFFL 


; Oil 


• DRIVE OFFL 


; lOO 


3 DRIVE AVAI 


; 101 


s NOT USED 


; 110 


= NOT USED 


; 111 


3 DRIVE OFFL 


; o t 


NOP, 1 3 SEN 


; IN ADDITION SLAT 


; TO 


[NIT EACH DRI 


; o = 


NO ERROR REC 


; IN ADDITION ERRI 


; DETERMINING IF A 


; o s 


NO REVECTDRI 


STATE 


** * 



PACKET IN PROGRESS 

EO, 1 3 SEEK INITIATE NEEDED 

s D.PROC ERROR ON I/O COMMAND 

DONE, 1 3 STATE VECTOR LEVEL ACTIVE 
ER SPACE/PARAMETERS REQUESTED 
, 1 3 TRANSFER TASK SUSPENDED 
ER SERVICE REOUIRED 
SFER TASK COMPLETED 
E ATTENTION PENDING 

DRAVL ARE ENCODED AS FOLLOWS: 



NE 

NE AND DUPLICATE 

INE AND INOPERATIVE 

INE AND DUPLICATE 

LABLE (SPINABLE OR NOT SPINABLE) 



INE AND UNKNOWN TO CONTROLLER 
D LOG OR ATTENTION PKT TO HOST 

IS USED DURING I N T I AL I ZAT I ON 
VE 

OVERY, 1 3 LEVEL O RECOVERY ACTIVE 
P IS USED AS A FLAG TO AID IN 

DRIVE IS ALREADY ONLINE TO THE UOA 
NG REOUIRED, 1 3 REVECTORING REQUIRED 
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>* NEW SDI TIMING ***) 



000701 
000702 



300704 
500705 
500706 
300707 
300710 

3007 1 1 
300712 
3007 13 
3007 14 
3007 1 4 

3O07 1S 
3O07 I 6 
5007 17 
300720 



00072 1 
000722 
000723 
0007 2 4 
000725 
000726 
000727 
000730 
000731 

000732 
000733 
000734 
000735 



1 14544 
1 14544 



034557 
033777 
033455 
053457 
030S75 

010555 
033712 
03371 1 



0274SB 
114556 
I 14551 
1 14556 



135571 
034552 
134551 
033452 
034457 
035 15 t 
013460 
031457 
034457 

034552 
014552 
013440 
013440 



010020 013626 



070100 
010040 



00001 6 
1000 1 
0000 1 1 
0000 17 
040120 

007000 

0OOOO2 
000O03 



01O01 1 
140034 
010010 
1 1OO40 



013O40 
000100 
010100 
010S31 
000457 
003712 
10500 
100017 
006517 

010102 

000100 
10000 
1 10000 



OOO701 
O1O700 



073717 000001 123600 



000000 
150706 
12I0O7 
010000 
160707 

121006 
010000 
OOOOOO 



114551 04003O 000752 



1 10747 
10070 1 
010732 
01O7O1 



1 61022 
OOOOOO 
040742 
1 50701 

1 23572 
133570 
140701 
000727 
100742 

100736 
010000 
10074S 
1 10701 



D . IDLA: 
D . IDLE : 



000736 037714 110002 000745 D.IDLF: 



DRDY 


= 00000 1 


ATTN 


•- 000002 


SENT 


s 000004 


RCVD 


3 000010 


SEC 


s O0OO20 


IDX 


s 00O04O 


AVAIL 


s 000 10O 


RRDE 


s 000200 


OPE 


: 000400 


RWRDY 


3 100000 



DO NOT SEND, 1 3 DRIVE RECEIVER READY FOR COMMAND 

NO ERROR, I - ATTENTION CONDITION FOUNO 

FRAME NOT SENT, 1 s RTCS FRAME SENT 

ORIVE STATE NOT RECVD, 1 3 DRIVE STATE RECVD 



NO SECTOR, 1 
NO INDEX, 1 3 
NOT AVAILABLE 
NO ERROR, 1 3 
NO ERROR, 1 3 
NOT R/W READY. 



SECTOR PULSEIUSE l-O EDGE) 
INDEX PULSE (USE l-O EDGE) 

Is DEVICE AVAILABLE FOR USE 
DATA TRANSMIT ERROR 
DATA PARITY ERROR 

1 3 READ/WRITE READY 



BIT 
BIT 



#DXFC, RLL 



#OMODE,RLL 
#OMBEG, RLL 



%JNZRO DMNTRY 



7.JACL0 
%JNZRO 



. IDLE 
D . I D L A 



SELECT SDI INTERCONNECT AND SOI CONTROL BLOCK POINTER *»» 



IF OMBEG EO 1 THEN START OM [rae3-c119] 
and clear lock for Uproc [rae3-c119] 
[16K1IF LO POWER THEN WAIT/IF IN DM MODE 
[16K] THEN CHECK FOR OM START 



MOV\L (OCRS) ,R17 



AND 

MOV\T 

MOV 

SHF\R 

AD DVT 

CHECK 

ADD 

MOV 

MOV 

ASSUK 

BIT 

o r i v e 

COM 

BIT 

BIT 

BIT 

DRIVE 

CHECK 

BIC\T 

AND 

AND\F 

MOVVF 

CLR 

BIC 

NOP\T 

DEC 

CLR 

ORIVE 

AND 

BIT 

NOP 

NOP 

ORIVE 

COM 



'UNK 
FOR 



DIS- 1 
ITOO, 
1 , DBA 
7 

DIB. L 
ENT S 
01 ST 
TDS) , 
UF ) , R 
IP, 60 
DRVOL 
INE/A 
1\0, R 
DRVOL 
RVOL , 
LAT, R 
NOWN' 
POWER 
LAT, R 
VAIL 
RRIP 
1 , Rt2 



17, RI7 
FLINE ' 
<ATTN+ 
AVAIL 



,RI7 

R17 

R 

,OBAR 
DI STAT 

,OBAR\N 

R12 

1 1 

, BITOO 

+ORAVL> 

VAILABL 

16 

+DRAVL+ 

R1 1 

IS 
WITH R 
UP DRI 

1 1 ,BUF 

R12 

R1 1 
ffSWM 
ffSCMD 

,BUF IPS 
IPRSE 

,SD <5>RS 
( INOPE 
AVAIL5 . 
R12 



%T2R0 
7.CALL 

%JNLSS 
US OF DRIV 

BAR "/.CALL 



' AVA 

(R 



ILABLE 
TDS) ,R 



,R11 %JLSB 
E/UNKNOWN 

7.JZR0 
DRDUP> , R 1 6 

7.JNZR0 

7.JNCSR 
EAL TIME D 
VE IN1T NE 

7.CZR0 

7.JNZR0 

%JZRO 

7.CALL 
SE 7.CALL 

%JZRO 

7.JN0CLK 

7, J MP 
RABLE/OUPL 
R12 %JZRO 

7.JZR0 
7.JCSR 
INABLE OR 
7.JNCSR 



D. ID 
- CHE 
D . I L 

7.JDS 
. IDL 
. IDL 
RIVE 
EDED 
D . INI 

. IDL 
. I L 
D . GMST 
UNLOCK 
D.IDLE 
D . IOLC 
D . IDLG 
ICATE) 
. IOLF 

. I L I 
D . IDLE 
IOT SPI 
. I D L I 



LM 



[ 16K]Rl7sC0NTR0L REG I MAGE/R 1 1 s PTR TO 1ST SDI BLK 

[ 16K] IUS2EC1 ] ISOLATE SDI SELECT 

IF EQ O THEN RESET TO 1ST SOI 

DBAR3PTR TO 1ST SDI CNTL BLK 

ROTATE R17 RIGHT 

IF MSB NEO 1 THEN UPDATE OBAR TO NXT CNTL BLK 

SEND RTCS FRAME 
R123DRIVE STATUS 
RllsSDI STATUS 

IF PKT ACTIVE THEN GO CHK STATUS 



CK REAL TIME DRIVE STATUS «** 

IF DRIVE ONLINE THEN GO CHECK ORIVE STATE 
IDLE ; IF PARITY ERROR THEN GO IDLE 
; IF NOT UNKNOWN THEN GO CHK FOR OFFLINE/AVAIL 
E ; IF NO STATE THEN GO IOLE 
STATE *»* 
*** 
T ; IF INIT NEEDED THEN SEND 1 

; IF AVAIL SET 
G ; THEN DO GET STATUS 
E ; IF ERRIP NOT SET THEN GO IOLE 

; SET COMMAND MOOE/R 1 1 s MUTEXED SO I STATUS 

; ZAP ERRIP/RELEASE U.PROC 

; IF DONE THEN GO IDLE 

; IF NO DRV CLK DECREMENT R17 AND LOOP 

; ZAP SERDES/RESET SERD6S/00 GET STATUS 
CHECK FOR CHANGE IN STATE *** 

; IF AVAILABLE THEN CONTINUE 

; [U52EC21IF RTDS AVAIL LO 

; [US2EC21 THEN MARK OFFLINE/UNKNOWN 

; IF STATE THEN GO IDLE 

BLE I ■'■**« 

, IF NO STATE THEN MARK OFFLINE/ELSE R143-0RIVE STAT 
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000737 
000740 
000740 
000741 

000742 
000743 

000744 

00074S 
000746 

000747 
000750 
000751 

000752 
000753 
000754 

0OO7S5 
000756 
000757 
000760 
00076 1 
000762 
0007 6 3 
000764 
000765 
000766 
000767 



O10555 0O7O44 133603 



0365S2 
013440 

033752 
034554 

Ol 3440 

013440 
013440 

03371 2 
014 5 5 2 
013440 

014552 
014552 
133773 

010555 

014551 
1 14551 
1 14551 
014571 
014551 
014551 
1 14551 
1 14551 
013440 



04O102 
010000 

000002 

000102 
10000 

oooooo 

000000 

1 10002 
140100 
010000 

000 100 
10002 
010001 

007022 
000001 
010040 
010300 
010272 
010010 
010002 
010200 
010100 
010000 



040743 
010701 

1 10752 
100OO 
100701 

122045 
1 10701 

010745 
100701 
010745 

010000 
010755 
062013 

123610 
010000 
100701 
000701 
150762 
1 1 1034 
01 1 170 
011163 
011142 
100701 



D . IDLG 
D . IDLH 



ADD 

ASSUME 

X0R\F 

NOP 

FORCE 

MOV 

AND 

NOP 

MARK 

NOP 

NOP 

'MSCP 

MOV 

BIT 

NOP 

CHECK 

BIT 

SIT 

MOV\T 

CHECK 

ADD 

BIT 

BIT 

BIT 

BIT\T 

BIT 

SIT 

BIT 

BIT 

NOP 

ASSUME 

.PAGE 



#SOI S 
DRV . RU 
#<ATTN 

UOA TO 

#ATTN 
#<ATTN 



1 , DBA 
, EQ , B 
1AVAI 

GET 
R12 

AVAI 



R\N,BAR '/.CALL 

ITOO 

L>,R12 %JLSB 

7.JNZR0 
STATUS **» 

■/.JMP 
L>, R14 

7.J2RO 



RIVE OFFLINE *»* 



ONLINE' 
(RTDSI 
#AVAIL 

rOR ORIV 
#AVAIL 
#ATTN, 
#DATT, 

FOR WORK 
#SDI .P 
#PKIP, 
#SLAT, 
#<RVCT 
#<SUSP 
#VECT, 
#SEEK, 
#RVCT, 
#ERRIP 



CHECK 
, R12 
,R12 

E ATT 
.R12 
R12 
R13 

TO D 
. DBA 

R1 1 

Rl 1 

! ERRI 

I VECT 

Rl 1 

Rl 1 

Rl 1 

,R1 1 



"'.CALL 
•/.JMP 
IF DRIVE SAI 
7.JNCSR 
5SJ0SER 
7.JNZR0 
ENTION *** 

7.JNZR0 
"/.CNZRO 
FOR THIS S 
R\N.BAR 7.CAL 

7.JZR0 
P>,R11 7.JNZR 
1 XCMP (BFROIS 

7.JZR0 
7.JNZR0 

7.JNZR0 
%JNZRO 
IIJZRO 



S.LD11 ; R11:0RIVE STATUS 

; MAKE SURE DRV . RU IS LSB 
D.IOLH IF SPINABLE THEN CONTINUE 
D.IDLE ELSE NOT SPINABLE/IF STILL NOT SPINABLE GO IDLE 

D.IDLM ; ELSE FORCE GET STATUS AND DISCONNECT 

IF STILL SPINABLE 

D. IDLE . THEN GO IDLE 

O.OFFD ; GO MARK OFFLINE/UNKNOWN 

D.IDLE ; GO IDLE 

E »»« 

D. IOLI 

D . IDLE 

D . IDLI 



f 



) 



L S 



IDLN ; 
SSET 
CONTROL 
LD16 ; 



D. IDLE 
D. IDLE 
EEK>,R1 1 
D.PCMD 
D. VECT 
D .SEEK 
D .RVCT 
D . IDLE 



D . ERR1 , EO, 



[U52EC21IF NOT ALIVE THEN MARK OFFLINE 
[U52EC2IIF PARITY ERROR THEN GO IDLE 
IF AVAIL THEN MARK OFFLINE 

IF AVAILABLE SET 

THEN CONTINUE/IF ORIVE ATTENTION UP 
THEN SET SDI STATUS BIT 

BLOCK *»* 
; R16=MSCP PKT PTR FOR D.PCMD i D.SEEK 
; IF NOT, CHECK FOR PKT IN PROGRESS 
; IF NO PKT ACTIVE THEN IDLE 
, I16K1IF LOG/ATTN FLAG SET THEN GO IDLE 

%TZRO ; [16K1IF REVECT/ERROR RECOV THEN FORCE SUSPENp 
; IF NOT SUSPENOEO THEN GO PROCESS CMO 
; IF VECTOR STATE IN PROGRESS THEN GO DO IT 
; IF SEEK REO'D THEN GO DO IT 
; IF REVECTORING THEN GO 00 IT 
; IF NOT ERROR RECOVERY THEN GO IDLE 
; MAKE SURE ERROR RECOVERY IS NEXT 
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ROUTINE NAME: 

D.ERR1 (D.PROC LEVEL 



ERROR ROUTINE) 



FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL SERVE AS THE BASE PROCESS WHICH WILL VECTOR 
INTO THE VECTOR TABLE AT OFFSET 'V.ERR1' IN ORDER TO PERFORM THE 
FUNCTIONS NECESSARY TO PERFORM LEVEL 1 ERROR RECOVERY. 



INPUTS : 



POINTER TO SDI CONTROL BLOCK 



OUTPUTS : 

LEVEL 1 ERROR RECOVERY STEP PERFORMED 



000767 010555 0070 17 133605 



000770 
00077 1 
000772 
000773 
000774 
000775 



0OO777 
001000 
001001 

0O1002 
001003 



01 3440 
010555 
03055 1 
1 14551 
1 34553 
03375 1 



10000 
OO7O06 
007001 
000001 
010016 
010305 



010555 
010555 
033551 

013440 
013451 



007006 
OO7026 
003040 

OOOOOO 
0006 1 1 



100776 
133603 
1 23603 
OOOOOO 
O10776 
111166 



OO0776 033753 000050 132011 



13361 1 
123603 
10000 

132476 
1 12602 



; * * * 
.ERRD: 



ADD 

IF F 

NOP 

AOD 

ADD 

BIT 

AND 

MOV 

ERRO 

MOV 

RETR 

ADD 

ADO 

BIS 

ENTE 

NOP 

TST 

.PAG 



*SDI .El 
IRST RETRY 

#SDI . UB 
#BUF .ST 
#BERDN, 
#<RETCN 
#V . ERR1 
R RECOVERY 
#<VECT+ 

THE READ 
#SDI .UB 
#SDI .ES 
#URETRY 

HERE TO P 

Rl 1 



, DSAR\N, B 

THEN SEND 

,DBAR\N,B 
, R1 1 , BAR 
Rl 1 

TS<RETCNT 
SLOBYT , Rl 
COMMAND C 
SUSP>,R13 
OPERATION 
, OSAR\N, B 
. OBAR\N, B 
, Rl 1 ,BUF 
ERFORM RE 

IPRDPF 



AR %CALL 
ERROR R 
7. J 2 R 
AR 7.CALL 
%CALL 

• 1 >> ,R13 

1 7.JZR0 
OMPLETE 

•/.CALL 



S. L013 
ECOVERV 
D.ER1A 

S . LD1 1 
S. LD1 1 

7.JNZR0 
0. VECP 



AR %CALL S.LD17 
AR %CALL S. LD1 1 

AD OF BUFFER POI 
%CALL D.BFCA 
%JMP D.REDA 



R13*LEVEL 1 ERROR STATE 
OMMANO *** 

[EERREC] 

[EERREC] GET BUFFER DESCRIPTOR POINTER 

[EERREC] GET BUFFER STATUS WORD 

[EERREC1 CHECK IF ALREADY ISSUED FDR THIS LEVEL 
.ER1A ; [EERREC] IEC0#1 1THE DON'T ISS CMD/IF RETRY 
THEN RllsLO VECTOR TABLE ADDR/GO INIT VECTOR 

R13'FLAGS TO CLEAR/GO CLEAR THEM 

R17=PTR TO BUFFER IN ERROR 
[U52EC21R1 1 ^EXTENDED STATUS 
[U52EC2] INDICATE U.PROC RETRY 
TED TO BY R17 **» 
[EC0#2]G0 CHK BUFFER STATUS 
TEST SDI STATUS/GO REREAO SECTOR/GO IDLE 



c 
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ROUTINE NAME: 
X .SSDI 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL SET THE SDI INTERCONNECT SELECT IN CR 
FROM THE CONTENTS OF DM REGISTER 2. 



DM REGISTER 2 



SDI INTERCONNECT SELECT 



OUTPUTS : 

CR UPDATED TO NEW SOI INTERCONNECT 



OO1O04 
OO1O05 

O01006 

001007 
00 1010 
00101 1 



001012 
0O1013 
0O1O14 



00101S 

00101 e 

001017 
00 1020 



013740 
034S57 
013740 

0337 13 

035553 
033153 



01 4440 
0144SO 
01 4440 



033754 
031454 
01 3454 
013714 



007002 
000017 

O05001 

00OO01 
0000 1 7 
00401 7 



00501 1 
01 501 1 
01 501 1 



000012 

1 10014 
10014 
140462 



123611 X .SSDI : 

131007 

101015 X .SSOT : 

; * * * 
131012 X.SSDX: 
010000 
010000 



13101S 
071015 
177777 



101020 X.SSTA: 

177777 XSSTAA 

167777 

041016 RTOSER 



001021 013454 00O674 111016 



OO0O03 
000037 



MINSST 
MAXSST 



MOV 
AND 
MOV 



#0MREG2 , BAR 

#S0IS,R17 

#C0NT,RTCS 



•'.CALL 


S . L017 


7.CALL 


X SSDX 


T.JMP 


X .SSTA 



PREPARE CURRENT 501 PORT FOR SWITCHING >** 



MOV 
BIC 
OR 

SVNCH 

NOT 

THE D 

CLR 

CLR\T 

CLR\F 

ROUTI 

RETUR 

MOV 

DEC\F 

TST\F 

MOV\F 

RTOS 

TST 

PASS 

: = 3 

: s 3 1 

. PAGE 



(OCRS) , R13 

#S0IS,R13 

R17,R13,DCRD 



R17:SDI INTERCONNECT SELECT 
ISOLATE LO 4 BITS OF R17 
SET/GO SEND CONTROLLER STATE 

I 1 6K]R13=CURRENT PORT SELECT BITS 
I16K1CLEAR PORT SELECT BITS 
[16KIRESET CR (SELECT NEW PORT] 



RONIZ 
- T H I 
RIVE 



NE TO 
NED C 

#1 
R! 
R1 
(R 

ERROR 
R1 

TIMIN 



E WIT 
S ROU 
HAS N 
1 ,RTC 
1 , RTC 
1 , RTC 

TIME 
C'S A 
0. ,R1 
1 
4 
TDS) , 

■ TE 

G INF 



CUR 
TINE 
STA 



RENT SDI PORT (31 - 48 BIT TIMES) *** 

IS OPTIMIZED NOT TO WASTE TIME IN THE CASE WHERE 

TUS CLOCKS (FOR EXAMPLE NO SDI CABLE) *** 



7.CALL 

7.CNZR0 

%RZRO 



.SSTA 
.SSTA 



CLEAR UOA STATUS FRAME 

CLEAR UOA STATUS FRAME IF DRIVE EXISTS 

CLEAR UDA STATUS FRAME IF DRIVE EXISTS 



OUT 
RE NO 

4 



AN SOI STATUS FRAME FROM THE DRIVE 

N-ZERO IF FRAME RECEIVED, ZERO IF TIMEOUT 



XJMP RTDSER 
%RCSR 
%RZRO 
(PSCLR 7.JN0SER XSSTAA 



R14\N 

ST FOR DATA/STATUS CHANNEL ERROR 

0>RCL 
ORMAT 



R14=S0I PORT TIMEOUT 
RETURN IF SENT / OECR TIMEOUT 
IEC0#1 ] -RETURN IF TIMEOUT WITH ZRO: 1 
IF PARITY ERR CLEAR IT AND FORCE FAIL 



OK, RESET I CONTINUE 



R %JMP XSSTAA 

ION FOR . INIT *** 
MINIMUM CYCLES THROUGH X . SSDT (25 MHZ) 
MAXIMUM CYCLES THROUGH X.SSOT (NO CLOCKS) 
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ROUTINE NAME: 

D. INIT (DRIVE 



INITIAL I ZE I 



FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL ASSERT THE 'INIT' BIT OF THE RTCS FOR AT LEAST 64 
STATE BIT TRANSMISSION TIMES THE ROUTINE WAITS FOR DRIVE STATE TRANSITIONS 
TO CEASE AND THEN WAITS FOR STATE TRANSITIONS TO BEGIN AGAIN. BOTH OF THE 
WAITS ARE TIMED AND WILL ABORT THE INIT SEQUENCE IF TIMED OUT. 

INPUTS: 

CONTROL REGISTER (CR) SET TO THE DESIRED SDI INTERCONNECT 

OUTPUTS: 

INIT GENERATED TO THE DRIVE 

CONDITION CODES ARE NZ IF DRIVE SEEMED TO OBEY THE INIT 



001022 013740 005021 121015 O.INIT: MOV 



#<CONT*INl>, RTCS XCALL X.SSTA 



SEND INIT TO DRIVE 



Q 
< 

D 

a 
ii 

s 

rx 
O 

Li. 
« 



0O1O23 
001024 
001025 
001026 



0OIO27 
001O30 
001031 
0O1032 
OO1033 



1 53753 
013740 
03 1453 
01344O 



I 53753 
034452 
031453 
01 3440 
013440 



000050 
005021 
1 10013 

1OO00 



00OO04 
O0OO12 
1 10013 
OIOOOO 
OOOOOO 



010000 

12 10 15 
01 1027 
001024 



OOOOOO 
I 3 100 6 
127777 
001030 
127777 



MOV #<C0NT+INI> , RTCS SCALL X.SSTA (US2EC2ISEN0 INIT TO ORIVE 

WAIT 10 MSEC FOR DRIVE STATE TRANSITIONS TO STOP *** 

MOV\R #<<30303. / <M1 NSS T*3> ♦ I 27 . >*2SHIBVT> ,RI3 ; t US 2EC2 I R 1 3 = APPROX 10 MSEC TIMER 



DINITB 
DINITC 



MOV #<CONT! INI> , RTCS %CALL X.SSTA 

DEC R13 %JNCSR DINITB 

NOP %JNZRO DINITA 

DRIVE STATE TRANSITIONS STOPPED OR TIMED OUT ««* 

NOW WAIT 5 MSEC FOR STATE TRANSITIONS TO START AGAIN *** 

MOV\R #<<1S152. /<MAXSST+3>*127 . >*2SHI8YT> , R13 ; ( US 2EC 2 1 R 1 3 : APPROX 5 MSEC TIMER 



[U52EC2ISET INIT, TEST FOR DRV CLK5 

(U52EC21IF NO CLKS THEN CONTINUE/ELSE DECR R13 

IF NOT 10 MSECS THEN LOOP 



CLR 
DEC 
NOP 
NOP 
. PAGE 



R12 
R1 3 



'.CALL 
%RCSR 
%JNZRO 
%RET 



X .SSOT 



SEND CONT/WAIT FOR IT TO CLK OUT 
IF CLKS THEN RETURN/ELSE OECR R13 
IF NOT 5 MSECS THEN LOOP 
ELSE TIMEOUT AND RETURN 



V^ 
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ROUTINE NAME: 

O.PCMD (PROCESS COMMAND) 



PACE 126 



FUNCTIONAL DESCRIPTION: 

THIS ROUTINE IS ENTERED WHEN THERE IS A PACKET IN PROGRESS [BIT PKIP 
SET IN THE SDI STATUS! AND THE PROCESS IS NOT SUSPENDED. THE OP CODE IS 
OBTAINED PROM THE ACTIVE PACKET AND THE APPROPRIATE PROCESSING ROUTINE 
IS ENTERED. 






INPUTS : 



OSAR 

RIE 



POINTER SOI CONTROL BLOCK 
POINTER TO ACTIVE PACKET 



OUTPUTS : 

VECTOR TO APPROPRIATE ROUTINE AND PROCESSED 



001034 


010556 


0O7006 


133612 O.PCMD: ADD 


#P , OPCD, R1 6\N , 


BAR %CALL 


S 


LL12 


R12:0P CO 


001035 


0105S5 


0O702S 


123605 


ADD 


#SDI . OM, DBARXN 


.BAR %CALL S.L013 


[U52EC1 1R 


001036 


013760 


017156 


173605 


MOV\T 


*NSEEKS,BAR 


7.CZR0 


S 


L013 


[US2EC1 ]R 


OO1037 


013440 


010600 


010701 


NOP 


(PRDPF 


%JN2R0 


D 


IDLE 


I 1 6KI IP A 


001040 








ASSUME 


OP . ACCEO. 20 








MAKE SURE 


001040 








ASSUME 


OP . CMP . EO, 40 








MAKE SURE 


001040 








ASSUME 


OP . ERS.EQ, 22 








MAKE SURE 


001040 








ASSUME 


OP . RO. EO, 41 








MAKE SURE 


00 1040 








ASSUME 


OP . RPL , EO. 24 








MAKE SURE 


001040 








ASSUME 


OP WR, EO, 42 








MAKE SURE 


00 1040 


01 45S2 


000060 


000000 


BIT 


#60. R12 








IF NOT 1/ 


00 104 1 


01 4552 


010002 


1 1 1045 


BIT 


#2 , R1 2 


'/.J2R0 





PCMB 


THEN GO 


001042 


014552 


010004 


012123 


BIT 


#4, R12 


XJNZRO 





WRIT 


THEN GO 


001043 


013440 


010000 


1 12600 


NOP 




•'.JZRO 





READ 


THEN GO 


OO1044 


013440 


000000 


111061 


NOP 




7.JMP 





RPLC 


AND GO DO 


001045 


01 6552 


00001 1 


OIOOOO O.PCMB: XOR 


OOP . ONL ,R12\N 








IF ONLINE 


OO 1046 


01 6552 


lOO 10 


1 1 1 055 


XOR 


#0P . AVL , R12\N 


•'.JZRO 





ONLN 


THEN GO 


001 047 


016552 


1OO13 


1 01054 


XOR 


#0P. DAP, R12\N 


%JZRO 





AVAL 


THEN GO 


OO1O50 


016552 


10012 


111165 


XOR 


#0P.SUC,R12\N 


•'.JZRO 





TOPO 


THEN GO 


001 05 1 


01 6552 


01001 6 


111164 


XOR 


OOP .GST, R12\N 


%JZRO 





SUCH 


THEN GO 


O01OS2 


033771 


010327 


151166 


MOV\T 


#V . GSTASLOBYT, 


R11 7.JZR0 


a 


VECP 


THEN GO 


OO 10S3 








ASSUME 

. PAGE 


0. ATTN.EO, . 








ANO FALL 



ODE WORD 

13:0VERLAPPED CMO 
!13=NUMB£R OF SEEKS TO START 
ANY TO START THEN GO IDLE 
ACCESS IS 20 
COMPARE IS 40 
ERASE IS 22 
READ IS 41 
REPLACE IS 24 
WR I T E IS 4 2 
/O COMMAND 
PROCESS/IF WRITE FAMILY 
PROCESS/IF READ FAMILY 
PROCESS/ELSE MUST BE REPLACE 
REPLACE 

PROCESS/IF AVAILABLE 
PROCESS/IF ACCESS PATHS 
PROCESS/IF SET UNIT CHAR 
PROCESS/IF GET STATUS 
PROCESS/ELSE MUST BE ATTENTION 
INTO O.ATTN ROUTINE 
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KDBDP DIGITAL EOUIPMENT CORP., 

D.PROC IDLE LOOP AND OP CODE PROCESSOR!* 



2901 ASSEMBLER VERSION 32 
>* NEW SDI TIMING **• ) 



ROUTINE NAME: 
D .ATTN 



('ATTENTION' PROCESSORl 



FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL PROCESS 
PACKET (OP CODE EQUALS 



DRIVE ATTENTION CONDITION INTERNAL 
•OP.ATT'). A GET STATUS COMMAND WILL BE 
ISSUED TO DETERMINE THE ATTENTION CONDITION. ONCE THE DRIVE'S 
STATUS HAS BEEN DETERMINED APPROPRIATE STATUS CHANGES WILL BE MADE 
OR ADDITIONAL SDI COMMANOS WILL BE ISSUED TO CLEAR UP THE ATTENTION 
CONDITION. FINALLY A DRIVE CLEAR COMMAND WILL ALWAYS BE ISSUED TO 
CLEAR UP ANY DRIVE ERROR CONDITIONS. 



INPUTS : 

DBAR 



POINTER TO SOI CONTROL BLOCK 



OUTPUTS : 

CLEARED DRIVE ATTENTION CONDITION 

UPDATED SDI STATUS 

REGISTERS R 1 1 , R 1 2 , R 1 3 , R 1 4 , R 1 6 AND R17 ARE USED BY THIS 

ROUTINE ANO ITS SUBORDINATE ROUTINES 



001053 033751 0OO2S5 111166 O.ATTN: MOV #V . ATTNSLOB YT , R 1 1 7.JMP D.VECP ; RIULO VECTOR TABLE AOOR/GO START VECTOR PROCESS 

. PAGE 



c 
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.PROC IDLE LOOP AND OP CODE PROCESSOR!*** NEW SDI TIMING ***) 



ROUTINE NAME: 

D.AVAL (0 PROC AVAILABLE FUNCTION) 



FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL SERVE AS THE BASE PROCESS WHICH WILL VECTOR 
INTO THE VECTOR TABLE AT OFFSET 'V.AVAL' IN ORDER TO PERFORM THE 
SDI LEVEL TWO COMMANDS NECESSARV TO ACCOMPLISH THE MSCP AVAILABLE 
COMMAND WITH AND WITHOUT THE 'SPIN DOWN' MODIFIER. 



INPUTS: 

OBAR 



POINTER TO SOI CONTROL BLOCK 



OUTPUTS : 

SDI LEVEL TWO SPIN DOWN COMMAND ISSUED 
DRIVE DISCONNECTED 



O0IO54 033751 000321 101166 D.AVAL: 



MOV 
.PAGE 



#V . AVALSLOBYT.Rl 1 %JMP D.VECP 



R11=L0 VECTOR TABLE AODR/GO INIT STATE VECTOR 
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KDBDP DIGITAL EOUIPMENT CORP.. 2901 ASSEMBLER VERSION 32 

PROC IDLE LOOP AND OP CODE PROCESSOR!*** NEW SOI TIMING ***) 



ROUTINE NAME: 

D.ONLN (O.PROC ONLINE FUNCTION) 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL SERVE AS THE BASE PROCESS WHICH WILL VECTOR 

INTO THE VECTOR TABLE AT OFFSET 'V.ONLN' IN OROER TO PERFORM THE 

SOI LEVEL TWO COMMANOS NECESSARY TO ACCOMPLISH THE MSCP ONLINE COMMAND. 

U.ONLN SETS SEEK WHICH HAS PRIORITY OVER THIS LEVEL OF PROCESSING 

O.SEEK ACTUALLY BRINGS THE DRIVE ONLINE THROUGH CODE AT S.SEEK. 



INPUTS : 



POINTER TO SOI CONTROL BLOCK 



OUTPUTS : 

UNIT CHARACTERISTICS OBTAINEO 
DRIVE ONLINE 



< 

3 



II 

s 

oc 
O 

u. 

tt 
O 

W 

-J 



001055 010SSS 

001056 014552 

001057 033751 
001060 033751 



007003 
0000 17 
0103 1 1 
000324 



1 23604 
000000 
111166 
101166 



ADD 
6IT 
MOV 
MOV 
PACE 



»SOI SW,OBAR\N, BAR \CALl S.LDI2 
»<ST .MFE 1ST .ORV> , R12 
»V . ONLN«IOBYT, R11 %JZRO D.VECP 
»V ONAVSLOBVT. Rl 1 ?.JMP O.VECP 



R12:CURRENT ONLINE STATUS 

IF NOT ON DISCONNECT CYCLE 

THEN 0NLINE/R1 1 :L0 VECTOR TABLE AODR/GO INIT STA' 
ELSE 00 AVAILABLE WITHOUT SETTING "S" BITS 
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D.PROC IDLE LOOP AND OP CODE PROCESSOR!*** NEW SOI TIMING ***) 



ROUTINE NAME: 

O.RPLC (PROCESS MSCP REPLACE COMMAND) 



FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL PERFORM THE MSCP REPLACE COMMANO . IT WILL 

WAIT UNTIL THE DISK IS POSITIONED TO THE SECTOR PRIOR TO THE DESIRED 

ONE (USING THE SECTOR AND INDEX INDICATORS FROM THE DRIVE) AND ISSUE 

THE FORMAT ON SECTOR/ I NOEX AS APPROPRIATE. 






INPUTS: 

DEAR 



POINTER TO SDI CONTROL BLOCK 



OUTPUTS : 

UPDATED HEADER CODE WITH RBN CODE AND DATA BLOCK CONTAINING 
12S COPIES OF THE RBN. 



001061 
001062 

00 1063 

001064 

001065 

0010S6 
001067 
001070 
00 1 07 1 
001072 
001073 
001074 
001075 
001076 

001077 
00 1 100 
001 101 

001 101 

001 102 

001 103 



001 105 

001 106 

001 107 

001 1 10 

001 1 1 1 

001 1 12 

00 1 1 1 3 
KDBOP 



013740 
013440 

133544 

10557 
I3S551 

033751 
013740 
010557 
033751 
0337 1 2 
01 3440 
013440 
1 12551 
133754 

10555 

010556 

133774 
010557 
036514 



00700S 
000400 

000200 

007004 
003360 

OOOO60 
007260 
O07O05 
0000 1 o 
OOOS23 
000440 
000500 
010005 
010120 

007022 
007007 

O4OO60 
0O7004 
O0OOO3 



03375 1 
0105S6 
01 3440 
033751 
031453 



00OO40 
007031 
O1OOO0 
000020 
0000 13 



123620 
12247S 

122457 

133603 
010000 

132507 
133623 
000000 
122513 
010000 
123014 
133064 
1 1 1067 
002336 

123610 
123603 

151 102 
OIOOOO 

133617 



001104 033752 00OO01 000000 



122507 
12360S 
101112 
122507 
101 107 



031452 140012 1 1 1 20 



MOV 

NOP 

BIS 

CLEA 

ADD 

BIC 

SELE 

MOV 

MOV 

ADD 

MOV 

MOV 

NOP 

NOP 

CMP 

MOV 

PUT 

ADD 

ADD 

ASSU 

MOV\ 

ADD 

XOR 

OBTA 

MOV 

MOV 
ADD 
NOP 
MOV 

DEC 

DEC 



#DMRE 

#PLOC 
R HEADER 
#BUF 
#HDCO 
CT CORREC 
#<IOX 
#REPS 
#BUF 
#8 . , R 
(BUF1 



#S,R1 

#RBNP 
THE RIGHT 

#SD I 

#P . MO 
ME MD.PR 
T #RBN2 

#BUF . 

(BUF) 
IN CORREC 

#1 ,R1 



G5.BAR 

(PSOPF 
K, RLL 
CODE OF B 
HH, R17\N, 
0, R1 1 , BUF 
T TRACK N 
•SEC) . R1 1 
TA, BAR 
TA,R17\N, 
1 1 

, R 1 2 8>SWM 
IPSCMD 
B>RSE 
1 



•/.CALL S.STDB ; 

%CALL D.BFCK ; 

7.CALL D . IOPR ; 
UF.HH IN CASE ERROR 
BAR %CALL S.LD11 ; 

UMBER (GROUP SELECT 
7.CALL D.CPUL 
'/.CALL S.CLRB 

BAR 

7.CALL O.WSIG 

•/.CALL HDRCMP 
•'.CALL HDRANL 
%JZRO DRPLCA 
7.JNZR0 D.TKER 
VPE CODE ON THIS 
. BAR "/.CALL S . LD16 



RM, R14 

HEADER T 
PO.DBARNN 
D,R16\N,BAR 7.CALL S.L011 
I .EQ.BITO 
N0.R14 
HH,R17\N. 

R14 
T DISK RO 



"/.CALL S.ST14 
TATIONAL POSITION 



#IDX.R11 7.CALL D.CPUL 

#S .SECI , R16\N,BAR 7.CALL S.LD13 

7.JZR0 DRPLCC 

#SEC,R11 %CALL D.CPUL 

RI3 SJMP ORPLCB 



R1 2 



7.JNDSER 10$ 
7.JNEG 5$ 



SAV 

GO 

REL 

REC 

R1 1 

CLE 

EO S 

; WAI 

; [EE 

: [16 
; He 
; lie 

i[16 

; go 

; LOO 
; if 

ECTOR 
; GET 
; GET 
; CHE 



E SDI CNTL BLK PTR FOR LATER OR TIMEOUT 
LOAD HDR 6 DATA PREAMBLES 

EASE U.PROC/SET UP HEADER SEARCH LIMIT 
OVERY *** 

LBN TO REPLACE 
AR HEADER CODE » RESET 
V FORCED SEEK) **» 
T FOR SECTOR/INDEX PULSE 
RREC1CLEAR REPLACE STATUS WORD 
KIBARiPTR TO R/T COMMAND 
KJGO WAIT FOR RCVR ROY * R/W RDV 
K1R12»RTC,SET WRITE MOOE 

K)SET CMD MOOE/GO SELECT CORRECT TRACK 
VERIFY CYL/TRACK POSITION 
P UNTIL WE'VE READ A VALID HEADER 
HARD I/O ERR OR OFF TRACK, ERROR 



IF 

BAR 

STO 



POINTER TO MSCP PACKET 

MSCP MODIFIER FLAGS 
CK TYPE OF REVECTOR 
SECONDARY, MOOIFY HEADER TYPE 

POINTER TO HI HEADER 
RE BACK PRIMARY OR SECONDARY REVECT HDR 



IC1 18] 
IC1 18] 



IC1 18] 



sot retry count to 1 
retry entry point 
WAIT FOR INDEX PULSE 
R13=SECT0R'S FROM INDEX 
IF SECTOR EO O THEN DO IT 
WAIT FOR SECTOR PULSE 
OECR LOOP COUNT AND LOOP 



IF pulse/parity error during IC11S1 
counting of sectors, dec retrylCIISl 
count, and retry if not done IC1181 
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2901 ASSEMBLER VERSION 32 
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001 1 14 

001 1 15 



001 1 16 

001 1 1 7 



001 121 

001 122 

001 123 

001 1 24 

001 125 

001 126 

001 127 

001 130 

001 131 

001 132 

001 133 

001 134 

001 135 

001 136 

001 137 

001 140 

001 141 



013440 
013440 



013740 
013440 



000460 
000660 



007260 
OOOOOO 



010557 
033753 
133553 
033757 
133756 
130456 
013740 
033752 
013740 
036553 
133776 
0337S6 

033556 

03375 1 
033552 
133552 
034453 



007002 
007007 
003200 
000060 
OOOOOI 
0000 1 6 
O07O05 
O0024O 
007260 
OIOOOI 
O1OO01 
000200 

00OO13 
000003 
00OOO4 
000040 
000013 



OIOOOO 

1 1 1 105 



123614 
1 1 1 127 



OOI 120 133752 000115 OOOOOO 



123607 
OOOOOO 
133053 
O 1 OOOO 
OOOOOO 
133405 
123607 
01 OOOO 
123605 
151141 
141135 
OIOOOO 

OOOOOO 
132043 
010000 
OOOOOO 
1 12302 



NOP 
NOP 



MOV 
NOP 

MOV 

SET UP 

ADD 

MOV 

BIS 

MOV 

MOV 

INC 

MOV 

MOV 

MOV 

XOR\F 

MOV\T 

MOV 

BIS 
MOV 
BIS 
BIS 
CLR 
. PAGE 



CPSCLR 
CRCLR 



#REPSTA , BAR 



7.CALL 
7.JMP 



S.ST1 1 
ORPLCD 



#F0RSCD,R12 
TO USE SPECIAL ENTRY INTO XFC01 
»BUF.BP,R17\N, BAR 7.CALL S.LDOB 
#0MREGO,R13, BAR 
#BIT1S, R13.BUF %CALL 
#<IDX*SEC>.R17 
#SECSZ,R1 6 

R16 7.CALL 

#DMREG5,BAR "'.CALL 
#<SUSP+XCMP> , R12 
#REPSTA,BAR "'.CALL 
#1,R13 XJZRO 

#SC.LV0,R16 7.JZR0 
#SC .RWR.R16 

#ST.ORV, R16 

#FM.S0I,R11 7.CALL 

»DERR,R12 

#SLAT,R12 

R13 %JMP 



D . LDHD 



XF .REP 
S . LDOS 

S . LD13 
0RPLC1 
20$ 



TO RETRY:clear error 
and try again 



otherwise s 

er r or , we h 

save error 

and skip rep lace 



lost our place 



set 

ROUTINE 
DBAR 
R13, 
SET 
R1 7 = 
(ECO 
I 1 6K 
REST 
R12 

get 

i f J 



level 1 command 



(CI IS] 

[CI 18] 

[CI 18] 

[CI 18] 

[CI 18] 

[CI IS] 

[CI 18] 

[CI 18] 



BUFFER POINTER 
BARsPTR TO DM REG 

TO FORMAT 1 SECTOR/LOAD HEADERS 
SECTOR+INDEX FOR CHK IN XFC1A 
#1 ]R16*SECT0R SIZE 

IINCR R16 FOR EOC/GO FORMAT SECTOR 
ORE OBAR 

SDI STATUS TO SET 
the REPLACE Status 
era exit with success 

drive signal timeout 

read write ready error 



set drive error type 

store error codes 

and declare error 

ask it to be logged and exit 

CLR R13/RESET STATUS/GO IDLE 



[CI 18] 
IC1 18] 
IC1 18] 
IC1 18] 

[CI 18] 

[CI 18! 
IC1 18] 

[CI 18] 

[CI 18) 



c 
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ROUTINE NAME: 

D.RVCT (D.PROC REVECTORING DISPATCHER) 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL DISPATCH D.PROC REVECTORING. 

INPUTS : 

DBAR 
R1 1 



POINTER TO SDI CONTROL BLOCK 
SOI .ST CONTENTS 



001 142 010S55 

001 143 016511 

001 144 0377S6 



001 145 
001 14S 
001 147 
001 150 
OOI 15 1 

001 152 

001 153 

001 154 

001 155 
001 1SS 
OOI 157 

001 160 

001 161 

001 162 



013740 
033452 
013740 
013740 
010S5S 
1374O 
112152 
013740 
133544 
013740 
013740 
037776 
013740 
120356 



OUTPUTS : 

CURRENT D.PROC REVECTOR STATE ENTERED 



0O7000 123567 D.RVCT: ADO #SD I . ST , DBAR\N , BAR %CALL P. LOCK ; 
000003 OOOOOO XOR (BUF],R11\N ; 

010134 012305 COM #< - V . ORVC - 1 >«377 . R 1 6 %JN2R0 D.IOEI 



007232 123604 MOV *RVCSOI,BAR 7.CALL S.LD12 

013015 051151 MOV\F DBAR,R12,BUF 7.JNZR0 . RVCA 

007252 133621 MOV #RVECOP,BAR %CALL S.ST16 

007254 133624 MOV #RVCFLG,BAR '/.CALL INIT1 

007100 123611 O.RVCA: AOO *S D I , PH , OBAR\N . BAR SCALL S.L017 

007254 123610 MOV #RVCFLG,BAR %CALL S.L016 

040015 012305 CMP DBAR.R12 %JLSB 

017226 012305 MOV #RVCBUF,BAR 7.JNZR0 

000200 010000 BIS #PLOCK,RLL 

007252 123610 MOV #RVEC0P,8AR %CALL 

007254 133605 MOV #RVCFLG.BAR %CALL 

030131 041161 COM\T #< - V . RVCS - 1 >8 L OB YT , R 1 6 

007226 010000 MOV #RVCBUF,BAR 

002016 010000 INCB R 1 6\0 , R 1 6 . PAR 



IOEX 
IOEX 



LD1 6 
LD13 



5STNMSB 



[US2E 
[US2E 

; [u 

INVOL 
SEEK* 
DISPA 
STATU 
[U52E 
[U52E 
[U52E 
GET S 
[U52E 
[UOA] 
[UOA] 
i V05! 
(UOA] 
(UOA] 
(U52E 
[US2E 
(UOA] 
[UOA] 
[UOA] 
I UOA] 
OISPA 
AT 01 
R1 1 :S 
BAR:R 



C2]BAR:S0I 
C21CHECK I 
OA] [U52EC2 
VING UPPER 
SUSP AND T 
TCH POINTE 
S AND NEW 
C21ALS0 RA 
C21AN0 RVC 
C2] ELSE 
DI CURRENT 
C1 ] IF ACTI 
[U52EC1 ] 
INIT FLAG 
(U52EC2] (U 
R16SU . PROC 
(U52EC2] IG 
C2] IF NOT 
C2] ELSE 
GET DISPAT 
LOAD FLAG 
IF NO MSB, 
BAR:RVCBUF 
TCH TO ROU 
SPATCH 
DI .ST 
VCBUF 



PTR/LOC 
F SOI ST 
]IF CHAN 

REVECTO 
HEN INCR 
R; DPROC 
DISPATCH 
CE BETWE 
SDI SET 
R16=PTR 
LV BEING 
VE THEN 
ELSE SET 
SO U.PRO 
S2EC1 ]R1 
/D . PROC 
NORE IF 
THIS SOI 
RELEASE 
CH VECTO 
INTO R1 1 

SET FOR 

FOR REV 
TINE 4 I 



K U.PROC OUT 

ATUS HAS CHANGED 

GEO THEN POTENTIAL RACES 

R CODE SETTING 

EMENTING THE 

SEES OLD 

PTR AND AWAY WE GO . . . . 
EN RVCT CLR IN UPPER 
IN THIS CODE { ! I 
TO START OF VECTOR AREA 

REVECTORED IN R12 
CONTINUE 

START VECTOR ADDRESS 
C GOES FIRST 

7=P0INTER TO REVECTOR BUFFE 
FLAG 
IT'S UPROC'S TURN 

THEN GO IOLE 
U.PROC FROM LOCK 
R INTO R1 6 



CLEAN UP 
ECT ROUTINE 
VECTOR 
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ROUTINE NAME: 
.SEEK 



PAGE 133 



FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL INITIATE A SEEK OPERATION IN RESPONSE TO THE 

•SEEK' BIT BEING SET IN THE SDI CONTROL BLOCK STATUS WORD. IT WILL 

CALL D.VECP TO INITIATE THE SEEK OPERATION. 



INPUTS : 



POINTER TO SOI CONTROL BLOCK 



OUTPUTS: 

SDI SEEK COMMAND ISSUED 



001163 033751 000302 111166 O.SEEK: MOV * V . SEEK* L 06 YT , R 1 1 %JMP O.VECP ; I U52EC 1 I R 1 1 > LO VECTOR TABLE AODR/GO INIT STATE VEC 

. PAGE 



C 
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ROUTINE NAME: 

O.SUCH (O.PROC SET UNIT CHAR FUNCTION) 



PAGE 134 



FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL SERVE AS THE BASE PROCESS WHICH WILL VECTOR 
INTO THe VECTOR TABLE AT OFFSET 'V.SUCH' IN ORDER TO PERFORM THE 
SDI LEVEL TWO COMMANDS NECESSARY TO ACCOMPLISH THE MSCP SET UNIT 
CHARACTERISTICS COMMAND. 



o 



INPUTS : 



POINTER TO SDI CONTROL BLOCK 



OUTPUTS: 

DRIVE MODE CHANGED 



001164 033751 000314 101166 D SUCH MOV 

. PAGE 



#V .SUCHS.L0BYT.R1 1 %JMP D.VECP i RMtLO VECTOR TABLE AOOR/GO INIT STATE VECTOR 
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ROUTINE NAME: 

D.TOPO (D.PROC TOPOLOGY FUNCTION) 



PAGE 13S 



Q 
< 

D 

a 

ii 

s 

CL- 
Cl 

LL 

CO 



FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL SERVE AS THE BASE PROCESS WHICH WILL VECTOR 

INTO THE VECTOR TABLE AT OFFSET 'V.TOPO' IN ORDER TO PERFORM THE 

SDI LEVEL TWO COMMANDS NECESSARY TO ACCOMPLISH THE MSCP TOPOLOGY COMMAND. 



INPUTS : 



POINTER TO SOI CONTROL BLOCK 



OUTPUTS: 

DRIVE TOPOLOGY COMMAND EXECUTED 



001165 033751 0OO251 101166 D.TOPO: MOV 

. PAGE 



#V . TOPOSLOBYT, R1 1 %JMP D.VECP 



R11=L0 VECTOR TABLE AOOR/GO INIT STATE VECTOR 



c 
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ROUTINE NAME: 
D. VECP 
D . VECT 



(VECTOR PROCESS INITIATE ENTRY) 
{VECTOR PROCESS WORKING ENTRY ) 



FUNCTIONAL DESCRIPTION: 

O.VECP PROVIDES THE MECHANISM TO START OFF A VECTOR TABLE CHAIN OF 
EVENTS. IT REOUIRES THAT R11 HAVE THE LO OROER ADDRESS OF THE VECTOR TABLE 
ENTRY . 

D.VECT PROVIDES THE MECHANISM FOR STEPPING THROUGH THE VECTOR TABLE 
ENTRIES ANO HANOLES THE TERMINATION PROCESSING ONCE THE LAST STEP HAS BEEN 
EXECUTED. IT KEYS ON THE RETURNED CONDITION CODE ANO R12 FOR TERMINATION; 
IF CCOOE t O THEN THE CURRENT STEP COMPLETED ELSE IT HAS NOT 

IF R12 * O THEN THE VECTOR PROCESS IS STILL ACTIVE ANO THE NEXT STEP SHOULD 
BE ACTIVATED. 

IF R12 NEO O THEN THE VECTOR PROCESS IS COMPLETE AND R12 CONTAINS THE BITS 
TO SET IN SOI .ST . 



INPUTS : 



R1 1 



LO ORDER ADDRESS OF VECTOR TABLE START ENTRY 



RETURN FROM 
PAR DISPATCH 



CCODE = CURRENT STEP COMPLETE 

CCOOE NEO O CURRENT STEP NOT COMPLETE 

R12 = O PROCEED TO NEXT STEP 

R12 NEO O VECTOR PROCESS COMPLETE. R12 CONTAINS 

TO SET IN SDI. ST, R13 CONTAINS BITS TO CLEAR 



VECTOR PROCESS COMPLETED 



00 1 I 66 
00 1 167 
00 1 170 
001 17 1 

001 171 

001 172 

001 173 

001 174 

001 175 

001 176 

001 177 
OOI 200 
00 1 20 1 

00 1 202 

001 203 

001 204 
OO 1 204 
001205 



010555 
013440 
O10555 

010555 
O10555 
010555 
033453 
010SS5 
010555 
1 33554 
0134S2 
014552 

133573 
010555 

1 1 455 1 
013440 



007021 
000000 
007020 

037021 
007022 
007044 
000615 
007045 
007056 
002377 
01001 2 
010004 

010100 
007000 

03O1OO 
10000 



133614 
1321 10 
1 23606 

023606 
133603 
123604 
10OOO 
1 33610 
1 33EI 1 
121177 
010701 
101167 

041206 

133603 

1 1 1206 

010776 



D .VECP 
. VECA 
0. VECT 



001206 033553 



D . VECB 
. PAGE 



ADD 

NOP 

ADD 

ASSUME 

ADO 

ADD 

ADO 

MOV 

ADD 

ADD 

OR 

TST 

BIT 

VECTOR 

BIS\T 

ADD 

ASSUME 

BIT 

NOP 

R12=SD1 

BIS 



#SDI .SV,DBAR\N,BAR % 
7.CAL 
BAR 7. 



#SDI 
ERRI 
#SDI 
#SOI 
#SDI 
OBAR 
#SOI 
#SDI 
#HI 
R12 
#OER 
TABLE 
#ERR 
#SDI 
RVCT 
• ERR 

STAT 
#VEC 



. EO,0BAR\N 
MP . EO, BIT 1 
. SV , D8AR\N 
. PO. OBAR\N 
.SI ,OBAR\N 
,R13 0>RDPF 
.S2,D8AR\N 
. CW,DBAR\N 
YT , R14, PAR 

R. R12 

PROCESSIN 
IP.R13 
.ST.OBARNN 
, E0.BIT15 
IP.R1 1 

US BITS TO 
R13 



S.ST1 1 
) . TIMR 
CALL S . LD14 



, BAR % 
, BAR 7. 
. BAR % 

, BAR % 

, BAR 7. 
7.CAL 
%JNZ 
7.JZR 

G COMP 
7.JNZ 

.BAR 7. 

7. J MS 

7.JNZ 

SET , R 

7.JMP 



CNMSB 
CALL S 
CALL S 

CALL S 
CALL S 



S. LD14 
. LD1 1 
. LD12 

. LD16 
. LD17 



RD 



D . IDLE 
D. VECA 
LETE ENTRY 
RO O.VECB 
CALL S . LD1 1 



SAVE VECTOR TABLE ADDRESS 

SET SDI TIMER FOR THIS COMMAND 

R14=LEVEL O STATE VECTOR 

MAKE SURE CNMSB IS VALID 

IF LEVL O NOT ACTIVE THEN R14:N0RMAL STATE VECTOR 

R1 1 =MSCP PKT PTR 

R12S1ST WORO OF SDI STATUS 

R13=S0I CONTROL BLOCK PTR 

R16:2ND WORD OF SDI STATUS 

R17:SDI . CWISUBUNIT ANO MASK) 

STUFF PAR & CALL (SO WE CAN RETURN) 

IF FAILURE THEN IDLE 

IF R12 EO O THEN CONT /DONE - R 1 2 sSTATUS FLAGS TO SET 



IF ERROR THEN DONE 
R1 1 aSOI STATUS 
MAKE SURE RVCT IS MSB 
B O.VECB IF ERROR RECOVERY IN PROGRESS 
RO D.ER1A ; THEN GO FINISH IT 
13--BITS TO ZAP, RESET STATUS, GO IDLE *»* 
D.SETS ; RESET STATUS/GO IDLE 
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SOI LEVEL O ROUTINES 



ROUTINE NAME: 
LEVOWR 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE PERFORMS THE SOI LEVEL O CONTROL INFORMATION TRANSFER 
FROM THE CONTROLLER TO THE DRIVE AS DESCRIBED IN SDI SPECIFICATION. THE 
CONTROL INFORMATION FRAME IS IN R12 ANO R11 IS USED AS A SUCCESSFUL OR 
UNSUCCESSFUL INDICATOR. 



INPUTS : 



OUTPUTS : 
R1 I 



CONTROL INFORMATION CODE, MUST 8E NONZERO 



i SUCCESSFUL 

1 : DRIVE DATA OR DRIVE CLOCK TIMEOUT 
IF RI1 : O (I.E. SUCCESS ) 



ENTRY POINT FOR CONTINUE AND END FRAMES 



^•S*^ 



00 1207 


033751 


000020 


131270 


LEVOWW: 


MOV 


»1 6 . ,R1 1 


7.CALL . 


D .CLCS 


00 12 10 


01 3440 


1O000 


101212 


LEVOWX: 


NOP 




7.JZR0 


LEVOWR 


00121 1 


031451 


1 100 1 1 


011210 




DEC 


R1 1 


%JNCSR 


LEVOWX 










; *** 


STANDARD ENTRY POINT 


*** 




00 1212 


037151 


140531 


131271 


LEVOWR: 


XNOR 


R1 1 ,R1 1 IPSWM 


%CDSER 


O.RCLR 


00 12 13 


03131 1 


010442 


101225 


LEVOWA : 


DECS 


(RTDS).RII IPSCMO 7.JZR0 


LEVOWE 


OO 1 2 14 










ASSUME 


DRDY.SO.BITOO 






00121 4 


03471 1 


040542 


151213 




CLR\F 


(RTDS).RII PRECC 54JNLSB 


LEVOWA 


001215 


013740 


047202 


101225 




MOV 


#SYNC,BAR 


7.JNLSB 


LEVOWE 


001216 


01 3440 


00O7OO 


OIOOOO 




NOP 


esse 






001217 


1 3700 


006003 


121226 




MOV 


(BUF) ,SD 


XCALL 


LEVOWS 


001220 


013460 


010000 


161226 




NOP\T 




%CZRO 


LEVOWS 


001221 


013460 


OIOOOO 


161226 




NOP\T 




%C2R0 


LEVOWS 


001222 


13460 


01 0000 


161226 




NOP\T 




7.CZR0 


LEVOWS 


001223 


130471 


01001 1 


051224 




INC\T 


Rl 1 


7.TNZR0 




00 1 224 


OI3451 


OOOS 1 1 


1 27777 




TST 


R11 0>RSE 


7.RET 




0O1225 


033751 


00000 1 


127777 


LEVOWE : 


MOV 


#1 , Rl 1 


7.RET 




001226 


024472 


106012 


167777 


LEV OWS : 


CLR\T 


R12\0,R12,S0 


7.RDCLK 




001227 


024472 


106012 


167777 




CLR\T 


R12\0,R12,SD 


7.R0CLK 




OOI 230 


024472 


106012 


167777 




CLR\T 


R12\0,R12,S0 


SHOCK 




001 23 1 


024472 


106012 


16 7 7 7 7 




CLR\T 


R12\0,R12,S0 


%RDCLK 




00 1232 


024472 


106012 


167777 




CLR\T 


R12\0,R12,S0 


7.RDCLK 




0O1233 


024472 


10601 2 


167777 




CLR\T 


R12\0,R12,SD 


7.R0CLK 




001234 


024472 


106012 


167777 




CLR\T 


R12\0,R12,SD 


%RDCLK 




001235 


024472 


106012 


167777 




CLR\T 


RI2\0,R12,SD 


7.RDCLK 




001236 


024472 


106012 


1 67777 




CLR\T 


R12\0,R12,SD 


7.R0CLK 




KDBDP 




K0B5O. MICROCODE 


, 22-APR 


- 1988 1 1 


27:18.96 







(WAIT FOR CONTROLLER TO SEND FRAME) ««« 
RllsFRAME SENT COUNTER/ZAP RECVD BIT 
IF R11 EO THEN DRIVE ON/ELSE RllsORIVE STATE 
WAIT FOR FRAME SENT 

[BC0»2]R1 1 = 1 'S/1F PARITY ERR THEN CLEAR 

[EC0#21IF R11 EO O THEN ERROR 

MAKE SURE DROY IS LSB 

(EC0V21IF NO RECVR RDY THEN LOOP 

[EC0#2]IF NO RECVR RDY THEN ERROR 

[EC0#21 ELSE BAR<-SYNC PTR/R 1 1 s S YNC*2 

(EC0#2]ENABLE SERDES 

[EC0#210UTPUT SYNC TO SERDES 

SEND OUT THE FRAME TO SERDES 

SEND SOME O'S TO SERDES 

SEND MORE O'S TO SERDES 

IF NOT SUCCESSFUL, R11=1 

TEST R11/RETURN 

STUFF R11 = 1, DON'T HAVE TO 0>RSE BECAUSE 

IF ORV CLK TICK THEN RETURN 

IF DRV CLK TICK THEN RETURN 

IF DRV CLK TICK THEN RETURN 

IF ORV CLK TICK THEN RETURN 

IF DRV CLK TICK THEN RETURN 

IF ORV CLK TICK THEN 

IF DRV CLK TICK THEN 

IF DRV CLK TICK THEN. RETURN 

IF DRV CLK TICK THEN RETURN 



RETURN 
RETURN 



lmjt 


-e1251 


[mjt 


•el 25 ] 


[mjt 


"61251 


[mjt 


■el 25 ] 


[mjt 


-el 25] 


[mjt 


6125 1 


EVER 


EXECl 


[mjt 


a 125] 


[mjt 


■6128] 


[mjt 


■ e 1 25 ] 


lmjt 


►B125] 


[mjt 


>6125] 


[mjt 


•6125] 


[mjt 


•e 125] 


[mjt 


r 6125] 


[mjt 


1-6125] 
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001237 
001240 
001241 
OOI242 
001243 



024472 
024472 
024472 
024472 
013452 



10601 2 
106012 
106012 
106012 
000S12 



167777 
1 67777 
1 67777 
1 67777 
127777 



CLR\T 
CLR\T 
CLRNT 
CLR\T 
TST 

. PAGE 



R12\0,R12,S0 
R12\0 , R12.SD 
R12\0,R12,SD 
R12\0,R12,S0 

R12 (PRSE 



%RDCLK 
%ROCLK 
%RDCLK 
%RDCLK 
XRET 



IF ORV CLK TICK THEN RETURN 

IF DRV CLK TICK THEN RETURN 

IF DRV CLK TICK THEN RETURN 

IF DRV CLK TICK THEN RETURN 

WE DIDN'T GET OCLK! DRIVE ISN'T 



Imjt 
Im jt 
Imjt 
Imjt 

LISTENING TO US 



S12S] 
el 25 1 

9125! 
e!251 
■XIT [mj' 



o 
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ROUTINE NAME: 
LEVORD 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE PERFORMS THE SDI LEVEL CONTROL INFORMATION TRANSFER 
FROM THE DRIVE TO THE CONTROLLER AS OESCRIBEO IN THE SDI SPECIFICATION. THE 
CONTROL INFORMATION READ IS RETURNED IN REGISTER R12. REGISTER R11 IS 
FOR A SUCCESSFUL TRANSFER AND IS EOUAL TO 1 FOR A ORIVE CLOCK TIMEOUT. 

INPUTS : 

NONE 

OUTPUTS : 
R1 I 
R12 



FOR A SUCCESSFUL TRANSFER, 1 FOR A DRIVE CLOCK TIMEOUT 
FRAME CODE (UPPER BYTE) AND DATA (LOWER BYTE) 



< 

3 

a 
n 
s 

cc 
O 

u. 

V) 

o 



* There are some interesting timing problems in this * 

* routine, and some subtle logic that needs elucidation.* 

* * 

* The 1 instruction loop at LEVORA: loops on the * 

* condition NWRC. WRC is the logical OR of: * 

* NOT( SERDES Word Rate Clock ) * 

* with ( NCRY from the ALU ) * 

* * 

* Therefore the 1 instruction loop at LEVORA: ex its * 

* and continues at LEV0R2 : on either of two conditions: * 

* the SERDES WRC goes low ( ie a SYNC has been received) * 

* or NCRY is set (ie the DEC of R12 has just decremented* 

* from O to -1, thus the timeout count has been reached)* 

* This implies a maximum data rats of: * 

* 34Sns/8 . Sbit S a 40.9ns/bit 

* for response data rocei 

* of 2.1ms. 



24 . 4Mb/S. 
within the timeout period 



The 

i f WRC 
not bee 
imp 1 i es 

3 
Also th 
the SER 
( which 
a data 

3 

can be 

If t 

then at 
it will 
guar ant 
the con 



j instruction loop at LEVORB: is only entered * 
was Seen and NCRY was not seen, and DRDY has * 
n seen in 2 additional instructions, this * 

that thedata rate is slower than: * 

;48ns*2/7 .SbitS > 92.8ns/bit * 

) loop manages to transfer the data from * 

)ES within 2 instructions of DRDY going high * 

stays high a max of 13 bits land this implies * 
-•at e upt o : * 

48ns*2/ 1 3bi t S t 53.Sns/bit * 

handled. Therefore this loop is okay. * 

* 
he initial timeout count is decremented to -1 * 

LEVORB: the rcvr rdy signal is turned off. But* 

take 23 bit times plus 2us before we can * 
ae that the drive has seen it during which time* 
troller must still listen for the command . It * 
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is now to late to check WRC as at high data rates it 
may have already been missed. So the loop at LEVORE 
is used to timeout the receiver ready race condition. 
It will dump the SERDES data within 2 instructions of 
DROY beiing asserted, and this implies that the max 
data rate that can be handled by this loop is: 

348ns*2/13bitS = 53.5nS/bit = 1 S . S7Mbi t S/Sec 



Th 



er ef 

exc 



ore 
ess 



00 1 244 
001245 

001 246 

001 247 

001 250 

001 25 1 
00 1252 
OOl 253 
001253 
00 1 254 
00 I 255 
001255 

001257 
001260 



1 3375 1 
01 3440 
031 452 
1 3740 
031472 
033732 
033732 

033771 
033732 
0314S1 
033712 

01 3740 
034451 



000030 
00O640 
00073 1 
00501 1 
1707 12 
100006 
10000 6 

025001 
100006 
1000 1 1 
000006 

00S001 
0005 1 1 



000000 
010000 

oooooo 
oooooo 

051250 
151257 
1512S7 

041261 
151257 
01 1253 
OOOOOO 

1 0000 

1 I 1266 



LEVORA: 
LEV0R2: 



LevORC 
LEVORX 



missi ng the 



f t he 
apper 



** ** 

MOV 

NOP 

DEC 

MOV 

DEC\ 

MOV\ 

MOV\ 

ASSU 

MOV\ 

MOV\ 

DEC 

MOV 

SOI 

MOV 

CLR 



on 
OIAG 
DRIV 
RUN 
TOPO 
******** 
#61 4 

R1 1 

#<C0 
T R12 
T (SO) 
T (SO) 
ME CONT 
T »CON 
T (SO) 
R1 1 
(SD) 
LEVEL 
#CON 
Rl 1 



for re 
of 1 E 

dat a 
trolle 
comman 
NOSE 
E CLEA 

LOGY 

****** 

4. , Rl t 
B>R 

Rl 2 S>S 

NT+CRO 

<?S 

R12 

R12 

EO, 1 

T.R1 1 

,R12 

,R12 
REAO 
RTCS 
(PR 



sponses from drives with a data rate 

6 Mbits/sec there is a possiblity of 

if it is not received within 2.1ms 

bringing up RCVR RDY. This can 

ds such as: 



******* 

CMD 
RM 

Y> ,RTCS 
%J 

%J 



NWRC 

OCLK 
OCLK 



LEVORA 
LEVORC 
LEVORC 



RTCS %J 

7.JN0CLK LEVORB 



JNCRY 

JDCLK 



LEVORE 
LEVORC 



UCCESS EXIT POINT *** 
7.JMP LEVORG 



**************** 
R11=APPR0X 2 MSECS VALUE 
RESET COMMAND MOOE 

SET CARRY/SET R12/SET REAO MOOE 
SET CONTROLLER RECVR RDY 

OECR R12/IF NOT WRC OR CRY THEN LOOP 
IF DRIVE TICK THEN R12=SERDES DATA 
IF DRIVE TICK THEN R12:SERDES DATA 
CONT MUST BE 1 ! 

[EC0#2]R1 1 sDRIVE CLOCK FAILURE ERROR 
IF DRIVE TICK THEN R12sSER0ES DATA 

[EC0#2]DECR R1I/IF NO OCLK THEN GO CHK FOR NCRY 
(EC0#2)R12:SER0ES DATA 

[EC0#2]RESET CONTROLLER RCVR RDY 
[EC0»21RESET SERDES ENABLE 



LISTEN TO DRIVE AFTER RECEIVER READY RESET *** 



001 261 

001 262 

001 263 

00 1 264 
001265 

001 266 

001 267 



033732 
033752 
033732 
031452 
01 3440 

013440 
013451 



10OO06 
00003 6 
100006 
1000 12 
01 0500 

000440 
00053 1 



141260 
10000 
141260 
101263 
041263 

OOOOOO 
137777 



LEVORE 
LEVORF 



MOV\T (SO ] , R12 

MOV #30. ,R12 

MOV\T (SD),R12 7.JDCLK 

DEC R12 "/.JDCLK 

NOP\F SRSE 7.JNZR0 

SOI LEVEL O READ EXIT POINT *** 

NOP (PSCMO 

TST R1 1 1PRRM %RET 



7.J0CLK LEVORX 



LEVORX 
LEVORF 
LEVORF 



IEC0#2]IF DRV CLK THEN DONE 
[EC0#2]R12=L00P COUNT 
[EC0#2]IF DRV CLK THEN OONE 
[EC0#21IF DRV CLK THEN DONE ELSE DECR 
(EC0#2lIF NEO THEN LOOP ELSE DONE 

SET IN COMMAND MODE 

TEST Rl l/RESET READ MODE/RETURN 



001270 013740 005001 



MOV 



#CONT,RTCS 



%RET 



RESET ALL CONTROLLER STATE BITS 



001271 
001 272 



01 3440 
013311 



000460 
000662 



OIOOOO 
137777 



TO RESET RTDS PARITY ERROR IEC0#2J *** 

1EC0#2]SET CLEAR 

(EC0#2]RESET CLEAR/PUT LSB OF RTDS ON CCOOE 

IEC0#2]AND R11 IN CCODE/RETURN 



ROUTIN 

NOP IPSCLR 

TSTB (RTDS).RII (PRCLR %RET 
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Q 

o 

II 

5 
cc 
O 
u. 

w 
o 

10 



c 



001273 
00 1274 
O01275 
00127 6 
001277 
OOl 300 
001301 
001302 

001303 

001304 
00130S 
001 305 
001305 
001306 
001307 
OOl 310 



013740 
033456 
034556 
013740 
035552 
1 1 6552 
033771 
1 301 54 

035557 
0301 56 



11455 6 
1 30476 
036157 
035552 



10012 
000377 
0072 14 
O00377 
OOO 1 61 
010002 
010014 

000377 
010012 



00OO01 
1001 6 

0000 1 2 
000377 



SDI LEVEL 1 COMMANDS/ROUTINES 



ROUTINE NAME: 
LEV1RD 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL REAO THE SDI INTERCONNECT FOR A DRIVE RESPONSE. 
ON A SUCCESSFUL RETURN R12 WILL HOLD THE SDI DRIVE RESPONSE OP CODE AND 
BUFFER POINTED TO BY R13 WILL HOLD THE DATA (IF ANY) ASSOCIATED WITH THAT 
RESPONSE. R11 WILL INDICATE THE STATUS OF THE OPERATION. THIS ROUTINE WILL 
ALSO VERIFY THAT THE FRAMING CODE SEQUENCE AND THE CHECKSUM ARE CORRECT. 

R17 IS A 2-SYTE SHIFT REGISTER WHICH IS DUMPED INTO MEMORY ON EVEN BYTES 

END FRAMES ARE PROCESSED AS NORMAL FRAMES AS MUCH AS POSSIBLE TO ALLOW 

THEM TO CLEAR OUT THE RI7 SHIFT REGISTER. 



INPUTS : 



R13 
R14 



OUTPUTS : 

Rl 1 S 



LV1SV1 
OCERR 
SFERR 
FRERR 
CSERR 
LNERR 



POINTER TO DRIVE RESPONSE BUFFER 
LENGTH OF DRIVE RESPONSE BUFFER 



= SUCCESSFUL 

1 : DRIVE CLOCK OR DRIVE DATA TIMEOUT 

2 : FIRST WORD NOT A START FRAME 
4 ■ ILLEGAL FRAME CODE 

lO : INVALID CHECKSUM 

20 ■ RESPONSE LENGTH ERROR 



R12/LV1SV2 
Rl 4 



OP CODE OF RESPONSE PACKET 
= DRIVE BUFFER NOT OVERRUN 
NEGATIVE = DRIVE BUFFER OVERRUN 

RI6 IS USED TO CALCULATE THE CHECKSUM 

R17 IS USED AS A TEMPORARY REGISTER 



007212 121244 LEVIRD: MOV 



077777 
133623 
OOOOOO 
123621 
OOOOOO 
071330 
01 1304 

121244 
001 330 



OIOOOO 
051307 
1 0000 
OOOOOO 



LEV1RA: 
LEV1RB : 



MOV\F 

AND 

MOV 

BIC 

XOR 

MOV\T 

AODC 

BIC 

ADD 

ASSUME 

ASSUME 

BIT 

INC\T 

XOR 

BIC 



#LV1SV1 , BAR 
RI2, R16 
•LOBYT, R16 
#LV1SV2,BAR 
#LOBYT, R12 
#STRTCD, R12\N 
#SFERR, Rl 1 
Rl 4 , R14 

#L0BYT,R17 
R12, R16 

CONTCDS400.EQ.O 
ENDCD8.400, EQ , O 
#400, R16 
R16 

R12, R17 
#LOBYT, R12 



5SRNZR0 

'/.CALL 



7.CNZR0 
7. JNZRO 



•'.CALL 
%JNZRO 



LEV1RF 
LEV1RB 



LEVORD 
LEV1RF 



GET ST 

RETURN 

ISOLAT 

[ 1 6K1B 

ISOLAT 

CHECK 

ANYTHI 

BUT KE 

NOTE T 

CLEAR 

ACCUMU 

SINCE 

WE CAN 

00 END 

LEAVE 

R17I LO 

ISOLAT 



ART FRAME 

IF TROUBLE 
OPCODE. CLEAR ERROR BYTE 
AR=PTR TO OP CODE SAVE 
E FRAME CODE, SAVE OPCODE 
FOR START FRAME 
NG ELSE IS ERROR 

EP GOING SINCE IT MAY BE END FRAME 
HAT R14 IS NOW A BYTE COUNT ♦ 1 
NEW BYTE IN R17 AND GET NEW BYTE 
LATE CHECKSUM IN R16 
THE LEGAL FRAMES HAVE BIT 8 CLEAR 

USE IT FOR A CARRY BIT... 

AROUND CARRY, BUT 
UPPER HALF SLOPPY FOR NOW. . . 
) ; DATA BYTE 
E FRAME CODE IN RI2 
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00131 1 


036157 


000012 


010000 








XOR 


R12.R17 






001 31 2 


03375 1 


OOOO 1 o 


1 23577 








MOV 


#». ,R1 1 


'/.CALL 


S . RR17 


001313 


033751 


000004 


000000 








MOV 


*FRERR,R1 1 






001314 


1 16552 


000324 


000000 








XOR 


#C0NTCD,R12\N 






001 31 5 


1 16552 


01O262 


111317 








XOR 


#ENDCD,R12\N 


7.JZR0 


LEV1RC 


00131 s 


135557 


010377 


071330 








BIC\F 


#HISYT,R17 


7.CNZR0 


LEV1RF 


001317 


031454 


000014 


OOOOOO 


LEV 


RC : 


OEC 


R14 






001320 














ASSUME 


DCERR, EO, BITOO 






001320 


033771 


030020 


171330 








MOV\T 


#LNERR,R1 1 


7.CMSB 


LEV1RP 


001321 


120373 


047013 


073622 


LEI/IRE 


INCBVT 


R13N0, R13,BAR 


7.CLSB 


S .ST17 


001322 


136552 


000262 


010000 








XOR 


*ENDCD,R12 






001323 


034576 


010377 


04 1303 








AND\T 


#L0BYT,R16 


7.JNZR0 


LEV1RA 



R17IHI] IS BACK TO ITS OLO VALUE 

SWAP BYTES OF R17 

PREPARE TO CHECK FRAME CODE 

CHECK CONTINUE 

OR END FRAME 

FORCE R17(HI) TO IF END FRAME 

DECREMENT BUFFER BYTE COUNT 

MAKE SURE OCERR IS LSB 

SET LENGTH ERROR 

IF POSITIVE ANO ODD. STORE WORD AND INC PTR 

SEPARATE END FRAMES FROM CONTINUE FRAMES 

MAKE CHECKSUM NEAT AND LOOP UNLESS END FRAME 

NOTE THAT WE DO NOT CLEAN UP R16 ON END FRAMES - THIS IS TO CATCH THE NITPICKING 
SPECIAL CASE OF 377*0 = 377+377 (WITH END-AROUNO CARRY) 



o 



001324 137556 OOO 1 1 5 O 1 OOOO 



001325 
001326 
001327 
001 330 
001331 



033751 
013740 
013740 
013740 
03351 1 



010010 
007214 
007212 
007212 
0OO0O3 



031330 
1 33604 
1 13603 
OOOOOO 
103614 



XNOR 

MOV 
MOV 
MOV 
MOV 
BIS 
.PAGE 



#< -ENDCD- 1 >«HIBYT, R1 6 



»CSERR,R1 1 
#LV1SV2, BAR 
#LV1SV1 , BAR 
(HLV1SV1 . BAR 
(BUF) , R1 1 



'/.CNZRO 
54CALL 

%JMP 



LEV1RF 
S . LD12 
S . L D 1 1 



COMPARE CHECKSUM AGAINST EXPECTED VALUE, 
WHICH IS ENDCD+377. 

LOG CHECKSUM ERROR IF IT AIN'T RIGHT 
[1SK1GET OPCODE IN R12 FOR EXIT 
[16KIGET ERROR CODE IN R11 AND EXIT 
[16K1R0UTINE TO "OR" ERROR CODE IN R11 
WITH CUMULATIVE COOE IN HEADER 
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ROUTINE NAMES: 
STRT.F 
CONT . F 
END . F 

FUNCTIONAL DESCRIPTION: 

THESE ROUTINES FORM THE SDI LEVEL 1 COMMANDS AS DESCRIBED IN 
THE CONTROLLER FUNCTIONAL SPECIFICATION SECTION 5.5.4. THE ROUTINES ARE DESCRIBED 
AS FOLLOWS: 

STRT.F OUTPUTS MESSAGE START FRAME 

CONT.F OUTPUTS MESSAGE CONTINUATION FRAME 

END.F OUTPUTS MESSAGE END FRAME 



INPUTS : 



OUTPUTS : 
R1 1 



DATA FOR STRT.F (UPPER BYTE = 0) 
DATA FOR CONT.F (UPPER BYTE s 0) 
CHECKSUM FOR END.F 
COPY OF DATA FOR STRT.F 



- SUCCESSFUL COMPLETION 

1 > DRIVE DATA OR DRIVE CLOCK TIMEOUT 
CHECKSUM (STARTED BY ST RT . F , MA I NTA I NED BY 
CONT.F, AND OUTPUT TO DRIVE BY END.F) 



001332 1335S2 000161 101212 STRT.F 



OUTPUT DATA AND START FRAME CODE *** 
BIS #STRTCD,R12 %JMP LEVOWR 
OUTPUT OATA AND CONTINUE FRAME CODE *** 



001333 
001334 
001335 
001336 



O01337 
001340 



030153 

1 14553 
131573 
133552 



037452 

136552 



0000 12 
000001 
010377 
000324 



0000 13 
0OO1 15 



OOOOOO 
1 OOOO 
OS1336 
1 1 1207 



OIOOOO 
1 1 1207 



ADD 
BIT 
SUB\T 
BIS 



R12.R13 
#400,R13 

#377, R13 
#C0NTC0, R12 



7.TNZR0 
%JMP 



LEVOWW 
OUTPUT CHECKSUM AND END FRAME CODE *»» 



COM 
XOR 
.PAGE 



R13, R12 
#NENDCD , R1 2 



GO TO LEVEL O TO TRANSMI T /RETURN 



UPOATE CHECKSUM 

CHECK FOR BYTE CARRY 

IF CARRY THEN ADD 1 TO CHECKSUM 

GO TO LEVEL TO TRANSMIT/RETURN 



1'S COMPLEMENT CHECKSUM 

GO TO LEVEL TO TRANSMIT/RETURN 



\*,J 



KDBSO. MICROCODE. , 22 -APR- 1988 11:27:16. 96 



KDBQP 

SDI LEVEL 



DIGITAL EOUIPMENT CORP. 
AND 2 ROUTINES 



2901 ASSEMBLER VERSION 32 



d 



SDI LEVEL 2 COMMANDS/ROUTINES 



ROUTINE NAME: 
LEV2. 1 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL ISSUE THE 1 BYTE LEVEL TWO COMMAND THAT IS PASSED 
IN R12. 

THE SOI COMMAND RESPONSE TIMER WILL BE SET PRIOR TO SENDING THE COMMAND 
TO THE DRIVE. 



INPUTS : 

R1 2 



SOI LEVEL 2 COMMAND 



OUTPUTS : 
R1 1 



: SUCCESSFUL COMPLETION 

1 = DRIVE DATA OR DRIVE CLOCK TIMEOUT 
R12 IS USED AS A TEMPORARY REGISTER 

R13 IS USED FOR THE SDI LEVEL t CHECKSUM 



001341 
001 342 



0334S3 
O 1 345 1 



000012 
00OO1 1 



121332 

111345 



MOV 


R1 2 


R13 


%CALL 


STRT 


TST 


R1 1 




%JMP 


LEV2 


. PAGE 











R12:0P CODE/OUTPUT START FRAME 
TEST R11/C0NTINUE 
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ROUTINE NAME: 
LEV2 2 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL ISSUE A TWO BYTE LEVEL TWO COMMAND USING THE 
COMMAND PASSED IN R12 ANO THE DATA PASSED IN RI4. 

THE SOI COMMAND RESPONSE TIMER WILL BE SET PRIOR TO SENDING THE COMMAND 
TO THE ORIVE. 



INPUTS : 

R1 2 
R17 



SOI LEVEL 2 COMMAND 

OATA FOR SOI LEVEL 2 COMMAND IN R12 



OUTPUTS : 
R1 1 



> SUCCESSFUL COMPLETION 

1 ■■ ORIVE DATA OR DRIVE CLOCK TIMEOUT 
R12 IS USED AS A TEMPORARY REGISTER 

R13 IS USED FOR THE SOI LEVEL 1 CHECKSUM 



Q 
< 

3 
O 

ii 

5 
cc 
O 
u. 

to 
o 
CY) 



001343 033453 

001344 033472 

001345 013440 

001346 013451 



0OOO12 
10O1 7 
O 1 0000 
00OO1 1 



12 1 332 
171333 
13 1337 
1117 14 



MOV 

MOV\T 

NOP 

TST R1 1 

. PAGE 



R12, R13 
R17. R12 



%CALL STRT.F 

%CZRO CONT.F 

%C2R0 END.F 

%JMP D . ECKS 



RI2sC0MMAN0 TO SEND 

ELSE OUTPUT OATA BYTE 
ELSE OUTPUT END FRAME 

GO CHK FOR SEND ERRORS 



d 
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ROUTINE NAME: 

LEV2.T (TABLE DRIVEN) 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL SEND THE SDI LEVEL TWO COMMAND THAT IS THE SECOND 
(HIGH) BYTE IN THE TABLE POINTED TO BY REGISTER R16. IT WILL TRANSFER THE 
NUMBER OF BYTES (INCLUDING COMMAND) INOICATED BY REGISTER R14. 

INPUTS: 

R1 6 
R17 



o 



POINTER TO SDI COMMAND TABLE (BUFFER) 

NUMBER OF BYTES IN COMMAND (INCLUDING COMMAND BYTE) 



OUTPUTS : 
R1 1 



i SUCCESSFUL COMPLETION 

1 : DRIVE DATA OR DRIVE CLOCK TIMEOUT 
R12 IS USED AS A TEMPORARY REGISTER 

R13 IS USED FOR THE SDI LEVEL 1 CHECKSUM 
R17 IS USED AS A TEMPORARY REGISTER 



O01347 
OO13S0 
0O135I 
001352 
001353 
0O13S4 
001355 
00135 6 
001357 



120156 
035552 
033453 
1 50458 
031457 
073456 
033712 
034S52 
013451 



007016 
000377 
0000 12 
1001 6 
00O017 
017016 
030003 
000377 
OOOOI 1 



133604 
133575 
1 21332 
077777 
000000 
141337 
133575 
121333 
1 1 1352 



ADOC 

BIC 

MOV 

INC\RF 

DEC 

MOV\LF 

MOV 

AND 

TST 

. PAGE 



R1 6\0,R16,BAR 

#L0BYT,R12 

R12, R13 

R16 

R17, R17 

R16, R16 , BAR 

(BUF) ,R12 

#L0BYT,R12 

R1 1 



%CALL 
%CALL 
%CALL 
7.RNZR0 

%JZRO 
%CMSB 
%CALL 
%JMP 



S. L012 
S . SWAB 
STRT. F 



END.F 
S . SWAB 
CONT. F 
LBV2TA 



R12:S0I COMMAND(HI) 

SWAP BYTES OF R12 

OUTPUT START FRAME AND COMMAND 

IF ERROR THEN RET/ELSE INCR R16 

DEC R17 

IF R17 E9 O THEN SEND END FRAME 

R12:2 DATA BYTES 

OUTPUT OATA 8YTE 

INCR SUFFER PTR/IF BYTE CNT O THEN DONE 
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ROUTINE NAMES: 

S.XXXX (SEND SDI LEVEL 2 COMMAND) 
R.XXXX (RECEIVE SDI LEVEL 2 RESPONSE) 

FUNCTIONAL DESCRIPTIONS: 

THESE ROUTINES WILL SEND EACH SOI LEVEL TWO COMMAND NEEDED BY THE 
CONTROLLER AND ITS SISTER ROUTINE WILL RECEIVE ALL OF THE DRIVE RESPONSES. 
ADDITION THEY WILL MAINTAIN THE STATE VECTOR INDEX 'SDI.SV AND RETURN 
SUCCESS OR FAILURE STATUS TO THE CALLING ROUTINE. CERTAIN COMMANOS 
WILL ALSO 00 FUNCTION SPECIFIC PROCESSING (I.E GET STATUS). 

INPUTS: 



POINTER TO SOI CONTROL BLOCK 
SDI . PO 



SDI 


SI 


SDI 


CP 


SDI 


S2 


SDI 


CW 


->SDI . CW 


RESET 



OBAR 
R1 1 
R12 
R13 

R1 6 
R17 
BAR 

DPF 



OUTPUTS : 

APPROPRIATE COMMAND SENT OR RESPONSE RECEIVED 
SUCCESS OR FAILURE INDICATION 



SEND STYLE 1 SDI CHANGE MODE COMMAND (FOR ONLINE) *«« 
CHECK FOR ONLINE READ RECOVERY IN PROGRESS *** 

REMOVE WITH NEW MO . I MF HANDLING [V0S1 



S .CMD1 : ; MOV 
ADD 

ASSUME 
MOV 



##CHGM0D,R13 %JMP S . CMO 1 
#P . RS06, R1 1 .BAR '/.CALL S.LD11 
ONLREC.EQ, BITI5 
#< V.OLRO-V.CMD! > , R1 1 %JMSB D.It 



EXECUTED IN JUMP TABLE 

R1 1 - RETRY WORD 

ONLINE RECOVERY FLG MUST BE MSB 

THEN SKIP LEVEL TWO COMMANDS/DO READ 



* * * 
. CMOD: 



0O136O 134557 000360 122023 



00 136 1 
00 13 62 
OO 1 3 6 3 
0013 64 
0O1365 
OOI366 



1 14556 
033152 
135552 
134552 
133552 
033552 



0OO06O 
010017 
OO034O 
000374 
000367 
O0OO04 



000000 

141364 

oooooo 

133575 

oooooo 

101375 



SEND STYLE 2 SOI CHANGE MODE COMMAND (FOR ATTENTION) 
NOW ONLY 1 STYLE SDI CHANGE MODE COMMAND [ VOS 1 **< 
;MOV ##CHGM0D,R13 %JMP S . CMOD ; 
CHECK FOR WRITE PROTECT BIT CHANGING **« 
AND #0RV.SU,R17 %CALL O.GUNF ; 
CHECK FOR SOFTWARE/HAROWARE WRITE PROTECT 
BIT #<UF .WPH ! UF . WPS> , R1 6 ; 

BIS\F R17.R12 %JZRO 1 0S ; 

BIC #<DRV .W4 ! ORV . W3 I DRV -W2> , R1 2 ; 
ANO #<HIBYT-ORV.0B-ORV ,S7> ,R12 7.CALL S 
BIS «<0RV.SU!0RV.F0!DRV.DB!DRV.S7>,R12 
BIS #<ORV . P0/2S6. > ,RI2 %JMP S.SND3 



[V051EXECUTED IN JUMP TA8LE 

ISOLATE SUBUNIT MASK FIELD/GO GET UNIT FLAGS 

*** 

IF H/W OR S/W WRITE PROTECTEO 

THEN SET BIT TO TURN LIGHT ON [E1261 

CLEAR DISABLE OF ERROR LOG [E126I 
.SWAB ; ISOLATE HI BYTE/SWAP BYTES OF R12 [El 

; SET MASK TO CLEAR THESE BITS 
ENABLE FORMATTING FOR REPLACE MD 






001367 133753 OOO202 O1O0OO 



; «»* IF PROPF THEN SEND STYLE 
; *** ip s>SOPF THEN SEND STYLE 
S.CFL1: MOV ##CHGFLG , R 1 3 



(ONLINE) SDI CHANGE FLAGS COMMAND «** 
(AVAILABLE) SOI CHANGE FLAGS COMMAND *** 

; R13=CHANGE FLAG CMO (HI BYTE) 
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001370 
O01371 
001372 
001373 
00 1 374 
001 374 

| 001 375 

Jr. 

00137S 
001376 
001377 
001400 



134SS7 
0334S2 
030551 
03371 1 



03375S 
1 10440 
033757 
0134S1 



000360 
060017 
0O7007 
0O0OO3 



000000 

01 1375 
133575 
000000 



033152 04O017 101672 



0O7O1 1 1236 16 

0O7616 123615 

000003 121347 

00001 1 111714 



AND 

MOV 

ADD 

MOV 

ASSUME 

OR 



#ORV .SU, RI7 
R17, R12 

#P.MOO. R1 1 , BAR 
(BUF) ,R1 1 
MD.SPD.EO, BITOO 
R17, R12 



%JNOPF 

'/.CALL 



SN03 
SWAB 



7.JNLSB 0. INS2 



ASSUME S.SN03.EQ. 



ISOLATE SUBUNIT FIELD 

R17:SUBUNIT MASK 

IEC0#1 ]BAR:>MODIFIERS FIELO/SWAP R12 

[ ECOHM ]R1 1 sMOOIFIERS FIELD 

IF NO SPIN DOWN 

1EC0#1]THEN CHK FOR DISCONNECT 

(ECOKMIELSE SET MASK AND S-BIT TO SET 

MAKE SURE S.SND3 IS NEXT 



*>• SEND THREE BVTE SOI LEVEL 2 COMMAND ( R I 3 : CMD , R 1 2 = MASK AND BITS) *** 
.SND3: MOV # I NPUT , R 1 6 . BAR %CALL S.ST13 ; STORE OP CODE IN PKT 

INC R16.BAR PROPF 7.CALL S.ST12 ; STORE MASK AND BIT FLAGS 

MOV #3,R17 7.CALL LEV2.T ; GO SEND COMMAND 

TST R11 %JMP D.ECKS ; GO CHECK FOR SEND ERRORS 



001401 
001402 



033752 
033457 



01 0005 
000016 



101 672 
1 1 1343 



SEND SOI DRIVE CLEAR COMMAND »** 
;ANO #<L08YT-0RV .0F> ,R1 6 7.JMP S.DCLR 
MOV #DRVCLR,R12 %JZRO D.INS2 
MOV RIB, KIT %JMP LEV2.2 



ISOLATE ERROR BVTE OTHER THAN OIAG FAIL BIT 
IF NO ERRORS THEN SKIP FRIVE CLEAR CMD 
GO SEND DRIVE CLEAR COMMAND 



SEND SSI DISCONNECT COMMAND (DUPLICATE OR ONLINE TO CONTROLLER) ••* 



001403 
00 1404 

001 405 

001 406 

001 407 

001 4 10 

001 4 1 1 
001412 
OOI 4 13 



0014 14 
001415 
0014 1 6 
0014 17 
0014 17 
001420 
00142 1 
001422 
0O1423 

001 424 

001 425 



001 426 

001 427 
001430 
OOI 43 1 
001432 



014552 
033777 
010555 
1 14551 
1 1 455 1 
033777 
010555 
01 3740 
033752 



010553 
133753 
030556 

1 14551 
034557 
133753 
133753 
010555 
013740 
033757 



010555 
030557 
133557 
010555 
034557 



000200 
010200 
0070OO 
000020 
010004 
010001 
007033 
003005 
000204 



007060 
OOOO20 
007007 

0OOO14 
01000 1 
000020 

00001 
007033 
OO3O05 
00000 1 



007006 
0O7001 
003001 
007017 
000377 



10000 
04 14 13 
133603 
OOOOOO 
002074 
041 41 3 
O100O0 
122045 
101 343 



123623 
122013 
13361 1 

010000 

111413 
13201 1 
122013 
OIOOOO 

OOOOOO 

101413 



13361 I 
12361 1 
OOOOOO 

13361 1 
101343 



S . DCN3: 
S . DCNE : 



; * * * 
S . EREC 



; CLR 
BIT 
MOV\T 
ADO 
BIT 
BIT 
MOV\T 
ADD 
MOV 
MOV 

SEND SD 
;MOV 
ADO 
MOV 
ADO 

ASSUME 
BIT 
AND 
MOV 
MOV 
AOD 
MOV 
MOV 
SEND SD 

;MOV 

ADD 
ADD 
BIS 
ADO 
ANO 



R17 


%JMP 


S.DCN1 


<0R« .OA, R12 






#OCN .TT, R17 


%JNZRO 


S.DCNE 


#SDI .ST, DBARVN 


BAR 7.CALL S . L01 1 


#DRAVL . R1 1 






#ORDUP, R1 1 


7.JNZR0 


. 2ATT 


#DCN .ST, R17 


7.JNZR0 


S . OCNE 


•SOI .TO, OBARNN 


BAR 




#5, BUF 


7.CALL 


O.OFFD 


#DISCON , R12 


%JMP 


LEV2 . 2 



EXECUTED IN JUMP TABLE 
IF ALREADY ONLINE 

THEN DISCONNECT WITH TERMINATE TOPOLOGV MOD. 
R1 1 =SDI STATUS 
IF DRIVE AVAILABLE 

THEN DONE/IF DUPLICATE SET 

THEN SPIN DOWN 
[1SK] ELSE BARsPTR TO SOI TIMEOUT 

[16K]SET T/0=32 .ALREADY ONLINE 8 MARK UNKNOWN 
GO SEND DISCONNECT COMMAND 



I DISCO 
R1 1 , R1 
#SDI U 
#DRAVL 
#P .MOO 
OCN . ST 
#<ORDU 
#DCN S 
#ORAVL 
#DRVOL 
#S D I . T 
#5, BUF 
#DCN .S 

I ERROR 
#ERECO 
#SOI .U 
#BUF -S 
*BERON 
#S0 I .E 
#LOBYT 



NNEC 
6 

F,R1 
,R13 
,R1 6 
,E0 
P !0R 
T,R1 
, R13 
, R13 
0, DB 

T, R1 
REC 
V, R1 
B, DB 
T, R1 
, R17 
1 , DB 
, R17 



T COMMAND (MS 
%JMP 

3\N,BAR %CALL 
%CALL 
BAR %CALL 

MD.SPO 

VOL> ,R1 1 

7.JZR0 
"'.CALL 
SCALL 

AR\N , BAR 

7 %JMP 
OVERV COMMAND 
2 %JMP 
AR\N,BAR 7.CAL 
7, BAR 7.CALL 
, BUF 

AR\N,BAR 7.CAL 
7.JMP 



CP AVAILABLE) »*» 
S .0 

s . c 



s 



0CN2 

:lrb 

SSET 
LD17 



S . D 
D.C 

. s 



CNE 
LRS 
SET 



S .E 

L S. 

S . L 

L S . L 
LEV2 



REC 

L017 

D17 



EXECUTED IN JUMP TABLE 
[U52EC312AP UNIT FLAGS 
GO MARK SDI STATUS AVAILABLE 
R17=MSCP MODIFIERS 
INSURE SPIN DOWN MODIFER COMPATIBLE 
IF DRIVE WAS NOT A DUPLICATE OR OFF L I NE f r ae03 ! 
THEN JUST DISCONNECT [rae03] 

ELSE MARK OFFLINE [rae03] 

[raaoj] 
BARsPTR TO SOI TIMEOUT [rae031 

set timeout [rae03] 

spin down drive [pae03] 

EXECUTED IN JUMP TABLE 

(EERREC1GET U BUFFER OESC PTR 

[EERREC1GET STATUS WORD 

[EERREC1SET ERROR RECOVERY CMD DONE FLAG 

R17=LEVEL 1 ERROR STATE 

GET RECOVERY LEVEL/GO SEND COMMAND 



; *•> RECEIVE GET COMMON CHARACTERISTICS RESPONSE •** 
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001433 033453 

001434 030553 

001435 033756 

001436 035551 

001437 013451 
OOI440 016152 



000015 
000033 
00O1 70 

000020 
01001 1 
000016 



010000 
121273 
OOOOOO 

010000 
001 704 
101712 



;MOV 
MOV 
ADD 
MOV 



#SOI ,DL , R14 
OBAR , R1 3 
#SD I . TO , R1 3 
#GTCRSP , R1 6 



ROUTINE TO VERIFY RESPONSE IN R16 >** 



BIC 
TST 
XOR 



*LNERR,R1 I 

R1 1 

R 1 6 , R 1 2 \ N 



7.JNZR0 
%JMP 



. ECKR 
.ECRB 



EXECUTED IN JUMP TABLE 
R13:S0I CONTROL BLK PTR 
R13=BUF PTR/GO GET RESPONSE 
R16:GET COMMON CHAR RESPONSE 

EXPECT A RESPONSE LENGTH ERROR 

GO CHK FOR RECEIVE ERRORS 

CHECK FOR CORRECT RESPONSE/CONTINUE 



00144 1 

00 1 442 



033751 
034557 



000010 

000360 



123577 
101343 



SEND SDI GET SUBUNIT CHARACTERISTICS COMMAND *>» 



; MOV 
MOV 
AND 



#GTUCHR, R1 2 
#8 . , R1 1 
#HINIB,R17 



7.JMP 

7.CALL 

7.JMP 



S . GUCH 
S .RR17 
LEV2 .2 



EXECUTED IN JUMP TABLE 

GET SUBUNIT MASK IN 8ITS <7:4> 

GET SUBUNIT MASK/GO SEND CMO 



001443 
OOI 4 44 



030553 

033756 



000063 
000167 



121273 
1 1 1436 



RECEIVE SDI GET SUBUNIT CHARACTERISTICS RESPONSE *«■ 

;MOV *<SOI . LL-SDI . HI > , R14 %JMP R . GUCH ; EXECUTED IN JUMP TABLE 

ADD #SDI.H1,R13 7.CALL LEV1R0 ; BUMP PAST STATUS, UNIT FLAGS 

MOV #GTURSP,R16 7.JMP R.GXCH i RI6:GET SUBUNIT RESP/GO VERIFY 



RECEIVE TOPOLOGV RESPONSE *** 
;MOV #T0PRSP,R12 7.JMP 
ASSUME R .GSTA.EO, . 



EXECUTEO IN JUMP TABLE 

MAKE SURE RECV GET STATUS IS NEXT 



\J 



001445 
001446 
00 1447 
O01 450 
0014S0 
0O1451 
00145 1 
OO 1 452 
001453 

001454 

001455 
001456 
001 457 

001460 
001461 
OOI 4 62 
001463 
001464 



013740 
033753 
033754 



OOI 4 65 
001466 



0337S3 

016S12 
033754 

033452 
030552 
033756 
030552 

010555 

014551 
033756 
033753 
013440 



013440 
013440 



0O7O10 

00001 1 
000007 



O40O0 1 
040003 
1001 1 

0000 15 
000043 
0O00O3 

0OOOO2 

007044 
000050 
010353 
000003 
OOOOOO 



OOOOOO 
OOOOOO 



133615 
OOOOOO 
131273 



013760 017OIO 161452 



011715 
OOI 723 
001712 

OOOOOO 
010000 
122105 
132105 

133603 
OOOOOO 
1 12036 
131633 
102036 



131022 
102036 



RECEIVE 
:MOV 
MOV 
MOV 
MOV 

ASSUME 
MOV\T 
ASSUME 
MOV 
XOR 
MOV 

SAVE SO 
MOV 
ADD 
MOV 
ADD 
CHECK 
ADO 
BIT 
MOV 
MOV 
NOP 



SDI 

#STA 
#HEA 
#INP 
#INP 
<HEA 
#HEA 
OCER 
#1 ,R 
(BUF 
#INP 

I STA 
DBAR 
#SDI 
#3,R 
#<SD 

SEE 
#SOI 
#<0R 
#<ST 
#FM. 



GET STATUS RESPONSE *»* 
RSP.R12 7.JMP R.GSTA 
OER.BAR 7.CALL S.ST12 
UT, R13 

LEN.R14 7.CALL LEV1R0 
DER81>, E0,0 

OER.BAR 7.JZR0 R . GSTB 
EO, 1 



13 

I ,R1 
UT, R 
TUS 
, R12 
UN, 
16 
I ,S4 



7.JLSB O.ERCK 

2\N 7.JLSB D.ECKB 

14 7.JNZR0 D.ECRB 

IN SDI CONTROL BLOCK «» 



. OR 
DRV 
SDI 



R12 

7.CALL 
-<SDI S2+1 >> , R12 
ERROR LOG SHOULD 
DBARVN, BAR 7.CALL 
!DRV. EL> ,R1 1 
! SC . DOE) , R1 6 7.J2 
R13 7.CALL 

%JMP 



EXECUTED IN JUMP TABLE 

(16K1SAVE RESPONSE CODE 

R13=INPUT BUFFER PTR 

GO TRY TO READ RESPONSE 

E16K1MAKE SURE EVEN 

[ 1 6K] !ECO«M 1N0 RESPONSE GO CHK FOR RECEIVE ERRORS 

[EC0#1JMAKE SURE OCERR IS LSB 

[EC0#1|IF NO RESP THEN CHK FOR TIMEOUT 

[EC0#I1CHECK RESPONSE AGAINST STORED VALUE 

IF BAO RESPONSE THEN DO ERROR RECOVERY 



R12«0BAR 

R12=PTR TO START OF STATUS SAVE AREA 
O.SMOV ; R1S:» WOS TO MOVE/GO MOVE STATUS 
7.CALL O.SMOV} AOJUST RI2 FOR S4->S7/G0 MOVE STATUS 
BE GENERATED «•« 
S.LD11 ; RllsREOUEST WORD 

; IF NO OIAG OR LOG REOUEST 
RO D.INST; THEN GO TO NEXT STEP 
CLOGS ; GO SEE IF LOGS ENABLED 
D.INS1 ; AND GO TO NEXT STEP 



INITIALIZE DRIVE »»* 

;NOP 7.JMP S.INIT 

NOP 7.CALL . INIT 

NOP %JMP D. INS1 



EXECUTEO IN JUMP TABLE 
INITIALIZE DRIVE 
GO TO NEXT STATE 



001467 013440 OOOOOO 122016 



SEND SDI ONLINE COMMAND 
;MOV #SDITM0,R17 
NOP 



7.JMP 

7.CALL 



S.ONLN 

. ONSK 



EXECUTEO IN JUMP TABLE 
[U52EC2IDECR "NSEEKS" 
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001470 033752 000213 



001 471 

001 472 
00 1473 
001474 
001475 



001 476 
001477 
001500 

001 501 

001 502 



001502 
001503 



001504 
001505 



001505 
001507 



0015 10 

00151 1 
001512 

001513 
001 51 4 
OOtSIS 
001515 
001517 
001520 
001521 
001522 
001523 

001524 
0O1525 



014552 
015552 
010555 
033552 
033752 



01374O 
013740 
010555 
135571 



033754 
013451 



133753 
033752 



010555 
133551 



010S5S 
1 14551 
1 14551 

037771 
013440 
1 1 4551 
I 14551 
030555 
1 13740 
033757 
013460 
013451 

01 3440 
013440 



000100 
013 100 
007026 
003004 
0002 1 6 



010000 
1 1 1 672 
1 33604 
010000 
1 1 1506 



2901 ASSEMBLER VERSION 32 



MOV #0NLINE,R12 XJMP LEV2.2 

SEND SDI RECALIBRATE COMMAND '" 

;ADD #SDI . S 1 , DBAPAN, BAR %JMP S.RCAL 

BIT #DRV.RR,R12 

BIC *DRV .RR,R12\N. BUF %JZRO D.INS2 

ADD #SDI . ES,OBAR\N,BAR %CALL S.LD12 

BIS #FSEEK,R12,BUP 

MOV #RECALB,R12 7.JMP S.LRSP 

RECEIVE LONG TIMEOUT RESPONSE *** 



GO SEND SOI ONLINE COMMAND 



EXECUTED IN JUMP TABLE 

IF RECALIBRATE NOT REQUESTED 

THEN SKIP SEND 1 RECEIVE RECAL 
force seek following recalibrate 

GO SEND RECALIBRATE COMMAND 



; IE 1 21 ] 

i IE121 ] 






007200 123603 

007174 123614 

007035 133603 

033200 162121 



. LRSP: ;MOV 
MOV 
MOV 
ADO 
BIC\T 



*INPUT,R13 %JMP R.LRSP 
#HOSTMO,BAR "/.CALL S.LD11 
OTMR.MCBAR 7.CALL S.STII 
#SDI . EC,DBAR\N,BAR %CALL S.LD11 
#BIT15,RI 1 ,BUF %CMSB D.TIML 



ASSUME R.RESP.EO, 



000007 
0000 1 1 



000020 
0000 14 



007035 

003200 



007000 
000020 

010014 

010014 
OOOOOO 
000040 
010002 
01 701O 
0030 12 
000O06 
1000O 
1001 1 

OOOOOO 
OOOOOO 



; »«* RECEIVE SDI LEVEL TWO RESPONSE «»* 

R.RESP:;MOV 0INPUT.R13 %JMP R . RESP 

131273 MOV #INPLEN,R14 '/.CALL LEV1RD 

101704 R.RSPA: TST RI1 7.JMP O.ECKR 



EXECUTED IN JUMP TABLE 
IV051 R11 : HOST TIMEOUT 
[V05] RESET HOST TIMER 
RllsECC THRESHOLD WORD 

IF TIMEOUT NOT SET THEN GO SET LONG TIMEOUT 
ELSE FALL INTO R.RESP ROUTINE 



EXECUTED IN JUMP TABLE 

R14:RESP0NSE BUFR LENGTH/GO GET RESPONSE 

GO CHK FDR RECEIVE ERRORS 



1 3201 1 
010000 



133603 

101341 



133603 
OOOOOO 

111515 

142037 
1 1 1771 
OOOOOO 
027777 
001526 
10000 
12 1347 
062016 
011714 

132035 
1021 10 



SEND SDI RUN COMMAND ««« 
;BIC #<0RV . ATIORV . AV> , R17.BUF %JMP S.RUNN ; I 1 6K ] EXECUTED IN JUMP TA6LE 

MOV #DRAVL,R13 7.CALL D.CLRS ; R13:BIT TO CLR/GO CLR SOI STATUS BIT 

MOV «RUNN,R12 ; R12:SDI RUN COMMANO/DECR NSEEKS 

SEND LONG RESPONSE COMMAND - R12 HAS OP CODE «** 

ADD #SOI . EC,08AR\N,BAR XCALL S.LD11 ; RllsLONG TIMEOUT FLAG WORD 

BIS #8IT15,R1 1 .BUF 7.JMP LEV2.1 ; SET LONG TIMEOUT FLAG/SEND COMMAND 



IN JUMP TABLE 
STATUS 

ONLINE ;|E125] 

CK OTHER CONDITIONS ;|E125] 

E TRUELV ONLINEINOT OFFLINE OR DUPLICATE) 

00 ONLINE COMMAND ;|E1251 

DIE (REPORT ERR0R1 ;[E1261 

LOG PENDING ; [El 25] 

URN, ELSE IF SPECIAL SEEK ;IE121! 

GRP SEL; BAR -> SEEK CMD ; [ E 1 2 1 ] 

COMMAND IN HI BYTE ;[E121] 

LEN/OUTPUT SEEK CMD ; [ E 1 2 1 ] 
[EC0#21 ELSE DECR # OF SEEKS CNTR 

[U52EC11IF NOT SENT THEN GO CHK FOR ERRORS 
VERLAPPING **• 

ELSE OK a STEP TO RECEIVE VECTOR ;[ E 1 2 1 ] 



SENO 


SDI SEEK COMMAND «** 






FtRST 


CHECK IF UNIT ONLINE *** 






MOV 


DBAR.R16 %JMP 


S .SEEK 


; EXECUTED 


ADD 


#SDI .ST.DBARNN.BAR %CALL S.LD11 


; R1 1 :SDI 


BIT 


#DRAVL , Rt 1 




; IF DRIVE 


BIT 


#<ORVOL !0RDUP>,R1 1 %JZRO 10$ 


; THEN CHE 








; /IF DRI V 


COM\T 


#<V.SEEK-V.SK0N-1>,R11 


7.JZR0 D. 


[NSVi THEN 


NOP 


%JMP 


D.SDIG 


; ELSE GO 


BIT 


#SLAT,R1 1 




; IF ERROR 


BIT 


#GSEL.R11 %RNZRO 




; THEN RET 


ADO 


#SOI . IT, R16.BAR %JNZRO 


SEEKGS 


; THEN D 


MOV 


#<INSEEK<256. >, BUF 




; PUT SEEK 


MOV 


#SEEKL,R17 %CALL 


LEV2. T 


; R17=CMD 


NOP\T 


%CNZRO 


D.DNSK 


; [U52EC2] 


TST 


R11 %JNZRO 


D.ECKS 


; [U52EC2I 


SEND 


SUCCEEDED - FORCE D.VECT BACK TO D 


. IDLE FOR 


NOP 


"'.CALL 


D. INSI 


; [EC0#2] 


NOP 


%JMP 


D.TIMR 


; RESET TI 


Code 


to issue group select when appropr 


iate instea 


THIS 


code terminates vector processing 


i mmed i at e 1y 


. READ or D.WRIT will wait for 


R/W Read 


V to come u 



MER AND RETURN 

d of a seek 

The I/O rout i nes 
p, as group selects 



IE121 J 
1E121 J 
IE121 ] 
[E121 1 
[E121 1 
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are fast and the extra latency of using C.SEEK hurts spiralling 
per f ormance . 

get current group number 

Always downcount NSEEKS 

Send group sel to drive 

If not sent, check for errors 

set count to avoid infinite wa 



001528 


010555 


007O13 


OOOOOO 


SEEKGS: 


AOD 


#SDI . GP , OBAR\N 


BAR 




001 527 


033712 


0OOOO3 


122016 




MOV 


(BUF) ,R12 


•/.CALL 


D .DUSK 


001 530 


133552 


00O2 1 6 


131212 




BIS 


fSGRPCO, R12 


XCALL 


LEVOWR 


001 53 1 


013451 


1001 1 


011714 




TST 


R1 1 


7.JNZR0 


D.ECKS 


001532 


133751 


00OOO2 


OIOOOO 




MOV 


#1000,R1 1 






001533 










ASSUME 


RWRDV.EO, SIT 1 5 






001533 


013711 


010002 


101 67S 


10$ : 


MOV 


(RTDS ) ,R1 1\N 


XJZRO 


CSEEKA 


001534 


031451 


03001 1 


101533 




OEC 


R1 1 


•/.jMse 


10$ 


001S35 


013440 


OOOOOO 


1 1 1675 




NOP 




7.JMP 


CSEEKA 










.' * ** 


RECEIVE 


SEEK RESPONSE **« 












R.SEEK: 


; MOV 


#INPUT,R13 


%JMP 


R.SEEK 


001536 


033754 


000007 


131273 




MOV 


*INPLEN,R14 


7.CALL 


LEV1R0 


001537 


013440 


OOOOOO 


1 22016 




NOP 




7.CALL 


D.DNSK 


OOI 540 


013451 


00OO1 1 


101704 




TST 
. PACE 


R1 1 


%JMP 


D.ECKR 



Wait for R/W Ready to drop 

so we don't start I/O too soon! 

declare the seek complete 



EXECUTED IN JUMP TABLE 
R14=RESP0NSE BUFFER LENGTH 
[1SK1DECR 'NSEEKS' 
[U52EC1 ] [ 1 EK1TEST RESPONSE STATUS 



t E 121 ] 

IE 121 1 
[E121 1 
IE121 1 
I E 121 ] 
IE121 ] 
IE121 ] 
(E121 1 
(E121 ] 
IE121 1 
[E121 ] 
[E121 1 



1 
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ROUTINE NAMES: 

C.XXXX (CHECK FOR CERTAIN CONDITION(S) TO EXIST] 

FUNCTIONAL DESCRIPTION: 

THESE ROUTINES WILL CHECK TO SEE IF CERTAIN CONDITIONS EXIST, 
I.E., DUPLICATE UNIT NUMBERS, CHECK IF AVAILABLE CAN BE PERFORMED, ETC. 



OBAR 
Rl 1 
Rl 2 
R13 
Rl B 
R17 
BAR 
DPF 



POINTER TO SDI CONTROL BLOCK 

SDI .PO 

SDI .St 

SDI CP 

SDI SZ 

S D I . CW 

- > S D I . CW 

RESET 



OUTPUTS: 

ROUTINE OEPENDENT 



[U 
* * * 
C. AVAL 



52EC2] REMO 
CHECK 
: ; BIS 
ADD 
MOV 
BIS 
NOW CHE 

XOR 

MOV 

ADO 

SAME SO 

BIT 

TST 

CHECK F 

ASSUME 

BIS\T 

ADO 

ASSUME 

MOV\T 

MOV 

XOR 



VED 
F MS 
*DR 

#P 
SUN 
SUN 
CK F 
AOO 
(BU 

#sc 

»S0 
I PO 

#DR 

R14 
OR S 

MD 

#SC 

#so 

ST 

R13 

#XC 

ADO 

R12 



FOR 

CP AV 
AV , 

MOD.R 
BUFS 
BUFS 

OR FO 

F I , OB 
.SCN, 
I CW, 
INTER 
V . AV 

PIN I 
SPO.E 
.SDI , 
I SW, 
SUC, E 
, BUF 
MP, R1 

,R1 1 



ETTE 
AILA 
R17 
1 1 \N 



BLE 
BUF 
, BAR 



R HANDLING «»* 
MMAND CAN BE DONE 
MP . INS1 
CALL S . LD14 



LOBVT, R12 



HIBV 
R SI 
#SDI 
AR\N 
R13 
R12\ 
- C 
R1 1 

OWN 
0. B 
R13 
OBARN 
0, O 

2 
#SOI . 



T.R12 
STER 



N, BAF 
HECK 



iUBUNIT'S STILL 
!2\N,BAR 7.JZR0 t 

IN2R0 CAVALB 
%CALL S.LD11 
IF ONLINE *** 
I2R0 CAVALB 
INZRO CAVALB 



MODIFIER **« 
TOO 



LSB 
7.CALL S.LDI2 

2R0 

MP D.OONE 

%CALL 
MP CAVALA 



( US2EC2 ] EXECUTED IN JUMP TABLE 

R14=M0DIFIERS FIELD 

I 1 6K]R12:START OF SUBUNIT CHAR BLKS 

[ 1 6K1 CONSTRUCT UN. BUF IN Rt2 
ONLINE *** 
.INS1 ; IF OONE THEN EXIT/ELSE BARsUNIT'S PARENT 

IF NOT THE SAME AS REQUEST 

THEN SKIP/R13:STILL CONNECTED COOE 

Rl 1 »' CONTROL WORD 

IF NOT ACTIVE THEN CONTINUE 
IF AVAILABLE THEN CONTINUE 

IF SPIN DOWN REQUESTED 

THEN SET SPIN DOWN IGNORED 
GET CODE IN STATE WORD 
MAKE SURE SUCCESSsO 
IF EO THEN SET SUBCODE IN 
GO FINISH THIS CHAIN 
■SD11 I UPOATE R12 TO NEXT SUBUNIT BLK 
CHECK AGAINST END AND LOOP 



PROCESS NEW UNIT GET STATUS RESPONSE ANO CHECK FOR DUPLICATES **« 



001541 

001542 



133557 

034456 



000003 
00001 S 



010000 
000000 



001543 010555 007043 



;M0V #SOI .44L08YT.R17 7.JMP 
BIS #SDI 45HIBVT , R17 
CLR R18 
NOW LET'S CHECK FOR DUPLICATES ! *** 

DBAR POINTS TO THIS UNIT'S SDI BLOCK. R17 POINTS TO OTHERS SOI BLOCK *** 
ADD *SDI .UN,DBAR\N, BAR %CALL S.L0I2 ; GET THIS UNIT'S SUBUNIT/UNIT WORD IN R12 



EXECUTED IN JUMP TABLE 
R17:LAST SDI CONTROL BLK ADDR 
R16=0,PLAG FOR UNIT NUMBER DEACTIVATION 
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001S44 
001545 



1 14552 
013460 



000014 10000 
0104O0 051566 



O01546 010557 007043 



001547 
001550 
001551 
0015S2 
OOI 553 
001554 
001555 
001558 
001557 
001560 

001 56 1 
001562 
001563 
001564 
001565 

001566 
00 15 67 
OO1570 

001 57 1 
OOI 572 
001573 
00 1574 

001 575 

001 576 



OOI 577 
00 1 600 
001 601 
001802 

001 603 

001 604 

001 605 
001 60 6 

OOI S07 
001 607 



03 6 153 
135553 
016157 
133754 
010557 
015514 
033714 
1 14554 
033178 
1 14S54 
133574 
133544 
013440 
036151 
131557 

133752 
035152 
135571 
133571 
135571 
013440 
010555 
013456 
135572 



010555 
010555 

1 14551 
014552 
1 14551 
I 14556 
033714 
014554 



0000 12 
000374 
010015 
010034 
007000 
000003 
010403 
000030 
010017 
000004 
013005 
000200 
000000 
0000 17 
010120 

000034 
00001 1 
1002 4 
060014 
O60020 
0O301 1 
007043 
00001 6 
013374 



007044 
007045 
0000 10 
O102OO 
0100O4 
10010 
0100O2 
OOO1O0 



000000 
000000 
011563 
101563 
133567 
000000 
141562 
010000 
151560 
000000 
151562 
10000 
1 23600 
010000 
01 1543 

133572 
10000 
14 15 71 
151572 
151573 
133570 
133604 
OOOOOO 
051577 



123604 
133610 
OOOOOO 
lOI 660 
001 624 
O 1 1 627 
01 2074 
010000 



CDUPLC 
CDUPLD 



033751 010004 



BIT 

N0P\ 

AND 

ADD 

FOLL 

SUB 

AOD 

BIC 

BIC 

ADD 

AND 



XOR 

BIC 

XOR 

MOV 

AOD 

BIC 

M0V\ 

BIT 

BIS\ 

BIT 

BIS\ 

BIS 

NOP 

XOR 

SUB 

DONE 

MOV 

BIC 

BIC\ 

BIS\ 

BIC\ 

MOV 

ADD 

TST 

BIC\ 

CHEC 

ADD 

ADD 

BIT 

BIT 

BIT 

BIT 

MOV 

8IT 

ALRE 

ASSU 

MOV 



#<BIT10!BIT11>,R12 
T (PSOPF %JN2R0 

*0RV.SU,R12 '/.CALL 

#SDI . UN , Rl 7\N, BAR %CALL 
OWING REMOVED FOR MULTI-UNI' 

R13, Rl 1 

#4,R11 %JZRO 

#DRV . UM, Rl 1 

#7,R1 1\N 



CDUPL 

S . LD 1 

S . LD1 

REMO 



#12 . ,R1 1 
#DRV .SU, R13 



%JNZRO 

•'.CALL 



CDUPLD 
S . R T L 



2.RI3 
RV .UM, R 
AR ,R17\ 
DRVOLIO 
D I . S T , R 
UF) , R14 
UF! , R14 
ORAVL ! D 
7.R16 
ROUP , Rl 
OATT !DR 
LOCK, RL 

7.R1 1 
DIB. L , R 
DUPLICA 
ORAVL ! D 
1 , R12 
DRAVL ! D 
DRVOL ! D 
RAVL , Rl 
1 , BUF 
DI .UN, D 
6 
RV UM, R 



13 

N 7.JNZR0 
RAVL IDRDUP> , Rl 
17\N,8AR %CALL 
\N 

IPSDPF %JZR0 
RVQL > , R14 

STZRO 

DUP> .R14.BUF % 

7.CALL 

XJNIRO 
TE CHECK »*'* 
RVOL J 0R0UP> , Ri: 

RDUP>,R11 %TZRl 
RDUP>,R11 XTD.P1 
%TOPF 
''.CALL 
BARVN.BAR 7.CALI 

12, BUF 14TNZR0 



CDUPL 

4 %JZR 

P. LOC 



3 

VAL [US 
GE 
IF 
IS 
CH 
UN 
BR 
CH 
RO 
TH 
SO 
SU 
[U 
[U 
[U 
CDUPL 
GE 
FI 
IF 
IF 



TZRO 

S .SDI 1 
COUPLA 



UNLOCK 
S. LD1 



UNIT 
THEN 
52EC3 
T OTH 
2EC31 
T OIF 

ZERO 
OLATE 
ECK F 
BIASE 

IF 
ANGE 
TATE 
IS AL 

THAT 
BUNIT 
52EC3 
52EC3 
52EC3 

D ; I 

T OTH 

RST C 

UNKN 

HE'S 

THEN 

HE 'S 
T ON 
LEASE 
1 =SDI 



TOO BIG 
TREAT AS DUPLICATE 
]R12:SUBUNIT MASK, RllsUNIT # 
ER UNIT'S SUBUNIT/UNIT WORD IN R13 



FERENCE BETWWEN 
THEN MATCH/ELSE 
UNIT NUMBER FIE 
OR BIASED DIFFER 
D DIFFERENCE IS 
NIT NUMBERS GROS 
DIFF BIAS TO 16 
OTHER MASK By BI 
IGNS THE BITS OF 
BITS CORRESPOND 
NUMBER ARE IN T 
1CHECK FOR DUPLI 
1CLEAR OFF NON-U 
IIF NONE, FORGET 
F SAME, WE WASTE 
ER SDI 'S STATUS 
HECK IF HE IS UN 
OWN THEN IGNORE 

ONLINE 
MAKE R16 NONZERO 
AVAILABLE SEE I 
HIS CASE WHEN WE 
THE MUTEX VARIA 
1 



THE UNIT NUMBERS 
BIAS DIFFERENCE BY 4 

LO OF Rl 1 

ENCE < 4, MEANING 

IN THE RANGE [ -4.+31 

SLY DIFFERENT, 

(TO RANGE [12,19 1) 

ASED DIFFERENCE VALUE 
THE TWO UNIT MASKS 

ING TO THE SAME 

HE SAME BIT POSITION. 

CATES 

NIT BITS 
IT / CHECK FDR SAME SDI 

D OUR TIME/GET ONLINE MASK 

KNOWN (BITS = 11) 
HIM 



SEE IF WE HAVE OONE ALL 
LOOP UNTIL WE HAVE . . . . 



F WE SHOULD 

GET AROUND TO IT 
BLE 

OF THE SOI CTL BLKS 



DRIVE STATUS FOR AV A I L ABLE PRE VE 
#SOI SI , DBAR\N, BAR '/.CALL S.LD12 
#SDI .S2, DBAR\N,BAR %CALL S.LD16 
#ORVOL , Rl 1 

#DRV.0A,R12 %JZRO C . SUBC 
#0RDUP,R11 7.JNZR0 C.AONL 
#0RV.C1,R16 '/.JNZRO C.DUPX 
(RTDS),RI4 %JNZRO . ZATT 
#AVAIL , R14 
ADY ONLINE TO ME - MUST DISCONNECT *• 
V . DCON , EQ, V . STAT* 1 
#<V . GCHR-V .STAT> , Rl 1 %JZRO D.INS1 



GMST ; R11=MUTEXED SDI STATUS 
IF ALL BITS SET 

THEN MARK OFFLINE 
IF DUPLICATE THEN MARK 

OFFLINE 8 DUPLICATE 
RESET STATUS/FREE U.PROC 
R12=UNIT NUMBER OF THIS DRIVE 
IF R16 NEO O (DEACTIVATE THIS UNIT NUMBER) 

THEN DEACTIVATE UNIT NUMBER 
BECAUSE DUPLICATE IS ONLINE 
NTING CONDITIONS «** 



R12:0RIVE STATUS WORD 1 
R16:DRIVE STATUS WORD 2 
IF DRIVE AVAILABLE 

THEN CHK FOR ATTN'S/IF DRIVE ALREADY ONLINE 

THEN SEND ATTN/IP DRIVE DUPLICATE 

THEN SENO ATTN/IF DRIVE SICK 

THEN EXIT/ELSE R14=0RIVE STATE 
IF DRIVE ONLINE TO ME 



THEN DISCONNECT 
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001 6 10 
00 1 6 1 1 
001 8 12 



001 613 

001 614 
00 1 615 

001 616 

001 617 
OOI 6 20 
00 1 62 1 
001 622 
00 1 623 



001624 
OOI 625 
001626 



001627 
001630 



001630 
001631 
001632 
001632 



001633 
0O1E34 
001 634 
001634 

001 634 

00 1 635 

001 636 

001 637 

001 640 

001 64 1 
001 E42 

001 643 

001 644 

001 645 



0105S5 
010555 
135554 



010555 
030553 
014553 
033753 
133553 
01 0555 
033452 
133552 
033752 



033752 
013440 
033752 



007043 
007001 

003354 



0O7O22 
007007 
01OOO2 
010002 
000002 
007007 
007012 
003100 
000 100 



010101 
000000 
000102 



1 23606 
000000 
1 12037 



I33SOS 
I33S05 
I 12036 
152036 
10000 
I33S04 
133604 
13201 1 
102022 



01 1 630 
122064 
1 1 1 630 



, 2901 ASSEMBLER VERSION 32 PAGE 154 

DRIVE POTENTIALLY AVAILABLE »»• 

ADD #SDI . UN, OBARXN , BAR %CALL S.LD14 ; R14:UNIT NUMBER 

ADD #SDI .SL , OBARXN , BAR ; BARiPTR TO SDI.SL 

BIC #<ORV . UM-DRV . U1 >,R14, BUF 7.JMP D.INSV ; SAVE 10 BITS OP UNIT NUMBER IN SDI.SL 



CHECK IGNORE MEDIA FORMAT FLAG 



ADD 
ADD 



BIS 
ADO 
MOV 
BIS 
MOV 



#SOI . PO,OBAR\N,BAR 5CJLI S.LD13 
#P .M00.R13, BAR %CALL S.LD13 
*MD.IMF,R13 7.JZR0 D.INS1 
#SEEK,R13 %JZRO O.INSI 

*GSEL , R13 

#S 01. DB, OBARXN, BAR 7.CALLS.L012 
R12,R12,BAR 7.CALL S.LD12 
#BFULL,R12, BUF '/.CALL D.CLRS 
#BFSV,R12 %JMP D.DONE 



ACCESS PATH PROCESS: 

MOV »0P 0UP.R12 

NOP 

MOV #0P.ACP,R12 



NG 



*** 
7.JNZR0 
"/.CALL 
%JMP 



.ATTN 
. OFFL 
.ATTN 



[V051 R13 -> MSCP PACKET 

IV05I R13 -> MODIFIER FIELD/STORE MOD FIELD IN R1 

[V05] IF ZERO. NEXT STEP/CHECK BIT 

IV051 IF CLEAR, INC TO NEXT STEP 

clear special seek flag too ;[E121] 

[VOS] R12 -> BUF CNTR BLK 

[V05] R12 = (BUF CNTR BLK) 

[V05] SET BUFFER FULL/CLEAR SEEK BIT IN STATUS 

[VOS] GO TO DONE/SET BFSV 



IF DUPLICATE THEN R12=0UPL OP CODE/CONTINUE 

ELSE MARK DRIVE OFFLINE 
AND R12=ACCESS PATH OP CODE 



o 



033752 00O101 010000 



133753 
01OSS5 



000040 
007O10 



122013 

133615 



; * * * 
C.OUPX: 



; ** * 

C.ATTN: 



DUPLICATE UNIT NUMBER PROCESSING 
MOV #0P.0UP,R12 
ASSUME C . ATTN.EO, . 



IV05] 
MAKE SURE 



C.ATTN IS NEXT 



013440 000000 



SET SLAT FOR ATTENTION 
MOV #SLAT,R13 XCALL 

ADD #SDI . IT, OBARXN, BAR "'.CALL 
ASSUME <V.OCON-V STAT> , EO , 1 
NOP 7.JMP 



PROC WILL CLEAR IF NOT ENABLED »** 



.SSET 

S .ST 1 2 



GO SET SLAT 

SAVE OP CODE IN ATTN OP CODE AREA 

MAKE SURE O.INSI IS VALID 

INCR TO NEXT STEP 



010555 007022 133603 CLOGS: ADO 



OBAR = SOI CONTROL BLOCK POINTER, R13 > LOG FORMAT, R16 < MSCP STATUS, R17 --> BUFFER *** 



#SOI . PO, OBARXN, BAR "/.CALL S.LD11 



[ U52EC2] [EC0#21R1 I >MSCP PKT POINTER 



033751 
033751 
013740 
014511 
133553 
013440 
1 14551 
133551 
133544 
03345 1 



040100 
000020 
007 170 
000003 
01O100 
OOOOOO 
0OO040 
013040 
000200 
000013 



0O1646 033714 000003 



001 647 

001 650 

001 65 1 



135551 
133551 

010555 



000 1 10 
003020 
007012 



001 636 
OOOOOO 
01O0OO 
10000 
1 27777 
123572 
OOOOOO 
OS3570 
010000 
1 1 2043 



10OOO 
133570 
123625 



ASSUME 


<PKT020SBIT00> 


EO, 




ASSUME 


<<SOI . 1 !SOI . 21 


SDI . 3ISDI 


4XBIT 


ASSUME 


<SDI . AT*BITOO> 


, EO.O 




MOV 


#CF .MSC, R1 1 


%JLSB 


C. LOGA 


MOV 


#CF . THS, R1 1 






MOV 


OCNTFLG.BAR 






BIT 


(BUF) , R1 1 






BIS 


#LF . CON, R13 


%R2R0 




NOP 




%CALL 


D.GMST 


BIT 


#SLAT,R1 1 






BISXF 


#SLAT, R1 1 , BUF 


7. JNZRO 


UNLOCK 


BIS 


#PLOCK, RLL 






MOV 


R13.R1 1 


%JMP 


. LOGF 


CHECK 


IF SUBUNIT PRESENT ROUTINE *«* 


ADD 


*SDI .UN, OBARXN 


, BAR %JMP 


C .SUBU 


MOV 


(BUF) ,R14 


SCALL 


. GMST 



BIC 
BIS 
ADD 



#<ERRIP ! DRVOL> , R1 1 

*ORAVL, R1 1 , BUF %CALL UNLOCK 

#SOI ,CH, OBARXN, BAR 7.CALL INITM1 



[16KIMAKE SURE CHeCK IS VALI 
4>4BITOO>,NE,0; [16K1DITT0 
[ 1 SK10ITT0 
(U52EC3IIF INTERNAL PKT THEN CHECK MISC FLAG 

ELSE CHECK THIS HOST FLAG 
BARsPTR TO CONTROLLER FLAGS 
IF LOG NOT ENABLED 

THEN RETURN 

ELSE R11=MUTEXED SOI STATUS 
IF LOG PENDING 

THEN DROP THIS ONE/FREE U.PROC 
(EC0#41 1EC0#2]FREE U.PROC 
[EC0#1SAVE LOG STATUS AND LOG FORMAT 



EXECUTED IN JUMP TABLE 
R11:MUTEXED SDI STATUS 
R12SSTATUS SUBUNIT/UNIT WORD 
CLEAR DRIVE OFFLINE 
MARK DRIVE AVAIL/FREE U.PROC 
SET HI CYL SO SEEK WILL OCCUR 



KDB5O.MICR0C00E..22-APR-198S 11:27:16. 96 
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001652 
001653 
001 654 
001655 
00 165 6 
001657 

001660 
001661 
001662 
001662 
001663 



134557 
010555 
174553 
054153 
130172 
131751 

01O555 
010555 

1 14556 
033752 



00036O 
007001 
00O1 60 
00001 4 
010013 
1 OO03 

007045 
O07044 

040360 
010100 



001664 013440 OOOOOO 



001665 014557 000003 
001666 

001666 034577 010001 



001667 010555 

001670 014556 

001671 033571 

001 672 
001672 033751 



007026 
OOO20O 
O13004 



122023 
123605 
123604 
010000 
063615 
002037 

133610 
133603 

1 12036 
0O2O36 



OOOOOO 

05141 1 

123603 
OOOOOO 
051 672 



* * * 
SUBC 



; *** 
C OCON 



AND 

ADD 

ANDXL 

ANDXR 

ADOCXT 

NEG 

DONE - 

ADD 

ADD 

ASSUME 

BIT 

MOV 

NOP 



#DRV.SU,R17 54CALL O.GUNF ; 

#S0I .SL, OBARXN, BAR 7.CALL S.L013 ; 

*<ORV .SU-ORV .U4> ,R13 %CALL S.L012 

R14.R13 

R13, R12 %CNZRO S .ST12 ; 

#<V . GCR2-V. GCR1 > ,R1 1 7.JNZR0 D.INSV 



SET SLAT FOR AVAILABLE ATTENTION 
#SDI . S2 , DBARXN , BAR %CALL S.LD16 
#SDI .SI ,DSARXN,BAR %CALL S.LD11 
DRV . RU , EO, BITOO 

#DRV.SN.R1S 7.JNLSB D . I NS 1 

OOP. AVA.R12 7.JNZR0 D . I NS 1 

7.JMP C.ATTN 



R17:SUBUNIT MASK/GO SET UNIT FLAGS 
R13=SUBUNIT MASK/UNIT NUMBER 

R13:MASK/R12:UNIT NUMBER 
CHECK IF UNIT PRESENT 

SET IN NEXT SUBUNIT CODE, INCREMENTING UNIT 
ADJUST STATE VECTOR OFFSET TO LOOP 



MESSAGE *** 

R16:2ND WORD DRIVE STATUS 
KlliUT WORD DRIVE STATUS 
MAKE SURE DRV . RU IS LSB 
IF NOT SPINNING THEN EXIT 
IF S SIT SET THEN NO ATTN MSG 
ELSE GO 00 ATTENTION MSG 



1 12037 D . INS2 



CHECK FOR NEED TO SEND DISCONNECT COMMAND 
;COM R12.R17 7.JMP C . OCON 

BIT #<DRV . PS10RV ,RU>.R17 
ASSUME DRV . RU.EQ.OCN.ST 

ANDXT #0RV.RU,R17 7.JNZR0 S.DCN3 
CHECK GET STATUS RESPONSE FOR DRIVE ERROR 
ADD #SDI . ES, DBARXN, BAR %CALL S.LD11 
BIT #DRV.DE,R16 
BISXT KFSEEK, R1 1 , BUF 7.TNZR0 
ASSUME . INS2.E0, . 
MOV #2,RI1 %JMP D.INSV 



001673 033711 1 40002 111715 

001 674 

001674 013440 030000 011715 



SEEK COMPLETE CHECK «*« 
;MOV #2,R13 
MOV (RTDS) , R1 1 
ASSUME RWRDV.EO, BIT15 

NOP 



%JMP 
7.J0SER 



.SEEK 
. ERCK 



7.JNMSB . ERCK 



001675 


010555 


007020 


123603 CSEEKA: ADD 


001676 








ASSUME 


OOI 676 


1 14551 


033077 


1 12005 


AND 


001677 


033752 


O0O0O1 


OOOOOO 


MOV 


OOI 700 


0105S5 


007022 


133603 


ADO 


001701 








ASSUME 


001701 








ASSUME 


001701 








ASSUME 


001701 


010555 


047020 


033623 


ADD 


OO1702 


033753 


O0O042 


OOOOOO 


MOV 


001703 


133553 


000002 


102015 


BIS 



SEEK OPERATION COMPLETE *** 

#SDI .EO, OBARXN, BAR %CALL S . LD 1 1 

ERRINP, E0.BIT15 

#<I0RTY+LV2CNT> , R1 1XN.BUF %JMSB 

#PKIP,R12 

#SOI . PO, DBARXN, BAR %CALL S.LD11 

<PKT020S BITOO) , EO.O 

<<SDI.1!SDI.2!SDI.3!SDI.4>aBIT00> 

<SDI ,AT«BITOO> , EO.O 1 

#S0I .EO, DBARXN, BAR %CLSB S.CLRB ; 

#<SEEK!SUSP> ,R13 

#GSEL,R13 %JMP D.DONZ ; 



(ATTENTION) **» 

EXECUTEO IN JUMP TABLE 

IF PORT/RUN-STOP SWITCH OUT 

MAKE SURE BITS COMPATIBLE 

THEN DISCONNECT 
*** 

RllsEXTENDED STATUS 
IF DRIVE ERROR SET 

THEN FORCE SEEK NEXT I/O 
MAKE SURE 0.INS2 IS NEXT 
R11=2 (INCREMENT VALUE) 



EXECUTED IN JUMP TABLE 

IF ERROR THEN RECOVER/ELSE R11=DRIVE STATUS 

MAKE SURE RWRDV IS MSB 

[U52EC21IF NO R/W ROV THEN CHK TIMEOUT 

(U52EC21 ELSE SEEK OPERATION COMPLETE 

RllrLEVEL O ERROR STATE 

MAKE SURE ERRINP IS MSB 

INSO ; [EC0#21IF ACTIVE THEN CONTINUE (ADD O TO S 

[U52EC2]R12=BIT TO SET 

[U52EC21R1 1 =PKT PTR 

IUS2EC2JMAKE SURE CHECK IS VALID 

NE,0; [U52EC21DITTD 

[ US2EC2 ] DITTO 

IU52EC21IF ATTN THEN CLR SDI.EO 



'ATE VEC 



R13=BITS TO CLEAR, INCLUDING GSEL 



: (E121 ] 

: [E121 I 



c 
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SOI LEVEL 
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ROUTINE NAMES: 

D.ECKR (ERROR CHECK POR RECEIVE SDI LEVEL TWO RESPONSE) 

DECKS (ERROR CHECK POR SEND SDI LEVEL TWO COMMAND) 

O.ERRO (LEVEL ERROR RECOVERY PROCESS) 

FUNCTIONAL DESCRIPTION: 

THESE ROUTINES PERFORM ERROR RECOVERY AS SPECIFIED IN THE SOI 
SPECIFICATION, INCLUDING SEND AND RECEIVE ERROR RETRY AND RECOVERY. 



ROUTINE DEPENDENT 



OUTPUTS: 

ROUTINE OEPENDENT 



OO1704 
00170S 
O017O5 

001706 
001707 
001707 
001710 
00171 1 
0017 12 
001713 



013451 

033753 

01371 1 

01 3440 
033751 
01 6552 
033751 
033753 



1001 1 

040001 

1 10002 

040000 
000001 
000176 
010040 
000001 



101711 

101723 

011715 

1 1 171S 
101723 
010000 
142036 
1 1 1723 



001714 034453 010013 112036 



001715 
00171 6 
001717 
001720 

001721 
001722 

001723 
001724 
001724 



001728 
001727 

001730 
001 731 
001732 
001733 

KDBDP 



010555 
030552 
036552 
033772 

010555 
033751 

010555 

130552 

133552 

010555 
131 154 

035552 
033552 

013451 



007022 
00700S 

1 1 00 1 3 
015001 

007004 
1 000 1 

007020 

030377 

000200 

007021 
0000 13 

000377 
000254 

00001 1 



123604 
133612 
10172 1 
051766 

133604 
027777 

133604 

101730 

000000 

133606 
123617 

000000 
000000 
000000 



*** 
D . ECKR: 



D . ECRA: 
D . ECRB : 



D . 6CKS : 
D . ERCK: 



CHEC 

TST 

ASSU 

MOV 

RECE 

MOV 

ASSU 

NOP 

MOV 

XOR 

MOV\ 

MOV 

CHEC 

CLR 

CHEC 

ADD 

ADD 

XOR 

MOV\ 

CHEC 

ADD 

MOV 

SD I 

ADD 

ASSU 

ADDC 

TURN 

BIS 

BACK 

ADD 

SUB 

SELE 

BIC 

BIS 

TST 

ASSU 



FOR SDI REC 
R1 1 

E DCERR.EO, 

#1 .R13 
VE TIMEOUT - 

(RTDS) ,R1 
E OROY.EQ.B 



CHE 
1\N 
ITOO 



#0 

#c 
#u 
#1 

FOR 

R1 
FOR 

#S 
#P 
#0 

#c 

SDI 

#s 

#D 
TIMER 

#S 

IE ER 

#3 

ON ER 

#E 

UP OR 

#S 

R1 

CT COR 



CERR.R1 
OMPLT.R 
NERR.RI 
, R 1 3 
SDI SEN 
3 

NO ORIV 
01 .PO.O 
OPCD, R 
P. DAP, R 
ONT, R12 
TIMER F 
DI . TM, 
CERR.R1 
EXPIRED 
01 . EO, D 
RINP.EQ 
77 ,R12 
ROR REC 
RRINP , R 
IGINAL 
DI .SV, D 
3, R14 
RECT LE 
OBYT.R 1 
. INIT8L 



ERRORS *»* 
%JZRO I 

•/.JNLSB I 
CK IF DRIVE 
7.JNCSR ( 

7.JNLSB I 
7.JMP I 



ER 

E CL 
BAR\ 
12, B 
12 

, RTC 
OR E 
BAR\ 



1 

8AR\ 
BIT 

OVER 
12 

STAT 
BAR\ 

VEL 



7. J 

7.J 
RORS 

%J 
OCKS 
N.BAR 
AR %C 

7. J 
S 7.J 
XPIRA 
N.BAR 

%R 
HECK 
N.BAR 
IS 

7. J 
Y *** 



ZRO 

* * 

•'.CALL 
ALL S 
CSR D 
N2R0 D 
TION »* 

7.CALL 
NZRO 
IF RECO 

"/.CALL 



E VECTOR BY 
N.BAR MALL 
7.CALL S 
RECOVERY 



OBYT, R12 



DCERR. EO. BITOO 



1EC0#21 (EC0#1 1 IF EO O THEN CONT 
IEC0#1]MAKE SURE DCERR IS LSB 
[EC0#1]IF EO THEN C0NT/R13:1 
HAS RECEIVER READY UP *** 
1.ERCK ; [ EC002 ] [ ECO»l 1 TEST REAL TIME DRIVE STATE 

; MAKE SURE OROY IS LSB 
l.ERCK ; IF DRV OK THEN GO CHK DRV CLKS/TIMER 
l.ECKB ; ELSE SHORT CIRCUIT TIMEOUT 6 INIT DRV 

; CHECK FOR COMPLETED OP CODE 
I.INS1 ; (U52EC21 IU52EC1 ] IF OK THEN INCR STATE VECTOR 
l.ECKB , ELSE GO CHK ERROR STATE VECTOR 

1.INSI ; IF EO O THEN INCR STATE VECTOR 

S.LDI2 ; R12=MSCP PKT PTR 

LL12 : [EC0#2]R12=THIS OP CODE 

ECKA ; IF CLKS THEN CONTINUE 

NCLK , IEC0#2] ELSE IF NOT DET ACC PATHS THEN FATAL ERRO|t 

.LD12 ; R123S0I TIMER VALUE 

; IF NO TIMEOUT THEN RETURN 
VERY IN PROGRESS »** 
S.LDI2 ; R12:ERR0R STATE VECTOR 

IF LEV ERROR IN PROGRESS 

THEN INCR RETRY COUNT/CONTINUE 

; IEC0#21TURN ON ERROR RECOVERY FLAG 
VALUE IN R13 *** 
S.LD14 ; R14iSTATE VECTOR 

ST14 ; BACK UP CORRECT AMOUNT (R13) AND RESET STATE VECT 
ECTOR «'•• 

ZAP ERROR RECOVERY VECTOR 

SET IN ERROR RECOVERY VECTOR * INIT 

TEST ERROR CODE 

INSURE LSB CHECK 



K0B50. MICROCODE . 
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c 
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SDI LEVEL 
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001733 
001734 

001 735 
001736 

001737 
001 740 
OOI 74 1 
001742 

001 743 

001 744 

001 745 

001746 
001747 
001747 
001747 
001747 
001750 
0O17S1 
OOI 752 
001753 

001754 
001755 



130472 
133552 

010S5S 
134552 

014551 
033776 
014551 
033776 
033756 

010555 
0337S4 



0400 12 
000 100 

007020 
000003 

00OO40 
010353 
OOOOOI 
01O053 

0001 13 

00702S 
OIOI OO 



141735 
000000 

1 336 1 S 
OOOOOO 

010000 
051744 
10000 
051744 
OOOOOO 

12360S 
01 1 744 



010S5S O07O22 133605 



030553 

033713 
014553 
133772 
033753 

136552 
033751 



047001 
000003 
000O02 
10003 
00OOO3 

000003 

10003 



001753 
OIOOOO 
OOOOOO 
0517S3 
131633 

OIOOOO 
0O2I 12 



; * * * 
D . ECKD : 



DSOIEA 

; ** * 



DSOIEC: 

; * * * 



001756 133753 000024 1 32043 



001757 
001760 
00176 1 
001762 
001763 
001 7S4 
001765 



001766 
001767 
001 770 



010555 
1 14551 
0145 14 
1 3SS73 
033553 
133553 
033752 



030552 

013440 



007000 
000O30 
010002 
010O24 
000102 
000002 
00O244 



1 10002 
030O00 



133603 
OIOOOO 

01 1763 
05 1 763 
132048 
OIOOOO 
1 12015 



101721 
0O1766 



INC\ 

BIS 

RESE 

ADD 

AND 

SOI 

BIT 

MOV\ 

BIT 

MOW 

MOV 

CHEC 

ADD 

MOV 

CHEC 

ADD 

ASSU 

ASSU 

ASSU 

ADD 

MOV 

BIT 

MOV\ 

MOV 

CHEC 

XOR 

MOV 

FATA 

MOV 

BIS 

ADD 

BIT 

BIT 

BIC\ 

BIS 

BIS 

MOV 



'/.JNLSB D.ECKD 



ERRIN 
OR RE 



K FOR ERRO 



#F 
FOR 



#F 
ERRD 



AVAIL 

ERROR 

SDI .P 

PKT02 

<SDI . 

SDI A 

P . VCI 

BUF ) , 

PONER 

SDIRT 

M.SD 

FATA 

DIRT 

M.SD 

R CL 

DRAV 

VCT. 

DI .S 

DRAV 

TOS) 

DRAV 

BFSV 

SEL, 

XCMP 



I , R12 
COVERY WO 

OBARXN 
T, R12 
1 HAS LEV 
,R1 1 

RV + SC .ODE 
,R1 1 

RV+SC.STO 

RV+SC. INV 

LOGS EN 

M.DBARNN, 

R14 

ON AVAIL 

, DBAR\N 
08BIT00> 
1.1 SDI. 2.1$ 
TSBITOO) 
0, R13.BAR 
R13 
,R13 

Y«256 . , R1 
I , R13 

ERROR * 
Y*2S6 . , R1 
I , R1 1 
EANUP PRO 
DRDUP> , 
R13 

T, OBARXN. 
L 1 DRVOL> . 
. R14 

L ! DRDUP> , 
ISEEK>,R1 
R13 

SUSP1DER 



IF NOT TIMEOUT THEN SKIP INIT 
SET INIT DONE BIT 



RD *** 
BAR "'.CALL 



OWR/LEVOR 
>,R16 %JN 



> ,R1 6 7.JN 
> , R1 6 
ABLED *** 
BAR ''.CALL 

•/.JNZRO 
ABLE PHAS 
BAR ".CALL 

EO.O ; 

DI . 3ISDI . 4>8BITOO> 
EO.O 

•/.JLSB 



.ST12 ; SAVE CURRENT RECOVERY STATE 

; ISOLATE RETRY COUNT 
STATUS, R12 HAS RETRY COUNT *** 

; IF R11 EO UNSUCCESSFUL RESPONSE 
ZRO DSDIEA; THEN UNSUCCESSFUL RESPONSE 

; IF SDI TIMEOUT 
ZRO DSDIEA; THEN SET ERROR CO DE/ CO NT I NUE 
, ELSE 5ET INVALID ERROR CODE 



2 7.TNZR0 
'/.CALL 



S.LD13 ; (US2EC11IF PKT BEING OVERLAPPED 
DSDIEA ; ( U52EC2 1 [ U52EC 1 ] THEN WAIT UNTIL OONE/R 1 4 : AVA I L B>T 
E OF FAILED ONL I NE COMMAND **< 
S.LD13 ; 1U52EC31R13=MSCP PKT PTR 

; [U52EC31MAKE SURE CHECK FOR 
NE.O: IU52EC31 INTERNAL PACKET 
[U52EC31IS VALID 

(U52EC31IF INTERNAL PKT THEN SKIP CHK 
[US2EC3 1 R13=P . VCIO 8 FLAGS 

[U52EC31IF AVAIL PART OF FAILED ONLINE CMD 
[U52EC31 THEN ERROR IS FATAL 
IUS2EC31G0 CHECK FOR ERROR LOGS ENABLED 



; IEC0#2) [EC0#1 I IF NEO TO MAX 
D.TIME ; THEN CONTINUE 
* * * 

L D.LOGF ; [ US2EC2 ] [ EC0#2 ] R 1 3 . SD I STATUS BITS TO CLEAR 

D.DNSK ; [U52EC2] 1U52EC1 1 IEC0#2l0ECR NSEEKS 8 ZAP REVECT FL 

L S.LD11 ; [U52EC2IR1 1 =SDI STATUS 

; [U52EC21IF NOT ONLINE 

DSDIEB ; (U52EC21 THEN CONTINUE/IF DRV RTDS=»AVAIL" 

RO ; IU52EC2] THEN MARK OFFLINE 8 UNKNOWN 

O.OFFD , [U52EC21MARK DRIVE OFFLINE 1 CHK FOR DUPLICATE 

; c Tear spec i a 1 seek flag too ; [ E 1 2 1 J 

R>,Rt2 %JMP D.D0N2 ; SET XCMP, DERR i SUSP INTO R 1 2 /TERMI NATE COMMAND 



7.JN2RO 
CESSING 

R13 SCSI 

%CALL 
BAR 7.CAL 
Rl 1 

7.JNZR0 
R13 %TNZ 
3 %CALL 



001770 1337S2 000003 111742 O.SDIF 



NO CLOCKS FINAL FILTER - LAST CHANCE BEFORE DROPPING DRIVE 

WAIT ABOUT 10 MSECS 3EF0RE GIVING UP »'« 

ADD #2,R12 %JCSR D.ECKA 

NOP 7.JNMSB D.NCLK 

ASSUME .SDIF, EO, . 

FATAL SDI ERROR EXIT *** 

MOV #S0IRTY*256 . ,R12 ttJMP O.SDIE 



[EC0#21IF CLKS THEN CONTINUE 
[EC0#2] ELSE IF NEO MSB THEN LOOP 
[EC0#2]MAKE SURE D.SOIF IS NEXT 



001771 
0O1772 



001773 

KDBDP 



01 3440 
01 3440 



OOOOOO 
OOOOOO 



1 2201 6 
101770 



007020 123605 

K0B5O. MICROCODE . , 22-APR- 19 83 



[ ECO#2l[EC0#1 1MARK OFFLINE/FINISH UP 

FATAL ERROR FROM S.SEEK. (E126) 

We must decrement NSEEK before continuing or face a dead lock situation [E1261 

NOP %CALL D.DNSK ; DECREMENT NSEEK IE1261 

NOP 7.JMP O.SDIF ; GO REPORT ERROR [E1261 

LEVEL O AND I/O ERROR RECOVERY ROUTINE *** 
;MOV #<V. ATT2-V. ERRO, R11%JMPD. ERRO; 
ADD »SDI .eo, DBARXN, BAR '/.CALL S.LD13 ; 



EXECUTED IN JUMP TABLE 
[EC0#2]R13=LEVEL O STATE VECTOR 



11:27:16.96 
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SDI LEVEL 
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001774 
001774 
00177B 
001778 
001777 
002000 



00200 1 
002002 
002003 
002004 
002005 



1 1 45S3 
010555 
01 455 1 
1 14551 
014552 



014556 
1 14573 
030553 
010555 
0344S1 



002006 114553 

002007 013440 
002010 033751 



033077 
007000 
000004 
10030 
1OO2O 



010200 
010100 
10003 
007020 

0000 1 1 

10010 
OIOOOO 

000003 



12006 
133603 
OIOOOO 
041770 
12005 



1 12005 
142003 
102005 
13361 6 
1 12037 

I 12037 
002036 
102037 



ASSUME ERRINP.E0.B1T1 
LV2CNT 
DBAR\N 



AND 

ADO 

BIT 

BIT\F 

BIT 



#<IORTY*LV 
•SOI .ST, OB 
•DERR.m 1 
#<0RVOL+0RAVL> 
#ORV .SR.R12 



DRIVE ONLINE - CH 
#DRV. OE,R 
#ERRINI , R 
#<V .ERSK 
•SDI . EO, D 
R1 I 



BIT\T 
ADO 
ADO 
CLR 



V .ERR 
BAR\N 



I/O ERROR RECOVERY PRO 
#IOSEK, R13 



BIT 
NOP 
MOV 
. PAGE 



#<V .ERSK-V . ERR 



> , R1 3\N 

.BAR 7.C 

,R11 7. J 

7.JN2R 

P ERROR 
%J2R0 
%TZRO 

C> ,R13 

, BAR 7.C 

%JMP 
CESSING 

7.JZR0 
7.JN2R 
C> , R1 1 



r BUF %JNMSB 
ALL S . LD1 1 . 



MAKE SURE ERRINP IS MSB 

.EROA ; [EC0»2]CLEAR ALL BUT I/O g SDI RETRY 
R11=SDI STATUS 
IF HARD ERROR 
NZRO D.SDIF; THEN MARK OFFLINE/CLEAN UP 
D.INSO , IEC0#21IF DRV NOT ONLINE THeN DONE 

; IEC0#2]IF SPINDLE NOT AT SPEED THEN DONE 
WAS DRIVE ERROR •** 

D.INSO ; IF NOT DRIVE ERROR (R16 LOADED IN D.VECP) 
; [EC0#21THEN CHECK IF INIT DONE 
7.JZR0 D.INSO ; [EC0*21THEN SKIP PAST RECALIBRATE 
ALL S.ST13 ; [EC0#2]ELSE RESTORE LEVEL O VECTOR 
INSV ; AND DO RE-SEEK 



o 



. INSV i 
. INS 1 

%JMP . INSV; 



[EC0#2]IF ATTN THEN CONNECT TO ATTENTION CHAIN 

IF SEEK RECOVERY THEN DO RECAL 

IF OTHER RECOVERY THEN JUST DO SEEK 
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ROUTINE NAMES: 
D . XXXX 



PERFORM UTILITY FUNCTION FOR VECTOR PROCESSES) 



FUNCTIONAL DESCRIPTION: 

THESE ROUTINES WILL PERFORM UTILITY FUNCTIONS FOR THE VECTOR 
STATE PROCESSES; SUCH AS INCREMENTING STATE VECTORS, OBTAINING BUFFERS 
FROM SUBUNIT CHARACTERISTICS BUFFER POOL, RELEASING BUFFERS TO THAT SAME 
POOL, MARKING A DRIVE OFFLINE, ETC. 



INPUTS: 



0O2O1 1 


013440 


OOOOOO 


T23S72 


D 


CLRS 


00201 2 


035151 


003013 


103570 






00201 3 


013440 


OOOOOO 


123572 


D 


SSET 


002014 


033151 


003013 


103570 


S 


CL 1 1 


OO2015 


034451 


00001 1 


127777 


a 


OONZ 



ROUTINE DEPENDENT 



OUTPUTS: 

ROUTINE DEPENDENT 



ROUTINE TO CLEAR BITS (PASSED IN R13) IN SDI STATUS - MUTEXED *** 

NOP 7.CALL D.GMST ; RMiMUTIXID SOI STATUS 

BIC R13.RI1.BUF 7.JMP UNLOCK ; ZAP DATT/RESET/FREE U.PROC 

ROUTINE TO SET BITS (PASSED IN R13) IN SDI STATUS - MUTEXED »'*» 

NOP 7.CALL D.GMST ; RllsMUTEXEO SDI STATUS 

BIS R13,R11,BUF 7.JMP UNLOCK ; SET BIT IN R13/RELEASE U . PROC/RETURN 



SUBROUTINE TO CLEAR Rll 
R11 %RET 



ZAP R1 1/RETURN 



002016 
O02O17 
002020 
OO202 1 



013740 
033714 
031474 

133544 



007156 133567 

000003 OOOOOO 

010014 OB3617 

0OO2OO 137777 



NUMBER OF SEEKS WORD (NSEEKS) DECREMENT ROUTINE «*» 



MOV 


#NSEEKS ,BAR 


MOV 


(BUF) ,R14 


OEC\T 


R14 


BIS 


#PLOCK,RLL 



002022 034453 0000 13 127777 



OO2023 
002024 
002025 
002026 
002027 
002030 
002031 



002032 
002033 



010555 
034551 
010555 
136556 
014152 
133576 
033156 



010555 
133551 



007067 
0002OO 
OO706O 
0OOO4O 
0000 17 
010040 
0030 1 1 



007001 
0000 14 



123603 
OOOOOO 

1 23S10 
O100O0 

01 0000 
042031 
127777 



1 23603 
OIOOOO 



7.CNZR0 
%RET 



»*» STATE VECTOR COMPLETION ROUTINE «*« 
.DONE:;MOV KKSDI.ST FLAO.R12 %JMP D.DONE ; 
CLR R13 %RET ; 

«*■• GET UNIT FLAGS ROUTINE (R17 = SUBUNIT MASK) 



ADD 

AND 

ADD 

BIC . 

BIT 

BIS\T 

OR 



#SOI ,RT,DBAR\N,BAR %CALL S.LD11 

#UNC RM.R1 1 

• SDI . UF , DBAR\N , BAR 7.CALL S.LD16 

#UF .WPH.R1 6 

R17 , R12 

#UF.WPH,R16 7.TNZR0 

Rl 1 ,R1 6, BUF %RET 



LOCK OUT U.PROC 

R14:NUMBER OF SEEKS TO START 

IF NEO O THEN OECREMENT AND RESET 

UNLOCK U. PROC/RETURN 



EXECUTED IN JUMP TABLE 
ZAP R13/RETURN 



Rl 1 ^REMOVABLE MEDIA FLAG 
ISOLATE FLAG 
[V051 RIBsUNIT FLAGS THIS UNIT 
ZAP H/W WRITE PROTECT FLAG 
IF WRITE PROTECT FOR THIS UNIT 

THEN SET WRITE PROT UNIT FLAG 
OR IN REMOVABLE FLAG/RESET FLAGS/RETURN 



GET SUBUNIT CHARACTERISTICS BUFFER FROM FREE POOL »** 
;MOV #UN.BUF«LOBYT. R12 %JMP D.GSCB ; [ 1 6K 1 EXECUTED IN JUMP TABLE 
EMPTY BUFFER FOUND - SET IN PARAMETERS »«* 

AOD #SDI .SL , DSARXN , BAR %CALL S.LD11 ; R11-SUBUNIT CODE/UNIT NUMBER 
BIS #<DRV . AV«0RV.AT>,R1 1 ; INDICATE DRIVE AVAILABLE AND NEEDING ATTENTI 
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002034 
00203S 
O02O36 



... O02O3 6 

§002037 

IS002040 

' 002040 

OO204 1 

002042 



002043 
002044 



002045 
002046 
002047 
0020SO 
0020S1 
002052 
002053 
0020S4 
002055 
002056 
002057 
002060 
00206 1 
002062 
002063 



002064 
002065 
002O66 
002067 
00207O 



010555 
010555 



033751 
010555 

010575 
030152 
034452 



0105SS 
1 0555 



01055S 
1 17740 
010555 
1 1 455 1 
013440 
033754 
010551 
033712 
1 14552 
1 14552 
135552 
133552. 
133544 
031454 
030SS1 



010555 
133752 
014551 
135572 
033151 



007056 

007057 



00000 1 
007O2O 

037021 
0000 1 1 
00001 2 



007010 
0O7OO3 



0O7O43 
O0336O 
007OOO 
000004 
OIOOOO 
00OOO4 
007000 
000003 
000004 
10020 
010004 
00300 1 
00O200 
OOOO 1 4 
0101 20 



007080 
000034 
000004 
010024 
0O3O1 2 



133614 
133620 



1 12037 
133604 

073604 
123615 
102022 



123614 
103621 



OOOOOO 
OOOOOO 
133803 
OOOOOO 
102064 
123600 
133567 
OOOOOO 
OOOOOO 
10206 1 
042061 
OOOOOO 
010000 
OOOOOO 
002053 



123623 
133572 
O1OO00 
042070 
1 13570 



AOO 
ADO 
ASSUME 



#SDI .CW,DBAR\N, BAR HCALL 
#SDI .SD,DBAR\N, BAR %CALL 
D. INS1 , EO, . 



.ST1 1 
.STDB 



D . INS1 : 
D . INSV : 



INCREMENT STATE VECTOR ROUTINE «** 

MOV ttl,RH %JMP D.INSV ; 

ADO #SDI .EO,DBAR\N, BAR %CALL S.L0I2 ; 

ASSUME ERRINP , EO , B I T 1 5 

ADD\T #SOI .SV, DBAR\N , BAR 7.CNMSB S.L012; 

ADO R11.R12 7.CALL S.ST12 ; 

CLR R12 7.JMP D.DONE ; 



SAVE IN BUFFER CONTROL WORD 

SAVE SDI CNTRL BLK PTR 

*** NOTE - FALL INTO D.INS1 



R11=1 (INCREMENT VALUE) 
R12:LEVEL O ERROR STATE VECTOR 



IF ERROR RECOV NOT ACTIVE THEN R12:STATE VECTOR 
BUMP TO NEXT STATE 
ZAP R12/G0 TO DONE 



CHANGE TO FATAL ERROR LOG, R11:L0G FORMAT , R 1 6 = MSCP STATUS *«* 

ADD #SOI . IT, DBAR\N,BAR 7.CALL S.ST11 ; SAVE ERROR LOG FORMAT 

ADD #SOI .SW, DBARVN, BAR 7.JMP S.ST16 ; SAVE FATAL ERROR STATUS 

ZAP UNIT NUMBER, CHECK FOR DUPLICATES, MARK DRIVE OFFLINE *»» 



AOO 

COM 

AOO 

BIT 

NOP 

MOV 

ADO 

MOV 

BIT 

BIT 

BIC\F 

BIS 

BIS 

DEC 

ADO 



#SDI .UN, DBARVN, 
#170000, BUF 
#SOI .ST, DSAR\N, 
#DRDUP, R 1 1 

#4, R14 

#SOI ,ST, R1 1\N 

(BUF I ,R12 

#DR0UP,R12 

#DRAVL ,R12 

#DRDUP,R12 

#0ATT,R12. BUF 

#PLOCK,RLL 

R14, R1 4 

#SOIB . L,R1 1 



BAR '/.CALL S . LDt 1 



7.JZR0 

7.CALL 

BAR SCALL 



OFPL 
S01 1 

. LOCK 



7.JZR0 
7.JNZR0 



00FFD8 
DOFFDB 



7.JNZR0 DOFFDA 



ZAP UNIT NUMBER to 4095(ras06] 
[raeOS] 
R1 1 sSOI STATUS WORD 
IF DRIVE WASN'T DUPLICATE 

THEN CONTINUE 
R1 1 > 1ST SDI PTR 

BARsSDI STATUS PTR/LOCK OUT U.PR 
R12=S0I STATUS 
IF THIS ONE NOT A DUPLICATE 

THEN CONTINUE 
IF ORAVL SET THEN CONTINUE 

ELSE SET DATT IN SDI STATUS 
UNLOCK U.PROC 
DECR R14 
IF R14 NEO O THEN BUMP R11/L00P 



RELEASE SUBUNIT BUFFERS AND MARK DRIVE OFFLINE OR UNKNOWN *** 



ADD #SOI .UF,OBAR\N, BAR 7.CALL S.CLRB 

MOV #<ORAVL IDRVOL ! DRDUP> ,R12 7.CALL C 

BIT #DERR,R11 

BIC\T #<DRAVL ! DROUP> ,R12 %TNZRO 

BIS R12,R11,BUF %JMP UNLOCK 



rajtOI 6HU0A1CLEAR UNIT FLAGS WORD 
GMST j R11:MUTEXE0 SDI STATUS 
IF DRIVE ERROR 

THEN CLEAR ORAVL AND OROUP 
RESET STATUS/FREE U . PROC/RETURN 



RELEASE SUBUNIT CHARACTERISTICS BUFFERS FOR SDI CONTROL BLOCK IN DBAR 



; D . RELB: 

BIC 
ADD 



ADD #SDI . CW, DBAR\N , BAR %CALL S.L011 ; [ UOA ] R 1 1 = CONTROL WORD 
#DRV .UM. R1 1 , BUF ; [U0A1FREE UP SUBUNIT CHAR BLK 

#SOI . UF , DBAR\N, BAR 7.JMP S.CLRB ; [U0A1CLEAR UNIT FLAGS WORD 



002O71 033753 OOOOSO 132011 



002072 013440 OOOOOO 



; * * * 

; * * * 

D .OLRD: ; NOP 
MOV 



DO READ FOR ONLINE COMMAND «** 

READ FORMAT CONTROL TABLE FOR FORMAT INFORMATION **» 

7.JMP D.OLRO ; EXECUTED IN JUMP TABLE 
#<VECT+SUSP> ,R13 %CALL D.CLRS ; R13=BITS TO CLR/GO CLR SDI STATUS 
D.READ DOES NOT RETURN BUT RATHER JUMPS BACK TO D.IOLE. THIS LEAVES 
A STACK LEVEL UNPOPPED BUT SINCE THE 2901 STACK WRAPS AROUND IT SHOULD 
NOT CAUSE ANY PROBLEMS 
NOP 7.JMP D.READ ; ZAP VECTOR AND SUSPEND FLAGS/GO READ SERIAL 
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WAIT ABOUT 20 MSECS FOR DRIVE STATE TO CHANGE »*« 











D 


WAIT : 


; XNOR 


R1 1 , R1 1 






002073 


031451 


1001 1 


12073 






DEC 


R1 1 


7.JN2R0 


. WA I T ; 


002074 












ASSUME 


. ZATT , EO, . 
















* * * 


CLEAR DATT BIT FOR 


ATTENTION AND GET STAT 










D 


ZATT : 


; NOP 




7.JMP 


O.ZATT ; 


002074 


010555 


007044 


133805 






ADO 


#SOI .51 ,DBAR\N,BAR 7.CALL S.L013 


002075 


014553 


00020O 


OOOOOO 






SIT 


#DRV . OA, R13 






002076 


033753 


010372 


142102 






MOV\F 


#250. , R13 


7.JZR0 


2$ ; 


0O2O77 


03371 2 


010002 


152 102 


1! 




MOV\F 


(RTDS1 ,RV2 


7.JZR0 


2$ J 


002 100 


01 4552 


1 40100 


1 12102 






BIT 


0AVAI L , R1 2 


'iJDSER 


2$ ; 


002 101 


03 14S3 


1001 3 


O02O77 


2S 




DEC 


R13, R13 


'iJNZRO 


1$ i 


002102 


133753 


00000 1 


13201 1 




MOV 


#OATT ,R13 


7.CALL 


. CLRS ; 


002103 


033752 


000200 


102022 






MOV 


#XCMP,R12 


7.JMP 


DONE 












* * * 


ROUTINE 


TO MOVE R16 


WORDS FROM 


IPR14 TO PR 


0O2104 


033776 


0I0O04 


1 67777 





SMVX : 


MOV\T 


#4,R16 


7.RZR0 




002 105 


1 20354 


0070 1 4 


1 33605 


D 


SMOV: 


INCB 


RI4\0.R1 4 , BAR 7.CALL 


S ID 13 


002106 


120352 


0070 12 


12361 6 






INCB 


R12\0. R12. BAR 7.CALL 


S . ST13 ; 


002 107 


031 4S6 


OOOOI 6 


102104 






DEC 
. PAGE 


R16 


7.JMP 


O.SMVX ; 



EXECUTED IN JUMP TABLE 

WAIT FOR 20 MSECS 

MAKE SURE O.ZATT IS NEXT 



EXECUTED IN JUMP TABLE 



[mjtos] get drive status 

[mjt08] is the already online bit set? 

£mjt08] if not,exit/r13 set fop 1/4 millisecond 1c 

tmjtosj get rtds if counter not zero 

[mjtosl if bad rtds. exit/is avail bit still set? 

[mjtOSl if set, loop and deer count 

813:611 TO CLR/GO CLR SOI STATUS 
R12:XCMP CODE/EXIT 



IF DONE THEN R16=4/RETURN 
RI3=W0RD FROM SOURCE 
STORE IN DESTINATION 
DECR R16 AND LOOP 



c 
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ROUTINE NAME: 

O.TIMR [SET SDI.TM ANO VECT ANO SUSP IN SDI. ST) 
TIME (SET SDI . TM) 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL SET THE DRIVE RESPONSE TIMER FOR THE SDI CONTROL 
SLOCK POINTED TO BY DBAR . IT WILL ALSO SET THE VECTOR STATE ACTIVE 
BIT IN THE SDI STATUS WORD. 



INPUTS : 



OUTPUTS : 

R1 1 IS USED AS 
R12 IS USED AS 



o 



POINTER TO ACTIVE CONTROL BLOCK 



TEMPORARY REGISTER 
TEMPORARY REGISTER 



0O211O 013440 000000 123ST2 O.TIMR: NOP 



002111 033551 003050 133570 



'/.CALL D.GMST 



R11=MUTEXE0 SOI STATUS 



002 1 12 
O02 1 13 

0021 14 

0021 15 

0021 16 

0021 17 
002 120 



002121 
002122 



010555 
034551 
033771 
033752 
1304S2 
010555 
133S44 



010555 
03371 1 



007033 
0000 17 
010002 
000001 
000012 
007004 
000200 



007034 
000003 



133603 
10000 
1521 15 
123574 
133567 
133615 
137777 



000000 
1021 13 



D . TIME: 
DTIMEA: 



BIS 

ADD 

ANO 

MOV\T 

MOV 

INC 

ADD 

BIS 



#<VECT*SUSP> ,R1 1 , BUF '/.CALL UNLOCK: INDICATE VECTOR LEVEL ACT I VE , SUSPEND 



#SOI .TO ,DBAR\N, BAR %CALL S.LD11 

#LONIB, R1 1 

#2,R11 XTZRO 

#1,R12 XCALL S.ROTL 

R12 %CALL P. LOCK 

#SDI . TM.DBARVN , BAR "/.CALL S.ST12 



OPLOCK, RLL 



SRET 



«*» SET LONG TIMEOUT ENTRY POINT 
.TIML: ADD *SD I . L T , OBAR\N , BAR 

MOV (BUF) , Rl 1 %JMP 

.PAGE 



R11.0RIVE RESPONSE TIMEOUT 

ISOLATE RESPONSE TIMEOUT 

(US2EC21IF EO O THEN DEFAULT TIME0UT:4 

[US2EC21C0NVERT FROM LOG BASE 2 

AOD 1 TO BE SAFE/LOCK OUT U.PROC 

TURN ON TIMER 

FREE U.PROC/RETURN 



IU52EC2]BAR=PTR TO LONG TIMEOUT 
[U52EC21R1 1 = LONC T/O.GO SET TIMER 
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.SBTTL D.PROC WRITE ROUTINE (*** NEW SDI TIMING ***) 
;+ 09-JULY-83 UDA52 MICROCODE 
ROUTINE NAME: 
. WR I T 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL WRITE DATA FROM SECTOR BUFFER(S) ASSIGNED 
TO THE SOI INTERCONNECT CONTROL BLOCK. 



POINTER TO SOI CONTROL BLOCK 



OUTPUTS: 

OATA WRITTEN TO DISK 

ALL O.PROC REGISTERS ARE USED 



002123 


013440 


000000 


132475 


D 


WRIT: 


NOP 


002124 


013451 


010611 


102310 




** * 


TST 
ALERT U. 


002 12S 












ASSUME 


0O2 12S 


033551 


043100 


152305 






BIS\F 


0O2126 


133544 


000200 


OIOOOO 






BIS 


0O2 127 


037156 


000O1 6 


122520 






XNOR 


002 130 


033751 


000002 


122513 





WRTX: 


MOV 


002131 


01 3440 


010000 


1 12333 






NOP 


002132 


01374O 


005001 


132465 






MOV 


002133 


033714 


000523 


10000 


D 


WRTB: 


MOV 


002134 












ASSUME 


002134 


010577 


047005 


152140 






AOO\T 


002135 


013440 


000000 


132535 






NOP 


002136 


010557 


017001 


012335 






ADD 


002137 


013712 


000002 


1 12537 




*** 


MOV 

HEADER S 


002140 


033712 


000443 


1 23014 





WRTC: 


MOV 


002 14 1 












ASSUME 


00214 1 


1 104S0 


015516 


152146 




* ** 


INC\T 
HEADER N 


002142 


013440 


000500 


133064 






NOP 


002143 


03371 1 


010522 


042352 






MOV\F 


002144 












ASSUME 


002 144 


01O577 


O37O05 


142140 






ADO\T 


002 1 45 


01 3440 


OOOOOO 


1 12331 


, 


** * 


NOP 
DESIRED 


00214S 


073751 


007002 


OOOOOO 


D 


WRTE: 


MOV\L 


002147 












ASSUME 



'/.CALL 
0RDPP %JZRO 



O.BFCK 

. NOBF 



GO CHECK BUFFER STATUS 
IF NONE THEN EXIT 



R1 1 

PROC FOR POTENTIAL EMPTY BUFFERS AS A RESULT OF THE WRITE «** 



PKIP.EO. SITOO 
#8FSV, R1 1 ,BUF 
#PLOCK,RLL 
R1 6,R1 6 
#2,R1 1 



XJNLSB D.IOEX 



'/.CALL 
•'.CALL 
%JZRO 

"'.CALL 



D .WSAF 
. WS I G 

. RRWE 
D . IOPW 



#CONT, RTCS 

(BUF) , R14 IPSWM 

BGRUP, EO, BI TOO 

#BUF . TA, R17\N,BAR %JNL 

7.CALL 
#8UF .ST, R17\N,SAR %JNZ 
(RTDS) ,R12\N %JMP 

EARCH LOOP *»« 

(BUF),R12 PSCMD "'.CALL 
CONT, EO, I 

R16.RTCS IFRSE V.JZRO 

OT FOUND (MSBiHEADER S 

IPRSE XCALL 

(RTDSI.R11 IPSWM 7.JNZR0 

RWROY.EQ, BIT 15 

#BUF . TA, R17\N,BAR %JMSB D.WRTC 
%JMP D.RWRE 



SB D.WRTC 
SGRP 

D . RRDE 
D . GRPC 



HORCMP 

.WRTE 

YNC T/0, 

HORANL 

D . HCER 



MAKE SURE PKIP IS LSB 

IF PKT NOT ACTIVE THEN DONE ELSE 

UNLOCK U.PROC 

Wait for it to be safe to xfer 

Verify drive is ready to xfer 

[16K1IF ERROR THEN GO FIND OUT WH 

GO LOAD DBAR, HDLMT 

[ 1 6K]R14:BUF .ST/SET WRITE MODE 

[I6KIMAKE SURE BGRUP IS LSB 

[16K1IF NO GROUP SELECT THEN CONT 

[16K1G0 ISSUE SELECT GROUP COMMAN 

I16K1IF NEO THEN SELECT GROUP E 

I16K1G0 DO GROUP CLEANUP 



; [E121 ] 
; IE 121 1 
; IE121 ] 
: [E121 ] 

BUFFER SERV; 
; IE121 1 
; IE121 ] 

; (E12U 

ONE 



! 1 6K]R12=RTC.SET CMD MODE , GO DO H 
MAKE SURE INCR OF R16(2) IS 3, I 
[16K1IF HDR MATCH THEN SET WRITE 
SBsLEV 1 SEND ERR, 2:RECVR RDY/R/W 

ELSE RESET SERDES ENABLE/GO DO 
[EC0O21IF HEADER COMPARE ERROR GO 
(EC0#2]R1 1 =ORIVE STATE 
MAKE SURE RWRDY IS MSB 
IF HI THEN CONTINUE (BAR:R/T CMD 

ELSE R/W READY FAILURE ERROR 




RROR 

; IE121 ! 
; IE121 1 
; (E1211 

EAOER COMPARE 
E. CONT+WRT 
GATE AND WRITE MO 
ROY ERR) *** 
HEADER ANALYSIS 
DISPATCH ON IT 



HEADER FOUND - SET UP FOR WRITE «»* 



#DMREG2 , Rl 1 , BAR 
DMREG4, EQ,0MREG2*2 



t 1 6K1R1 1 *4,SAR=PTR TO SECTOR SIZE 
116K1MAKE SURE THIS WILL WORK 



i [E121 1 
: (E121 I 
; (E121 1 



€ 



KDB50. MICROCODE, 22- APR-1 938 11:27: 16.96 



KOBDP DIGITAL EQUIPMENT CORP.. 2901 ASSEMBLER VERSION 32 

D.PROC WRITE ROUTINE (*** NEW SOI TIMING ***) 



002147 
002I 50 



002151 
002152 
502 153 
002154 
002155 
002156 

002157 
002 1 60 

002 1 6 1 

0021 62 

0021 63 

0021 64 

0021 65 

0021 66 

002 1 67 
0021 70 
002171 
002172 
0021 73 
002173 
002 174 
002175 
0O2176 
0O21 77 
0O22O0 

0O22O1 
002202 

002203 
002204 
002205 
0022O6 
002207 
002207 
0022 10 
0022 1 1 
002212 
002213 

002214 
002215 
00221 6 

0022 17 
002220 
002221 



03371 6 
1 2035S 



03371 1 
014440 
033456 
03445 1 
033453 
034451 

010557 
033715 

010555 
033712 
013740 
033751 
01 3440 
033454 
010555 
05O144 
033712 
013440 

033172 
133544 
010557 

014440 
01 4440 
010557 

01 4440 
0337 17 

0344S1 
010557 
034452 
033715 

1 10440 
010553 
037151 
1 15557 
030554 

1 I 4544 
01OS53 
013740 

025544 
010544 
01 3440 



000523 

007651 



000703 

106771 
000013 
10601 1 
0000 17 
10601 1 

007006 
106003 

007001 
106003 
007136 
106 100 
003012 
10601 5 
O070OO 
106004 
020003 
106012 

O430 1 1 
106200 
O07O0O 
10601 1 
10 601 1 
007O0O 

106571 
00OOO3 

10601 1 
167002 
106012 
140OO3 

105551 
007000 
0005 1 1 
013 100 
037007 

000 100 
017002 
OO3000 

00OOO1 
047O03 
003O1 6 



OOOOOO 
O10O0O 



132570 
052152 
010000 
052154 
OOOOOO 
042156 

OOOOOO 
052160 

OOOOOO 
OS2162 
OOOOOO 

0521 64 
OOOOOO 
042 1 66 
010000 
042170 
052176 
042172 

042174 
052174 
102201 
042176 
052 1 77 
OOOOOO 

O42201 
OOOOOO 

042203 
1 12323 
O42205 
1 12327 

052207 
10000 
122513 
152333 
033622 

10000 
002223 
OOOOOO 

O 10000 
142217 
010000 



MOV 
INCB 



( BUF ) , R1 6 9SWM 

R1 1\0, R16,BAR IPRCMD 



WRITE DATA PREAMBLE, SYNC, AND DATA «»« 



MOV 

CLR\F 

MOV 

CLR\F 

MOV 

CLR\F 

RELOAD 

ADD 

M0V\F 

RESET 

ADD 

M0V\F 

MOV 

M0V\F 

MOV 

M0V\F 

ADD 

AD0\RF 

M0V\F 

MOV\F 

ASSUME 

BISNT 

BIS\F 

ADD 

CLR\F 

CLR\F 

ADD 

IMFORTA 

CLR\F 

MOV 

FORM NE 

CLR\F 

ADD 

CLR\F 

MOV 

ASSUME 

INC\F 

ADO 

XNOR 

BI.CVF 

ADD 

CHECK 

BIT 

ADO 

MOV 

RELEASE 

BIC 

ADD\F 

MOV 



( BUF ) , R1 1 IPS 
R1 1 . SO (PSECC 
R1 3 , R1 6 

R1 1 ,S0 



R1 1 , 



R17, R13 
R1 1 , R1 1 . 



SO 



SDI CONTROL 
#BUF .SD,R17\ 
(BUF) .DBAR.S 

EARCH LIMIT 
#SOI .SL, DBAR 
(BUF ) .R12.SD 
#HDLMT,SAR 
#BFSV,R1 1 ,SD 
R12, BUF 
DBAR, R14, SD 
#SOI .ST, DBAR 
RLL , RLL .SO 
(BUF I ,R12 
R12.S0 

PKIP.EO.BITO 
R1 1 , R12.BUF 
#PLOCK.RLL.S 
#BUF .NL.R17\ 
R1 1 ,SD 
R1 1 , SO 
#BUF .NL.R17\ 

NT ■ RESET EC 
R1 1 ,SD GPREC 
(BUF ) ,R17 

XT DATA BUFFE 
R1 1 , R1 1 , SO 
#BUF .BP,R17\ 
R12, R12.SD 
(BUF ) ,DBAR 
CONT , EO, 1 
R1 1 , RTCS PRE 
#BUF . NL.R13X 
R1 I , R1 1 PRSE 
#BFULL.R17\N 
#SOI 0B.R14, 

OR DM MODE *« 
*DMODE,RLL 
#BUF .BP,R13\ 
#0, BUF 
DATA BUFFER 
#1 ,RLL\0 
#3,RLL\N, BAR 
R16, BUF 



SE 7.CALL D.WDAT 
T 7.JNDCLK . 

%JNDCLK . 

'/SJNDCLK . 
LOCK POINTER (OBAR) 
N.BAR 

7.JN0CLK . 
OR HDRCMP *** 
\N, BAR 

7.JNDCLK . 



7.JN0CLK . 

%JNDCLK . 
\N, BAR 

7.JNDCLK . 

7.JNCRY O.WRTF 

7.JNDCLK . 

7.TLSB 

7.JNDCLK . 

N.BAR 7.JMP D.WRTG 

7.JN0CLK . 

XJNDCLK . 
N .BAR 

C TIME (IPRECCT) ON DA 

CT XJNDCLK . 

R ADDRESS IN DBAR *» 

XJNDCLK . 
N.BAR %JLATE D .OVER 

%JNOCLK . 

7.JDSER D.RTDE 

CC XJNDCLK . 
N, BAR 

7.CALL D.WSIG 

, BUF 7.JZR0 O.RRWE 

BAR 7.CNMSB S.ST 17 



N.SAR 7.JN2RO D.WRTI 
IN R16 [16K] *** 
7.JNLSB . - 1 



I 16K1R1 6=SECT0R SIZE, SET WRITE MODE 

[16K]BAR=PTR TO » WROS IN OATA PRE, RESET CMD MODE 

; IE121 ] 
; [E121 1 

; [Ei2i J 

[ 16KJRI 1 =DATA PREAMB L E , 6NAB L E SEROES.GO WRT DATA H 
WHEN DRV CLK, (SD) =ECC#2(259 I 

( 16KIR1 6SBUFFER TO RELEASE 
WHEN DRV CLK. (SD) =ECC*3(260) 

I16K1SAVE R17 IN R13 FOR LATER USE 
WHEN DRV CLK. (SD) =ECC#4(2B1 I 
** 
BARsPTR TO SDI CTRL BLK 
WHEN DRV CLK, (SD) =ECC#5(262) 

BARsPTR TO HDR SEARCH LIMIT 
WHEN DRV CLK, (SD) =ECC#6(263] 
BARsPTR TO HDR LIMIT SAVE AREA 
WHEN ORV CLK, (SD) =ECC#7(264) 
RESET HEADER SEARCH LIMIT 
WHEN DRV CLK, (SO) sECC*8(265 ) 
BARsPTR TO SOI STATUS 
WHEN DRV CLK, (SD) sECC#9(266 ) 
IF LOCKED THEN CONTINUE 
WHEN DRV CLK, (SD) sECC#10(267| 
MAKE SURE PKIP IS LSB 

IF PKT STILL ACTIVE THEN SET BFSV IN SOI. ST 
WHEN DRV CLK, (SD) sECC#1 1 (268) 
BARsPTR TO NXT BUFFER/CONTINUE 
WHEN ORV CLK, (SD I =ECC#10(267) 
WHEN ORV CLK, (SD) =ECC#1 1 (268) 
BARsPTR TO NXT BUFFER/CONTINUE 
TA WORD 269, WORDS 269, 270 8271 MUST BE ZERO *** 
WHEN ORV CLK, (SD ) = ( 269 ) sO/RECCT 
R17=N6XT BUFFER POINTER 



[16K1WHEN ORV CL K . ( SD ) sWORO 270=0 

[EC0#21BARsPTR TO START OF SECTOR DATA 

[16K1WHEN ORV CL K , ( SD ) sWORO 271=0 

[ 1 6K]0BAR = DATA BUFFER POINTER 

MAKE SURE CONT IS 1 

[16K1WHEN DRV CLK , (PRECC , DROP WRT GATE/WORD = 272 

(16K]BAR=PTR TO LAST BUFFER STATUS 

I16K1RESET SERDES.GO WAIT FOR RECVR RDY 8 R/W RDV 

[16K1IF ERROR THEN PROCESS/ELSE CLR FULL FLG 

IF NOT LAST THEN UPDATE SOI. OB 

I 1 6K1 IF IN DM MODE 

[16K1 THEN SKIP BUFFER RELEASE 

I 1 6K] INDICATE BUFFER RELEASED 

[16K1IF BUFFER LOCK CLEAR 

1 1 6K1 THEN WAIT 

[16K] ELSE RETURN BUFFER TO STACK 



KDBSO. MICROCODE, 22-APR-19SS 11:27:16.96 



KDBDP DIGITAL EQUIPMENT CORP., 2901 ASSEMBLER VERSION 32 

O.PROC WRITE ROUTINE (*** NEW SDI TIMING ***) 



o 



002222 
002223 
002224 
002224 
002225 
002226 
002227 
002230 



00223 1 
002232 
002233 
002234 
002235 
002236 
002237 
002240 

002241 
002242 
002242 
O02243 



002244 
0O2245 
002246 
002247 
002250 
002251 



002252 
002253 
002254 
002254 
002255 
O02256 
002256 
002256 
002257 
002260 
002261 
002262 
002263 
002264 
0O2265 
002266 
002267 
002267 
0O227O 

KOBDP 



O30S44 
010557 

033714 
01 3740 
01344O 
I 14554 
010557 



03445 1 
1 14544 
034453 
010557 
010555 
055552 
010555 
010555 



00OO03 
007000 

03O003 
007236 
OOOOOO 
000 100 
017001 



000551 
OOOIOO 
01O4S3 
007006 
007001 
00O001 
007023 
007006 



010000 
OOOOOO 

002227 
133625 
102231 
OOOOOO 
002 133 



O1OO00 
O 10000 
013454 
133607 
133604 
O1O000 
1 33615 
133803 



03615 1 00OO16 OOOOOO 



135551 
133553 



010S56 
014551 
033S71 
135551 
035551 
033752 



033751 
010555 



01 3440 
105S7 



1 1 4554 
133553 
010555 
010551 
010557 
010551 
01 0557 
010555 
01 0555 

O 1 3440 
033152 



030300 
010100 



007001 
000040 
01OO20 
000001 

003040 
OOOI 40 



000002 
007OOO 



030OOO 
0070O4 



OOO TOO 

010 100 
007O22 
007017 
007003 
00701 S 
007OOO 
007020 
0O7O00 

030000 

00001 1 



002251 
042251 



123603 
10000 
042247 
OOOOOO 
10000 
102265 



122043 
133603 



1 12265 
133606 



OOOOOO 
032480 
1 33603 
123617 
1 23606 
133617 
123606 
133623 
133603 

002272 
12201 1 



ADD 

ADD 

ASSUME 

MOV 

MOV 

NOP 

BIT 

ADD 



CLR 

BIT 

CLR 

ADD 

ADD 

8IC\R 

ADD 

ADD 

R18 s 

XOR 

ASSUME 

BIC 

BIS\F 

BECAUSE 

U . PROC 

ADD 

BIT 

BIS\T 

B I C 

BIC 

MOV 



#3, RLL 
#BUF . NL . R 1 7 
BLAST, EO.BI 
(BUF) , R14 
#BTCNT,BAR 

#BFULL ,R14 
#BUF .ST.R17 

i - DM MDOE 



\N,BA 
T15 



\N, B 
REOU 



%JNMSB 

7.CALL 

7.JMP 

AR 7.JNZR0 

EST OR NE 



O.WRTJ 
INITM1 
D . IODN 
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[1BK1RELEASE LOC 
BARsPTR TO NEXT 
MAKE SURE BLAST 
[ 16K] [U52EC1 I IF 
(US2EC1 1F0RCE U 
(U52ECI ] CONTINUE 
[U52EC11IF NXT 
[ 16K1THEN WRIT 



K/UPOATE STACK PTR 

BUFFER STATUS 

IS MSB 

NOT LAST BUFFER THEN EXIT, SETTING 

PROC TO LOOK FOR WORK TO DO 



UFFER FULL 

E ANOTHER SECTOR 



D.WRTB 
ED BUFFER FILL SERVICE FROM U.PROC *«* 



R1 1 
#DMO 
R1 3 
#BUF 
#SOI 
#1 , R 
#SOI 
#SDI 

OINTE 
R1 6, 
BLAS 
#<6L 
#ERR 
IF B 

RECOV 
#BUF 
#BRC 
#BRA 
#BER 
0BRC 
#<SU 



PRE 
DE, RLL 

1PSC 
. SD , R1 7 
SL , DBA 
12 

. RO , DBA 
. UB, DBA 



MO 

\N,B 
R\N, 

R\N, 
R\N, 

FFER 



%JNZRD 
AR %CALL 
BAR 7.CALL 

BAR 7.CALL 
BAR %CALL 
CONTROL 



OF BU 
R1 1 

EO.BI 
AST ! BFU 
I P , R 1 3 
LAST SE 
ERY DPE 
ST, R1 6 
TS, R1 1 
RS, R1 1 
ON, R1 1 
TS, R1 1 , BUF 
SP+BFSV>,R12 %JMP 



XFCSST 
S . LDDB 
LD12 

ST12 
LD1 1 
BLOCK J 



IT1S 
JLL> 

6T AN 
IRATI 

S\N, B 



R1 1 %JNMSI 

7.JNZR0 I 

CURRENT 

ON AND WE 

AR XCALL ! 

5STNZR0 



D . I D 
. IDDA 
BCB PT 
MUST 
. LD1 1 



ZAP 
IF 

T 
DBA 
R1 2 
DI V 
RES 
R1 1 

UST RE 
CHE 
MAK 
116 
!EE 
EO 

LEAR 
(EE 
Imj 
[m j 
[EE 
(EE 
R 1 2 



R1 1 
IN D 
HEN 
R = SD 
= SEA 
IDE 
ET R 
= U . P 
AD * 
CK I 
E SU 
K] IF 
RREC 
01 . U 
RRIP 
RREC 
t09 1 
t09 1 
RREC 
RREC 
= SUS 



/RESET EC 
M MODE 
RETURN TO 
I CONTROL 
RCH LIMIT 
BY 2 

OTATIONAL 
ROC BUFFE 
* * 

F SAME AS 
RE BLAST 

R17 IS N 
! IF SDI ,U 
B THEN IT 

TO CLEAN 
1GET BUFF 

is brcts 

[EERRECIS 
1CLR ERRO 
1CLEAR 81 
PEND 8 BU 



[E121 1 
[El 21 ] 
[E121 1 



DM 

BLK PTR 



FATAL I/O ERROR ENTRY POINT *** 



MOV 

ADD 

ASSUME 

NOP 

ADD 

ASSUME 

ASSUME 

BIT 

BIS 

ADD 

ADD 

ADD 

ADO 

ADD 

ADO 

ADO 

ASSUME 

NOP 

OR 



#FM. DSK, R1 1 
#SOI .ST, OBAR 
RVCT ,E0, BIT1 



#BUF 

XBNCO 

RBNCO 

#BIT1 

#ERRI 

#SOI . 

#S . LB 

#BUF 

OS . LB 

#BUF 

#SDI 

#501 

RVCT 



HH, R17 
D8BIT1 
D3BIT1 
4 , R 1 4 
P, R13 
PO, DBA 
NH , R1 1 
HL, R17 
NL , R1 1 
NL ,R17 
EO, DBA 
ST, DBA 
EO , B I T 



7.CALL 
.BAR 7.CALL 

7.JMSB 
BAR '.CALL 
0, O 



D . LOGF 

S . L01 1 



D. IODC 
S. LD14 



R\ 

\N, B 
\N , B 
\N,B 
\N.B 
R\N, 
R\N, 
15 



%CNZRO 
BAR 7.CALL 
AR 7.CALL 
AR 7.CALL 
AR 7.CALL 
AR 7.CALL 
BAR 7.CALL 
BAR 7.CALL 

%JNMSB 
7.CALL 



D . RBLH 

S . L01 1 
S .ST14 
S . L014 
S . ST14 
S . LD14 
S .CLRB 
5 . L D 1 1 

. IODD 
. C L RS 



[U52 

[U52 

[ U52 

[U52 

R14 

[U52 

[U52 

[U52 

[U52 

R1 1 

SAVE 

R14 

SAVE 

R14 

CLEA 

R1 1 

MAKE 

[US2 

[U52 



EC31R1 
EC2IR1 

C2IMA 
EC2] IF 
ERROR 
EC3 1MA 
EC31CH 
EC3] [U 
EC21 
MSCP P 

AS FI 
ERROR 

AS FI 

CURREN 

R LEVE 

SOI 

SURE 
EC21 IF 
EC2] 



1 -LOG 
1 =SDI 
KE SUR 

FATAL 
LBN HI 
KE SUR 
K FILT 
52EC2] 
THEN R 
KT PTR 
NAL LB 
LBN LO 
NAL LB 
T BUFF 
L ER 
STATUS 
RVCT I 

REVEC 
ELSE C 



OPTIMIZATION WORD 
R CNTRL BLK POINTER 

CURRENT PTR 
IS MSB 

OT LAST THEN CONTINUE 
S EO SDI. OB THEN CLR ERRIP 
HAS TO BE A 
UP THE STATE 
ER STATUS WORD [rae09 1 
Set? 

ET READ AFTER RCT SEARCHED FLAG 
R RECOVERY CMD FLAG 
T FOR D PROC TO AVOID ENDLESS LOOP 
FFER SERVICE 

[E121 1 
[E121 ] 
[E121 ] 
CODE/GO SET FATAL LOG 
STATUS 

RVCT IS MSB 
ERROR AND REVECT ACTIVE THEN CONT 

E BIT 1 4 

ERS RBN'S 

IF HDR CODE EO PRIM RBN 

ESTORE BUF HL/BUF HH 

N HI 



ER STATUS 
ROR STATE 

S MSB 

TORING NOT ACTIVE THEN CONTINUE 

LEAR STATUS BITS IN R13 



KDB50. MICROCODE . , 22- APR- 1988 1 1 :27: 16.96 



KDBDP DIGITAL EOUIPMENT CORP. 

D.PROC WRITE ROUTINE (**« NEW SOI TIMIN 



002271 0145S2 000004 



002272 
002273 

002274 
00227S 
002276 
002277 
002300 
002301 

002302 

002303 
OO2303 
OO2304 



010557 
036514 

134554 
035572 
010555 
014551 
013440 
01345 I 



007000 

000003 

000100 
01014O 
007000 
000202 
10000 
00001 1 



133567 
122306 

010000 
042276 
133603 
000000 
002305 
102303 



2901 ASSEMBLER VERSION 32 



BIT #DERR,R12 %JMP 

THE FOLLOWING INTERLOCKED BUFF 
CONDITION WHICH OCCURS WHEN TH 
AFTER THE D.PROC HAS EXAMINED 
'BFSV, THEN THE D.PROC SETS ' 
OUT BECAUSE THE D.PROC WILL ON 
IS CLEAR ! 

ADO #SUF . NL ,R17\N,BAR 7.CAL 
XOR (BUF1.R14 "/.CALL 
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D .RV4A 
ER STATUS 
E U.PROC H 
IT, CLEARS 
BFSV ANO 
LY ENTER D 

L P. LOCK 
D. CLUR 



ANO 

BIC\T 

ADD 

BIT 

NOP 

TST 



#BFULL ,R14 

#<SUSP-fBFSV> , R12 %TN2R0 

#SDI .ST, DBARNN, BAR '/.CALL S.LD11 

#<XCMP I SEEK> , R1 I 



013440 000000 123572 



; *** 
.SETS 



. I0EX 
R1I 7.JMP D.SETA 

ROUTINE TO CLEAR SDI STATUS BITS IN R13 

D .GMST 



035151 
033151 



040013 
003012 



002305 133S44 OO0200 



002306 
002307 



010555 
035551 



007026 
003040 



142305 
010000 



123603 

137777 



NOP 

ASSUME 

BIC\F 

BIS 

I/O EXIT 

BIS 



•'.JNZRO 
7.JMP 



%CALL 



PKIP . EO, BITOO 
R13, R1 1 
R12, R1 1 ,BUF 

RELEASE U.PROC, GO 



7.JNLSB D.IOEX 



; TEST 
CHECK 
AS SET 

SDI STA 
'SUSP 
.READ AN 

BARaBU 
[ U52EC 
[US2EC 
ISOLAT 
THEN 
R1 1 =SD 
IU52EC 
[US2EC 
CHK IF 
AND SET 
R1 1 =MU 
MAKE 
IF PKT 
SET ST 



OR ERRORS/RESUME REVECTOR PROCESS 

MADE TO AVOID THE RACE 
HE BUFFER STATUS 
TUS BITS 'SUSP' AND 
HEREBY LOCKING ITSELF 
D O.WRIT WHEN 'SUSP' 



FFER STATUS PTR/LOCK OUT U.PROC 

2] IF PREVIOUS AND INTERLOCKED STATUS 

21CLEAR URETRY IN SDI.ES 

E BUFFER FULL/EMPTY FLAG 

DON'T SET SUSPEND AND BUFFER SERVICE BITS 
I STATUS (MUTEXEO) 
1 ] IF SEEK OR DONE 
1] THEN JUST FREE U.PROC/EXIT 

PKT STILL ACTIVE ; IE121 ] 

BITS IN R12 *«« 
TEXEO SDI STATUS 
URE PKIP IS LSB 

NOT ACTIVE THEN DONE ELSE ZAP FLAGS 
ATUS FLAGS FROM R12 



FFER ^l^/ 



#PLOCK, RLL 



%JMP 



IDLE *** 
D. IOLE 



. UNLOCK UPROC/GO IDLE 



ROUTINE TO CLEAR URETRY IN SOI.ES, USEO BY O.IOOD * D.RVCS «** 

ADD #SDI .ES, OBAR\N, BAR 7.CALL S.LD11 ; ! US2EC2 1 R 1 1 = E X T E NOEO STATUS 

SIC #URETRV, R1 1 ,BUF %RET ; [U52EC21CLR URETRY , RESET , RE TURN 

ENTER HERE FROM . RE AD /O . WR I T WHEN THE FIRST BUFFER IS FULL/EMPTY 



002310 








.NOBF: 


ASSUME 


O0231O 


033151 


043012 


152305 




BIS\F 


00231 1 


010S57 


007001 


133606 




ADD 


002312 










ASSUME 


0O2312 


133544 


040200 


1 10701 




BIS 


0O2313 


013440 


000000 


132535 




NOP 


002314 


010557 


17001 


012335 




ADO 


O023IS 


133752 


000002 


10000 




MOV 


00231 6 










ASSUME 


002316 


013712 


010002 


102320 


10$ : 


MOV 


002317 


031452 


030012 


112316 




OEC 


002320 


050144 


000004 


133566 


20$ : 


ADO\R 


002321 


033712 


000003 


000000 




MOV 


002322 


035552 


00300 1 


1 12305 




B I C 



PKIP , EO, BITOO 
R12.R1 1 , BUP 



7.JNLSB O.IDEX 



#BUF . ST , R1 7\N , BAR 7.CALL S.LD14 
BGRUP, EO, BITOO 

#PLOCK,RLL %JNLSB D.IDLE 

•/.CALL D . SGRP 
#BUF .ST, R17\N, BAR %JN2R0 D . RROE 
#1000, R1 2 
RWROY.EO, BIT 1 5 

(RTDS),R12\N %J2R0 20$ 

R12 SJMSB 10$ 

RLL, RLL SCULL P.LCKA 
(BUF) , R12 

#BGRUP, R12.BUF %JMP D.IOEX 



;enter with interlocked SDI. ST in CC's 
;exit if no pkt in prog, else 

;Set SUSP and BFSV in SDI. ST 

; get buffer status in R14 

;to see if group sel needed 

;re1ease interlock, leave if no grp sel 

; send grp sel to drive, do bookkeeping 

; jump if error sending grp sel 

;Avoid waiting infinitely below 

; wa i t until Read/Write Ready drops 
; so we won't be fooled later 
; get i nt erpr ocessor interlock again 
;c1sar the "group select needed" 
; under interlock to avoid race 
;with upper proc trying to change 
; BFULL bit , and exit 



1E121 
[E121 
(E121 
[E121 

[E121 
[E121 
[E121 
[E121 
(E121 
[6121 
IE121 
[E121 
IE121 
1E121 
[E12I 
[E121 
[E121 
[E121 
[E121 
[E121 
1612 1 
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KDBOP DIGITAL EOUIPMENT CORP., 2901 ASSEMBLER VERSION 32 

D.PROC WRITE ROUTINE (*»» NEW SOI TIMING «»») 



PROCESS NAME: 

READ/WRITE ERROR HANDLING 



FUNCTIONAL DESCRIPTION: 

EVERY POSSIBLE ERROR THAT CAN OCCUR DURING A READ OR WRITE OPERATION 
WILL BE OIRECTED THROUGH THIS CODE. 

INPUTS : 

R17 BUFFER POINTER 

OUTPUTS : 

VARY ACCORDING TO ERROR TYPE 



002323 033756 00OO52 102332 DOVER: 



ENTRY POINT FOR SERDES LATE (OVERRUN) ERRORS «*« 

MOV #<ST . CNTtSC . OVR> , R1 S %JMP D . RWRA : RIS'SEROES OVERRUN ERROR 

DRIVE PROCESSOR INTRUCTION TIMEOUT RECOVERY ROUTINE *»« 

NOTE ■ WHEN ENTERING AT D.TIMO, BIT TEST FOR OPERATION MODE IN RLL 



002324 
002325 
002326 



002327 
0O233O 



002331 
002332 



002333 
0O2334 
002334 



002336 
002337 



002340 
00234 1 
002342 
KDBDP 



033751 
033756 



010015 027777 
000253 010000 



MOV #ER.TM0,R11 °/.RN2R0 
MOV #<ST .DRVISC .0CL> , R1 6 
ASSUME D. TOER, EO, . 



(16KIIF DIAGNOSTIC TIMEOUT THEN RETURN 
IEC0#1 JR1 6=MSCP STATUS 
FALL INTO O.TOER 



133754 000020 102424 



033756 
133556 



033756 
133754 



033714 
013440 



000013 OIOOOO 
000001 102332 



0002 13 000000 
000040 102424 



O00O02 OIOOOO 
030000 002331 



0337S6 000313 102326 



033756 
133754 



034456 
133756 
13 3 7 5 6 



000153 OIOOOO 
000010 102424 



000016 I 12343 
000004 112343 
00OO02 000000 
KDB50. MICROCODE 



: * * * 
.TOER. 



; * * * 
D . RWRE : 
D . RWRA : 

; *** 
D . RRWE: 



. TKER: 
D.TKEA: 

; * *» 
D.RCTE: 
; ** * 
D OTER: 
; *** 
. LRER: 



ENTRY POINT FOR I/O INSTRUCTION TIMEOUT »«» 

MOV #I0CLK,R14 7.JMP O.IOER ; R14«CLK ERROR CODE/CONTINUE 

ENTRY POINT FOR RTDS RECEIVE ERROR DURING READ/WRITE OPERATION *"** 

MOV #ST.DRV,R16 ; [ ECO# 1 ] R 1 6 = DR I VE ERROR CODE 

BIS #SC.LV0,R16 %JMP D . RWRA ; [EC0#1]SET R14 AND CONTINUE 



ENTRY POINT FOR READ/WRITE READY FAILURE «** 



MOV 
MOV 



#<ST.ORV+SC. RWR> , R1 6 
#IORWR, R14 %JMP 



R16=REA0/WRITE RDY FAILURE ERROR 
R14:RD/WRT RDY ERROR CODE/CONTINUE 



ENTRY POINT FOR RECEIVER READY OR READ/WRITE READY FAILURE «•» 



MOV 

ASSUME 
NOP 



(RTDS) , R14 
RWRDY.EO, BIT15 



%JNMSB D.RWRE 



IF RD/WRT RDY ERROR 
MAKE SURE RWRDY IS MSB 
IF NOT HI THEN PROCESS 



ENTRY POINT FOR RECEIVER READY TIMEOUT ERROR «*» 

MOV #<ST . DRV+SC . RRO> , R1 6 %JMP O.TOER ; R 1 6 = RECE I VER READY FAILURE ERROR 



ENTRY POINT FOR SUSPECTEO POSITIONER ERROR 



MOV 
MOV 



#<ST . ORVfSC . POS> , R16 
#I0SEK,R14 %JMP 



D . IOER 



R16:P0SITI0NER ERROR 
R14:SEEK ERROR/CONTINUE 



ENTRY POINT FOR HEADER ERROR AFTER RCT SEARCHED 

CLR R16 %JMP D.EERR ; [EERREC] R16 = , GO INTO ENHANCED ERROR RECOVERY 

ENTRY FOR DATA SYNC TIMEOUT 

MOV #BDSNF,R16 %JMP D.EERR [EERREC] R16=0SNF FLAG, GO INTO ENHANCED ERROR 

ENTRY FOR LOSS READ/WRITE READY ERROR 

MOV #BLRWR,R16 ; [EERREC] R16:LRWR FLAG, GO INTO ENHANCED ERROR 



o 

REC IVER 
REC IVER 
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.PROC WRITE ROUTINE (»«« NEW SOI TIMING *«*) 



PAGE I6S 



002343 
002344 
002345 
002346 
002347 
002350 
.O0235 1 



010557 
O10S5S 
0105S7 
033 I 54 
010557 
133554 
0371S6 



OO7O05 
007007 
O070O1 
003015 
007000 
003100 
0000 1 6 



133507 
12361 1 
133606 
000000 
123606 
OOOOOO 
102231 



AOO #BUF .SO , R 1 7\N , BAR %CALL S.LOOB 

ADO #SDI . DB , DBAR\N , BAR %CALl S.L017 

ADO #BUF . ST , R17\N , BAR "/.CALL S.L0I4 

BIS R16, R1 4, SUP 

ADD *BUF . NL , R17\N, BAR "'.CALL S.L014 

BIS OBFULL , R14, BUF 

XNOR R16.R16 7.JMP D.IODN 



IEERREC1 RESTORE DBAR 

[EERREC] R17 = BUFFER CNTR BLK PTR 

[EERREC1 GET SOI STATUS 

[EERREC] SET ERROR FLAG 

IEERREC] GET PNT TO NEXT DATA BUFFER 

IEERREC] SET FULL 

[EERREC] R16 = 1777770 FOR D.IODN AND EXIT 
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.PROC WRITE ROUTINE (*** NEW SOI TIMING ***) 



002352 
002353 
002354 
002355 
002356 
002357 
002360 
002361 
002362 

002363 
002364 
002365 
002366 



OO 
00 
00 
00 
00 
00 
00 
00 



2367 
2370 
2371 
2372 
2373 
2374 
2375 
2376 



00 
00 

00 
OO 
OO 
00 
OO 
00 
00 
00 



2377 

2400 

2401 
2402 
2402 
2403 
2404 
240S 
2406 
2407 



010557 
033456 

1 14544 
131551 
01 6551 
111551 
1 14S73 
135553 
010557 

013440 
010555 
034552 
033452 

134552 
13 6 5 5 2 
O13440 
010555 
010555 
112152 
112171 
033753 



033752 
033756 



007001 
OOOOI 1 
030100 
O100O2 
10004 
O 10002 
010010 
Ol 3010 
O07006 

OOOOOO 

007067 
000077 
010014 

000360 
000140 
10000 
007076 
007075 
0000 1 4 
O10013 
O2010O 



000244 
0001 10 



133605 
OOOOOO 
100701 

052424 
1 12335 
102361 
152361 
102336 
1 33607 

123053 
1 33604 
01000O 
102372 

OOOOOO 
OIOOOO 
1 1 2401 
133604 
123603 
OOOOOO 
152376 
012401 



OOOOOO 

1 12422 



. HCER: 



ENTRY P 

THIS CO 

ADD 

MOV 

BIT 

SUB\F 

XOR 

SUB 

BIT\T 

BIC 

ADO 

HEADER 

NOP 

ADD 

AND 

MOV 

AND 

XOR 

NOP 

ADD 

ADD 

CMP 

CMP\T 

MOV 



OINT FOR HEAD 
OE PROCESSES 
#BUF .ST, R17\ 
R1 1 , R1 6 
#DMODE, RLL 
#2, R1 1 
#4, R1 1\N 
#2, R1 1 \N 
OSGOOD , R13 
OSGOOD, R13 
#BUF . SO , R1 7\ 
NOT FOUND 

#501 . RT , DBAR 
#RBNMSK, R12 

R 1 4 , R I 2 

#HDCOD, R1 2 
KRBNCOD , R1 2 

#SDI . L2, DBAR 
#SDI . LI , OBAR 
R14, R12 
R13, R.1'1. 
#BFSV, R13 



ER COMPARE ERROR *• 
ALL HEADER COMPARE 
N.BAR '/.CALL S.LD13 



7.JNEG D.IDLE 
'/.JN2R0 D . IDER 
%J2R0 D.RROE 
%JZRO O.HCEO 
7.TZR0 

%JZRO O.TKER 
N , BAR 7.CALL S . LDDB 
T'S CHECK IT FOR RCT 

'/.CALL D.LOHD 
\N , BAR 7.CALL S . LD12 



RROR 
[ I 
IE 
IF 
IF 
IF 



7.JZR0 



10$ 



010555 007000 133603 . HCEA : 



XBN (FCT) OR RCT LBN 
MOV #<SUSP!DERR 
MOV #<ST.OAT*SC 
BLOCK NOT IN RCT SPA 



4r% 



002410 
0024 1 1 
0024 1 2 
0024 13 
002414 

002415 

00241 6 

0024 1 7 
OO2420 
002421 

002422 
002423 



133752 
010557 
014551 
033776 
010567 
130464 



I 14554 
013440 
010555 
010555 
034453 

033756 
034453 
010557 
134552 
033752 

010557 
033551 



030200 
007001 
000060 
0101 10 
007002 
10004 



000360 
010000 
007 100 
007024 
0000 13 

0001 10 
0000 13 
007004 
00036O 

010004 

00700 1 

003004 



112415 
133503 
OOOOOO 
052340 
133006 
140701 



OIOOOO 
022460 
123622 
123623 
1 1 2302 

OOOOOO 
OOOOOO 
123604 
OOOOOO 
002252 

1 33603 
1 12252 



ADD 

ASSUME 

MOV 

ADD 

BIT 

MOV\T 

ADD 

INC\T 



#SDI .ST, OBAR 
RVCT.EO, BIT1 
#RVCT,R12 
#BUF .ST, R17\ 
#<BRCTS+BRAR 
#<ST . DAT+SC . 
#BUF . BP , R1 7\ 
RLL . RLL 



7.JZR0 D.HCEA 
\N, BAR %CALL S. LD12 
\N , BAR 7.CALL S .LDI 1 

*/,TZRO 

7.JNCRY O.HCEA 

HEAOER NOT FOUND OR 
XCMP> , R12 

HDR>,R16 y.JMP D.HCEO 
CE ■ CHECK IF REVECT 
\N, BAR "/.CALL S . LD 1 
S 

%JMSB D . HCEC 
N, BAR 7.CALL S . LDI 1 

Rt 1 

HDR>.R16 7.JNZR0 D . RC 
N.BAR %CALL O.ALBF 

XJZRO D.IDLE 



[U 
IE 
IU 
RE 

LBN 
IU 
Ge 
M. 
I f 
El 
IS 
RB 
no 
IU 

I VO 
IU 
IU 
IU 
IU 

NO 

IU 

IU 

ORIN 

IU 



S (L 

6K] I 

C0«2 

WE 

OM 

I/O 

52EC 

C0#2 

52EC 

STOR 

OR 
52EC 
t RB 
Sk o 

no 
se c 
olat 
N'S 
n-LB 
52EC 
5] I 
52EC 
52EC 
52EC 
52EC 
REVE 
52EC 
52EC 
G AC 
52EC 



BN , RBN , 
EC0#2]R 
] R 1 6 = ER 

ARE TOO 
MODS TH 

ERROR 
21 lECO* 
1 IF SEA 

2) ieco# 

SOI C 
FCT BN 
21R13/R 
N 'S/tr 
ut crap 
RBN'S. 
opy hea 
e heade 
can be 
N codes 
21R12: 1 
U52EC2] 
2 JCOMPA 
2] IF EO 
3] IUS2E 
3IT0 DO 
CTORING 
31R12-S 
3] IU52E 
TIVE »* 
2IGET S 



RCT, FCT) *** 

13:0N CYL GOODNESS FLAG 

ROR CODE FOR OM 

FAR AWAY THEN GO IDLE 
EN SKIP/CONTINUE 

FOUND DURING HDR RD THEN PROCESS 
2]IF RBN/XBN HEAOER PROBLEM THEN DONE 
RCH LIMIT EXCEEDED THEN TEST BGOOD 
21IF BGOOD EO O THEN POSITIONER ERROR 
TL BLK PTR 



14:L0/HI HEADER 

ck 



[E121 ] 
[E121 ] 
IE121 ] 
[E121 ] 
IE121 ] 
IE121 ] 
[E125] 
IE121 ] 



no revect or i ng 1 
der for RBN test 
code in hi hdr 
revectored; all other 

will fail RCT test 
ST RCT LBN HI 
R1 1 s 1ST RCT LBN LO 
RE HI BLK NUMBERS 

O THEN COMPARE LO BLK NUMBERS 
C2 1IF NOT IN RCT SPACE THEN OK 

REVECTORING 

EXIT «** j [E121 ] 

01 ST BITS TO SET 
C21R16:HEADER NOT FOUND ERROR 

01 STATUS WORD 



NOW WE MUST FILTER OUT THE PRIMARY "HEAO 



BIT 
NOP 
AOO 
ADD 
CLR 



•HOCOD, R14 



#SDI . PH, DBAR\ 
#SOI .06 , OSARN 
RI3 



. HCEC : 



7.CNZR0 O.RBLH 
\N.BAR %CALL S.ST17 
NN.BAR 7.CALL S.CLRB 
7.JMP SETS 

HEADER NOT FOUND AND REVECTORING ACTIVE, 

MOV #<ST . DAT ISC . HDR> . R1 6 

CLR R13 

ADO 

AND 

MOV 



ADD 
BIS 



#BUF . HH , R 1 7\ 
#HOCOD. R1 2 
#OERR, R12 

#BUF .ST. R17\ 
#BNXCOP. R1 1 



BAR 7.CALL 

7.JNZR0 



. L012 
. IODB 



BAR %CALL 
BUF %JMP 



. LDI 1 
. IODB 



[US2EC21IF REVECT ON THEN CANNOT NEST IT 

[EERRECIGET BUFFER STATUS WORD 

[EERREC1CHECK IF THIS IS DURING EHNAHCED RECOVERY 
TE ; [EERREC1IF SO THEN SET STATUS AND CONTINUE WITH 

[U52EC2MUST HAVE BUFFER TO START RE VECTOR I HI I 

[U52EC21IF NO BUFFER THEN GO AWAY 

[U52EC21T0 PREVENT DEADLOCK ll't.l 
ER NOT FOUND" CASE *** 

IU52EC21IF PRIMARY HEADER CODE 

[U52EC2] THEN RESTORE BUF . HL / BUF . HH 

I VOS JIUS2EC2JSAVE PTR OF REVECTOR BUFFER IN SDI.S7 

[U52EC1JN0 OVERLAPS ON REVECTORS 

IEC0#2]GQ TURN ON REVECTORING 
CAN BE RCT LBN OR RBN ! ».».• 

[U52EC2]R16:HDR NOT FOUND CODE 

IU52EC21ZAP R13 

IU52EC2 ] R12.HI BLK NUMBER 

[U52EC21IF NOT LBN (RCT) 

[U52EC2] THEN MUST BE RBN ANO ERROR IS FATAL 

[U52EC2IR12:0RIVE ERROR FLAG 

[U52EC21R1 I -BUFFER STATUS WORD 

[U52EC2] INDICATE TO REVECTORING TO USE NEXT COPY 
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; [US2EC2I0F RCT IF APPROPRIATE 
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KOBDP DIGITAL EQUIPMENT CORP.. 2901 ASSEMBLER VERSION 32 

O.PROC WRITE ROUTINE (*** NEW SOI TIMING »*«) 



002424 
00242S 
002426 
002427 
002430 
002431 



002432 
0O2433 
002434 
002435 

002436 
002437 
002440 
002441 
002442 
002443 

002443 
002444 
002445 
002446 
002447 
0024SO 
002451 
002452 
002453 
002454 
002455 
002456 
002457 



002460 
0O2461 
002462 
002463 
0O2464 



01 3440 
013740 
1 1 4544 
033451 
010557 
013740 



010555 
01OSS5 
014551 
010S7S 

033753 
033451 

1 14554 
033753 
010555 



033454 
033752 

10555 
1 14551 
1 14551 
133574 
013440 
I 14554 
033751 
03375 1 
0105 55 
013440 
013440 



0105SS 
010S55 
010557 
010555 
010557 



000500 
007007 
000040 
010556 
007006 
067005 



0O7O07 
007O26 
00OO4O 

017006 

000002 
000014 
000360 
000100 

007000 



03001 1 
000244 
0O7O2O 
0OOO04 
010074 
010004 
003014 
0OOO20 
010255 
000254 
00702 1 
000000 
000000 



007022 
007031 
007003 
0O7O32 

007004 



131270 
123622 
O1O0O0 
0O3454 
133607 
123607 



1236 I 1 
123603 
1OOO0 

0736 1 1 

121633 
133053 
123233 
010000 
133606 



032544 
OOOOOO 
123603 
OOOOOO 
002422 
042451 
13201 1 
OOOOOO 
102455 
010000 
13361 4 
132 1 10 
1 10701 



133603 
123606 

123S17 
123606 
103617 



; *** 
0. RBLH 



EEEEEEE 

E 

E 

EEEEEE 



EEEEEEE 



RRRRRR 

R R 



RRRRRR 
R R 
R R 
RRRRRR 
R R 
R R 
R R 









00000 



PLEASE NOTE THAT EVERV I/O ERROR EXITS THROUGH O.IOER ! *»» 



NOP 

MOV 

SIT 

MOV 

AOD 

MOV 

AT T 

CERT 

ADO 

AOD 

BIT 

ADO\T 

CHECK 

MOV 

MOV 

BIT 

MOV 

ADD 

ASSUI* 

MOV 

MOV 

AOO 

BIT 

BIT 

8IS\T 

MOV 

BIT 

MOV 

MOV 

ADD 

NOP 

NOP 



#DMR 

#DMB 

R16. 

#BUF 

#OMR 

HIS POIN 

AIN ERRO 

#SOI 

#SOI 

#URE 

#SDI 

FOR ER 

#FM. 

R14, 

#HDC 

#BFS 

#SOI 

E RVCT 



tPRSE 
EGO, BAR 
EG.RLL 
R11 CPRECC 
SO, R17\N 
EG5 , BAR 
T R17 HAS 
RS ARE CH 
DB, OBAR\ 
ES,DBAR\ 
TRV.R1 1 
.UB,DBAR\ 
ROR LOGGI 
DSK.R13 
R1 1 

00, RI4 
V, R13 
ST,DBAR\ 
E0.BIT1S 



7.CALL 

•/.CALL 



.CLCS 
S .ST17 



%JNZRD XFCSST 

BAR '/.CALL S.LODB 
XCDPP S.LODB 

A BUFFER CTL BLK 
ECKED FOR AFTER THE 
N.BAR 5JCALL S.LD17 
N, BAR 7.CALL S . LD1 I 



N.BAR 7.CN2R0 S.LD17 

NG ENABLED *•» 

'/.CALL CLOGS 

%CALL D.LOHD 

V.CALL D.SLBN 

N.BAR '/.CALL S.LD14 



RESET SERDES ENABLE/CLEAR UOA RTCS 
SAVE R17 IN CASE DM MODE 
IF IN DM MODE 

THEN RETURN/RESET ECC ENABLE 
GET POINTER TO SOI CTL BLOCK 

IF REPLACE TIMEOUT THEN RESTORE DBAR PROPERLV 
DOR BUT IT MAY NOT BE CORRECT - 
NEXT BUFFER CTL BLK HAS BEEN CHAINED TO 
[U52EC21REST0RE BUFFER CNTL BLK PTR FROM SOI. OB 
(US2EC21R11 'EXTENDED STATUS 
[U52EC21IF U.PROC RETRV READ, 
; [US2EC21 THEN RESTORE R17 FROM SDI.UB 



R1 1 ,R14 
#<SUSP+OERR«X 
#SDI ,EO,0BAR\ 
#I0CNT,R1 1 
OIORTY , R1 1 
#I0CNT,R14 
R 14, BUF 
#I0CLK,R14 
#V . ERROSLOBYT 
#V . INITSLOBYT 
#SDI .SV,OBAR\ 



%CNMSB O.GGRP 
CMP> ,R12 
N.BAR '/.CALL S . LD1 1 

XJNZRO O.HCED 

%TNZRO 

%CALL O.CLRS 

,R1 I %J2R0 0. IOEA 

,R1 1 

N, BAR '/.CALL S .ST1 1 
%CALL D.TIMR 
7.JMP D . IDLE 



RESTORE BUF. HL/BUF . HH FROM P . BUF2/P . BUF3 

AOD #SDI . PQ,OBAR\N,BAR XCALL S.LD11 

ADD #SOI . RL ,DBAR\N, BAR '/.CALL S.L0I4 

ADD #BUF . HL , R17\N , BAR '/.CALL S.ST14 

ADD #SDI . RH, DBAR\N , BAR '/.CALL S.L014 

AOD #BUF. HH,R17\N, BAR T.JMP S.ST14 

. PAGE 



[U52EC21G0 CHECK IF LOGGING ENABLED 

[EC0#21SAVE R14,R13/R14=L0/HI LBN 

[US2EC2 ! [ EC0V21SAVE LBN/2NDARY RBN IN P.BUF2/3 

(EC0#21R13:BUFFER SERVICE FLAG 

(US2EC2)R14:SDI STATUS 

IU52EC21MAKE SURE MSB 

IU52EC2 jOON'T RESET GROUP IF REVECTORING ACTIVE 

[US2EC2] [EC0#21 [EC0#1 1REST0RE RI4 FROM R11 

RI2=FLAGS TO SET 

R11»I/0 RETRY STATE 

IF 2ND TIME AROUND 

[U52EC21IF 1ST TIME AROUNO 

THEN SET LAST INDICATOR 
SET UP I/O RETRY WORO/GO CLR 8FSV FLAG (R13) 
IF INIT NOT REQUIREO 

IU52EC11THEN GO START I/O RECOVERY (WITHOUT INIT) 
[U52EC1IELSE GO START I/O RECOVERY (WITH INIT) 
[U52EC11SAVE STATE VECTOR 
[U52EC1ISET SUSP S VECT/START TIMER 
(U52EC11G0 IDLE 



(U52EC21 ELSE RI1>MSCP FKT PTR 
IQDA] [U52EC2 JR14.L0 SAVEO ORIG LBN 
IU52EC2JREST0RE ORIG LO LBN TO BUF.HL 
(00A1 [U52EC2]R14tHI SAVED ORIG LBN 
IU52EC2IREST0RE ORIG HI LBN TO BUF . HH/RETURN 
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O.PROC WRITE ROUTINE («»« NEW SDI TIMING «**) 



ROUTINE NAME : 

O.IOPW (I/O SETUP FOR WRITE COMMAND) 
O.IOPR (I/O SETUP FOR READ COMMAND) 



FUNCTIONAL DESCRIPTION: 

D.IOPW WILL AOJUST THE OATA PREAMBLE (DMREG4) ACCORDING TO THE 
SPEED OF THE DRIVE AND FALL INTO D.IOPR. 

D.IOPR WILL SET THE HEADER COMPARE SEARCH LIMIT (HDLMT), SET 
WORDS TO TRANSFER IN R16, LOAD DBAR TO POINT TO THE START OF THE DATA 
BUFFER, AND TEST BUF.NL FOR GROUP SELECT NEEDED (BGRUP). 



INPUTS : 

DBAR 

R17 

0MREG4 

OUTPUTS: 

DBAR 
DMREG4 
HDLMT 
R1 1 



POINTER TO SOI CONTROL BLOCK 

POINTER TO CURRENT SECTOR BUFFER 

DATA PREAMBLE SIZE FROM DRIVE CHARACTERISTICS (D.IOPW) 



POINTER TO START OF DATA FOR THIS TRANSFER 
ADJUSTED FOR FUDGE AND WORDS IN SERDES 
HEADER COMPARE SEARCH LIMIT 



; 1E121 1 
; [E121 1 



O02465 
0024S6 
002467 
002470 
002471 
002472 
002473 
002474 



013740 
13I5S6 
010SS7 
030552 
01374O 
03445 1 
010SS7 
010557 



0O7004 
000004 
007005 
0O7001 
007136 
0000 1 1 
007002 
007001 



133510 
123621 
133604 
133604 
133615 
OOOOOO 
1 23607 
137777 



D. IOPR: 



MOV 
SUB 
ADD 
ADD 
MOV 
CLR 
ADD 
AOD 



#DMREG4,BAR XCALL 
#4,R16 %CALL 

#BUF .SO, R17\N, BAR XCALL 
#SDI . SL, R12, BAR XCALL 
#HDLMT,BAR %CALL 
R1 1 

»BUF .BP, R17\N, BAR XCALL 
#BUF .ST, R17\N. BAR XRET 



LD1S 
ST16 
LD12 
LD12 
ST12 



RIGsDATA PREAMBLE 

IU52EC2) 1EC0#2!A0JUST FOR WORDS IN SERDES/RESET 

R12:P0INTER TO SOI CTRL BLK 

R12sHEADER COMPARE SEARCH LIMIT 

SET HEADER SEARCH LIMIT 

CLEAR R11 

OBARsPOINTER TO START OF SECTOR OATA 

[I6K)BAR:PTR TO BUF. ST 
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ROUTINE NAME: 
0. BFCK 



FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL CHECK THE BUFFER STATUS OF THE 
CURRENT O.PROC BUFFER ANO WILL LOAD DMREG3 AND 0MREG4 WITH 
THE HEADER ANO DATA PREAMBLES. 



INPUTS : 



OBAR 



POINTS TO THE ACTIVE SOI CONTROL BLOCK 



OUTPUTS: 

CONDITION CODE 

0MREG3 

DMREG4 

Rl 3 

Rl 2 

Rl 1 

Rl 7 

Rl S 



Q 
< 


O0247 5 


010555 


0O7OO7 


12361 1 


002476 


OI05S7 


0O700O 


133610 


002477 


034453 


000013 


122502 


0O25OO 


033752 


00014O 


133572 


O 

II 


002501 


1 14556 


000 10O 


137777 


O 

U. 


002502 


010555 


00707O 


1 33604 


002503 


01 3740 


007004 


OOOOOO 


002504 


014552 


003377 


1 33575 


002505 


013740 


007003 


010000 


to 


002506 


034552 


003377 


137777 


o 










to 











- REFLECTS STATUS OF BIT »BFU L L , BUFFER STATUS 

HEADER PREAMBLE 

DATA PREAMBLE 



SUSP+BFSV 

SOI status word ( SO I . ST*OBAR I 

Points to buffer control block (SDI D3+D8AR) 

Buffar status word (BUF.ST*RI7I 



IE 121 1 


[E 121 1 


IE 121 ] 


IE 121 I 


IE121 ) 



BFCK: ADD »S D I . OB . DBAR\ N , BAR XCALL S.L017 

BFCA: ADD #BUF . N L , R 1 7\N , BAR XCALL S.LDI6 

CLR R13 XCALL D.GPRE 

MOV #<SUSP*BFSV> . R12 XCALL O.GMST 

BIT #BFULL,R16 XRET 



R17:CURRENT DPROC BUFFER AOOR 
R16=BUFFER STATUS 

GO GET HEADER AND DATA PREAMBLES 
R12=BITS TO SET IF BUFFER NOT RDV 
TEST BFULL BIT/RETURN 



ROUTINE TO GET HEADER AND DATA PREAMBLES INTO DMREG3 AND DMREG4 • » 



ADD 
MOV 
AND 
MOV 
AND 
. PAGE 



#SOI .OP, DBAR\N. BAR XCALL S.L012 

#DMREG4, BAR 

#LOBYT, R12\N. BUF XCALL S . SWAB 

#DMREG3, BAR 

#LOBVT, RI2, BUF XRET 



[V051 912. OATA (LO) 6 HEADER (HI) PREAMBLES 
BAR:DM REG 4 (HOLDS OATA PREAMBLE) 
STORE DATA PREAM6 L E /SWAP BYTES OF R12 
BARiOM REG 3 (HOLDS HEADER PREAMBLE) 
STORE HEADER PREAM3L E /RETURN 
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ROUTINE NAME: 

O.CPUL (CHECK PULSE) 

D.WSIG (WAIT FOR RECVR ROY * R/W ROV SIGNALS) 

FUNCTIONAL DESCRIPTION 

THIS ROUTINE WILL WAIT FOR THe REAL TIME DRIVE STATUS BITS PASSED 
IN RI1 TO GO UP AND THEN COME DOWN. 

INPUTS: 

R11 - DRIVE STATUS BITS TO CHECK (D.CPUL) 
R11 - TIMEOUT VALUE (D.WSIG) 

OUTPUTS: 

NONE (D.CPUL) 

CCODE = ERROR IN RECVR ROY OR R/W RDV (D.WSIG) 

STACK LEVEL: 

NONE USED 



*t — * 



002507 014S11 

002510 014511 

002511 014511 

002512 033711 



00O0O2 
1O0O2 
010002 
000002 



OOOOOO 
102510 
0025 1 1 
137777 



0025 13 
002514 
0025 14 
0025 15 
002S1S 
0O2516 
002S17 



013712 010002 167777 D.WSIG: 



031471 04O011 



031451 
013712 
034451 



0300 1 1 
010002 
0000 1 1 



177777 
12515 
127777 



BIT 


(RTDS) , Rl 1 




SIT 


(RTDS) , R1 1 


7.JZR0 


BIT 


(RTDS) , R11 


'/.JNZRO 


MOV 


(RTDS) , R1 1 


XRET 


MOV\F 


(RTDS) , R12\N 


%RZRO 


ASSUME 


DRDY,EQ,BITOO 




OEC\T 


R1 1 


'A J N L S B 


ASSUME 


RWROY , E0.8IT15 




OEC\F 


R1 1 


%RMSB 


MOV 


(RTDS) , R12\N 


7.JNZR0 


CLR 


R1 1 


7.RET 



CHECK DRIVE STATE FOR R11 FLAGS 
WAIT FOR IT TO RISE 
WAIT FOR IT TO FALL 
RUtORIVI STATE/RETURN 

[1SK1PUT RTDS ON BUS/RETURN IF ZERO 
I16K1MAKE SURE RECVR ROY IS LSB 
(16K1IF NO RECVR ROY THEN LOOP 
[16K1MAKE SURE R/W RDY IS MSB 
[16K1IF R/W THEN RETURN 
[16K1IF Rll NEO THEN LOOP 
[16K1CC00E = O/RETURN 



IE121 ] 
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002520 

002520 053754 

002521 033751 



D 
< 

a 

n 

5 

cc 
O 

u. 

V) 

o 

V) 



OO00O3 
O0006O 



002522 031456 O 1 00 1 6 

002523 01451 1 010002 

002524 015514 O100O2 



002525 031456 010016 

002526 014511 010002 

002527 015514 010002 



002530 031456 010016 

002531 031452 010012 

002532 015514 010002 

002533 033752 000264 

002534 15514 000002 



ROUTINE NAME: 

O.WSAF (WAIT FOR SAFE TIME TO ISSUE LEVEL 1 COMMAND) 

FUNCTIONAL DESCRIPTION: 

O.WSAF waits until the drive has Receiver Ready and Read/Write Ready 
asserted and is a comfortable distance from the next falling 
edge of Sector/Index Pulse. It is equivalent to O.WSIG 
followed by O.CPUL, but it is faster than that combination 
under certain circumstances encountered while spiralling. 



INPUTS : 



Count controlling how long to wait for Rcvr Rdy a R/W Rdy 



OUTPUTS : 

None - R1 1 , R12, R14, R16 destroyed 



10000 
1 12533 



102507 
102507 
102522 



102507 
102507 
002525 



137777 
102507 
012530 



ASSUME 

MOV\R 

MOV 



RWRDY.EO.BITIS 
#0RDY*2«1 , R14 
#SECt IOX , Rl I 



Set up mask for Rcvr Rdy a R/W Rdy 
Set up mask for Sector/Index Pulse 
and enter state machine 



This routine is divided into three states: 



State 1 
dr i ve i 
edge of 

DEC 
BIT 
BIC 

State 2 
we must 



* Sector/Index low, position within sector unknown. If the 
s ready to transfer here we must explicitly wait for a falling 
sector/index pulse. 



R1 6 

(RTDS ) ,R1 1 

(RTDS) ,R14\N 



7.JZR0 
XJZRO 

7.JZR0 



D. CPUL 
. CPUL 
10$ 



If drive ready, wait for edge 
If count expired, wait for edge 
Stay in State 1 until sector/index 



- Sector/Index high. If the drive is ready to transfer here 
explicitly wait for a falling edge of sector/index pulse. 



DEC 
BIT 
BIC 

State 3 
If dr iv 



R16 

(RTOS) , Rl 1 

(RTOS) . R14\N 



7.JZRQ D.CPUL 
SJZRO D.CPUL 
7.JNZR0 20$ 



If drive ready, wait for edge 
If count expired, wait for edge 
Stay in state 2 until sector/index 



- Sector/Index low, position known to be near start of sector, 
e becomes ready to transfer here we can proceed immediately. 



[E1 

IE1 

(E1 

[E1 

[E1 

[E1 

[E 1 

I E1 

[El 

E1 

E1 

E1 

El 

E1 

E1 

El 

El 

E1 

El 

E1 

E1 

E1 

E1 

E1 

El 

El 

El 

E1 

r i ses ; [ 
; [El 
E1 
El 
El 
E1 
El 

fal is: [ 
[El 
[El 



DEC 
DEC 
BIC 



R16 
R12 
(RTDS) , R14\N 

#1SO. , R12 

(RTOS) , R14\N 



7.RZR0 
7 o JZR0 
7. J N Z R 



D . CPUL 
30$ 



If drive ready, go for it! 

If count expired, wait for edge 

Stay in state 2 for "safe time" 

Safe time is about 190 uS , so 
safe loop ct is 190/(3*. 346) 
Enter loop in Hate 1 



21 ] 



22D1 



o 
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ROUTINE NAME: 

D.SGRP (SELECT GROUPI 
D.GRPC (GROUP CLEANUP) 

FUNCTIONAL DESCRIPTION: 

D.SGRP ROUTINE WILL ISSUE THE SELECT GROUP REAL TIME COMMAND. 
O.GRPC ROUTINE WILL CLEANUP AFTER THE SELECT GROUP COMMAND. 



POINTER TO BUFFER CONTROL AREA 



OUTPUTS: 

R12 IS DESTROYED 
Rtt IS ZEROED 



002535 013440 OOOOOO 132544 D.SGRP: 
002535 133552 000215 101212 



002537 
002540 
002540 
002541 
002542 
002543 



133752 000002 10000 O.GRPC: 



013712 
031452 
033712 
035552 



002544 010557 

002545 034552 
00254S 010S57 
002547 030551 



010002 
030012 
000003 
00300 1 

00701 1 
000377 
00700$ 
00701 3 



1 12542 
1 12540 
OOOOOO 
1007O1 

133504 
OIOOOO 
123503 
103615 



BIS 

MOV 

ASSUME 

MOV 

DEC 

MOV 

BIC 

ADO 
AND 
ADO 
ADO 

. PAGE 



#SGRPCD,R12 7.JMP 

#1000, R12 
RWRDY.E0.BIT15 
(RTDS),R12\N '/.JZRO 
R12 SJMSB 

(BUF) , R12 
#BGRUP,R12,BUF %JMP 



20$ 
10$ 



D . IDLE 



#BUF . GP,R17\N, BAR %CALL S.LDI2 

#L0BYT,R12 

#BUF .SD,R17\N, BAR XCALL S.L011 

#SDI . GP.R1 1 , BAR %JMP S.STI2 



GO GET/RESET GROUP NUMBER 

OR IN SELECT GROUP OP CODE/SEND REAL TIME CMD/RET 



Sat up count for loop 
[EC0*21MAKE SURE R/W ROY IS MSB 
[EC0#21WAIT FOR R/W ROY TO GO AWAY 

[ EC0#2 ]R1 2=STATUS 

[EC0#2]CLEAR SELECT GROUP FLAG/GO IDLE 

[ BDA) R12sTHIS BUFFER'S GROUP 
ISOLATE GROUP 
R11-5DI CNTRL BLK PTR 
UPDATE GROUP/RETURN 



[E121 
[E121 
[E121 
(El 2 1 
[E121 
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< 

3 
O 

ii 

I 
tr 
O 

u. 

V> 

o 



002550 

002551 



002553 
002553 



o 



002554 
002555 
002556 

002557 
OO2560 
002561 
002562 
002563 

KOBDP 



021352 

013740 



10601 I 
017202 



052550 
042550 



033751 007004 OIOOOO 



013440 
021351 
033753 

014440 
034452 
03371 1 
13155 1 
031453 



106013 
106014 
010002 

106012 
106012 
100503 
000004 
010653 



052554 
0S2S55 
OS2S54 

052557 

052560 
042561 
O lOOOO 
012563 



ROUTINE NAMES: 

D.WHDR (WRITE HEADER PREAM8 L E , S YNC , 4 COPIES OF HEADER) 
D.WDAT (WRITE DATA PREAMBLE , SYNC , R 1 6 WORDS OF DATA) 

FUNCTIONAL DESCRIPTION: 

ROUTINE D.WHOR IS USED TO REWRITE THE HEADER AREA OF A SECTOR 
AND INCLUDES THE WRITING OF THE HEADER PREAMBLE, HEADER SYNC, FOUR 
COPIES OF THE HEADER, GAP, AND SPLICE WORDS. IT WILL FLOW INTO 
ROUTINE D.WDAT AND PROVIDE CORRECT TIMING TO FINISH WRITING THE 
SECTOR DATA. IT WILL BE USED BY THE FORMAT XFC AND THE ROUTINE THAT 
HANDLES THE 'MSCP' REPLACE COMMAND. 

ROUTINE D.WDAT IS USED TO WRITE A SECTOR'S DATA AREA AND 
INCLUDES THE WRITING OF THE OATA PREAMBLE, DATA SYNC. AND OATA . 
IT WILL BE USED BY THE D.WHOR AND D.WRT ROUTINES. 



INPUTS : 



OUTPUTS : 

D WHOR, D WDAT 



WRITE GATE SET 

PSCMO MODE 

R1 1 s 

R12 : NUMBER OF WORDS IN HEADER PREAMBLE 

R13 = LO DESIRED HEADER 

R14 - HI DESIRED HEAOER 

WRITE GATE SET 

ECC RESET (PRECC) 

DMREG4 = # WORDS IN DATA PREAMBLE 

R16 » # WORDS TO TRANSFER 

DBAR s POINTER TO DATA BUFFER 



ECC TIMING SET ANO OATA AS DESCRIBED ABOVE 



002552 013700 106003 052552 D.WHDA: 



WRITE HEAOER PREAMBLE - 
DECB\F R1 1 \0, R12.S0 
MOV\F #SYNC,BAR 
WRITE HEADER SYNC «*• 
MOV\F (BUF).SD 
WRITE HEADER (R13.R14) • 
ASSUME 0MREG4.EO.4 
MOV #0MREG4 , R1 1 , BAR 



R12 WORDS OF ZEROES «» 



SJNDCIK D.WHDR 
•/.JNZRO D.WHDR 



•'.JNDCLK D.WHDA 
TIMES •■** 



D . WH D B : 
. WH D C : 



MOV\F 

DECBXF 

MOV\F 



R13.SD 

R 1 4 \ , R 1 I , S D 

#2, R13 



7.JNDCLK 
%JNDCLK 

7.JNZRD 



.WHO 8 
D .WHOC 
D.WHDB 



[I6K1WHEN DRV CLK. ZAP SERDES/DECR R12 
(EC0*2]D0 R12 TIMES/POINT AT SYNC WORD 

OUTPUT HEADER SYNC 

MAKE SURE DMREG4s4 

R1 1 »4/BAR»PTR TO DATA PREAMBLE SIZE 

*** PLEASE NOTE THAT DMR£G4:4 AND 

R11 (HEAOER LOOP COUNT) IS 4 

OUTPUT LO HEAOER WORD 

OUTPUT HI HEADER WORD 

1EERREC1 ( 16KIWRITE 4 COPIES 



WRITE GAP, SPLICE, AND DATA PREAMBLE USING WORD COUNT IN R11 »«»■ 



CLR\F 

CLR\F 

MOV\F 

SUB 

DEC 



R12.SD 
R12,R12,SD 
(BUF) , R1 1 IPRSE 



%JNOCLK 
7.JN0CLK 
XJNDCLK 



[16K1WHEN DRV CLK, S0=O 
I16K1WHEN DRV CLK, SD:0 
[15K1WHEN DRV CLK, RESET SERDES 
[18KIA0JUST DATA PREAMBLE 
[1BK1WAIT 6 CYCLES, RESET CMO MOOE 
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002564 
002S65 
002566 

002566 
002567 

002570 

002571 



002573 
002574 
002S7S 



002576 
002577 



013740 
01371 1 



013760 
013440 



0213S1 
013740 



0334S3 
03 131 6 
130455 



014440 
013440 



007260 
000002 



O330O1 
OOO70O 



10S652 
O17202 



OOOOOO 
OOOOOO 



052567 
O 10000 



OS2S70 
OS2S70 



MOV #REPSTA,BAR 

MOV ( RTOS) ,R1 1\N 

ASSUME RWRDY, EQ.BIT15 

MOVVT #1 ,BUF STNMSB 

NOP (PSSE 

ENTRY POINT FOR WRITE ROUTINE «** 

DECBNF R12\0,R11,S0 IFRCMD 7.JN0CLK O.WDAT; WHEN DRV CL K , SO < 0/OECR R11/RESET COMMAND MOOE 



[EERREC1GET REPLACE STATUS AREA 
(EERR6C1GET REAL TIME DRIVE STATE 
[EERREC1MAKE SURE READ/WRITE READY IS BIT 15 
[EERREC1IF RWRDY NOT UP THEN FLAG AS A POTENTIAL 
[ 1 6KUNA6LS SEROES 



106743 042S72 O.WOTB 



MOV\F VSVNCBAR 
WRITE DATA SYNC *•* 
MOV\F (BUF) ,SD (PSECC 



%JNZRO D.WDAT 
%JNDCLK D.WDTB 



DO IT R1 I TIMES 



OUTPUT DATA SYNC 



o 



0070 1S 
106003 
017015 



106012 
OOOOOO 



OOOOOO 
042574 
012S7* 



OS2576 
127777 



OUTPUT DATA BUFFER (256 WORDS) ANO EDC (1 WORD) «** 



[ 1 6K1R13 , BAR=BUFFER ADDRESS 
WHEN DRV CLK OUTPUT OATA WORO 
INCR OBAR/LOOP 2S7 TIMES 



MOV DBAR.R13.BAR 

DECBVF (BUF), RIB. SD 7.JN0CLK O.WDTC 

INC DBAR.DBAR.BAR %JN2R0 O.WDTC 

LET SERDES OUTPUT 17 ECC RESIDUES AND SET FOR NEXT SECTOR 

17 ECC SYMBOLS ARE OUTPUT IN 11 DCLKS FROM START OF JPSECCT 

CLR\F R12.SD XJNOCLK D.WOTD ; SO » ECC# 1 ( 2S8 ) 

NOP XRET j [16K1RETURN 

. PAGE 
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.SBTTL D.PROC READ ROUTINE (*«« NEW SDI TIMING *»») 
:+ 02-MAY-S3 UDAS2 MICROCODE 

ROUTINE NAME : 
DREAD 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL READ OATA FROM THE DISK INTO SUFFERS ASSIGNED 
TO THE SDI INTERCONNECT CONTROL BLOCK. 



POINTER TO CURRENT SOI CONTROL BLOCK 



OUTPUTS: 

BUFFERS FILLED WITH OATA FROM DISK 
ALL D.PROC REGISTERS ARE USED 



002600 
002601 

002602 
002602 
002603 
002604 

002S05 

002606 
002607 
002610 
00261 1 
002612 
002613 
002614 
002614 
00261S 
002616 
002617 

002620 
002621 

002622 
002623 

002624 
002624 
00262S 
002626 
0O2627 
002630 
002631 
002632 



013440 
013451 



033551 
0105SS 

133544 
037156 

033751 
010557 
01 3440 
030577 
013740 
033714 

01O577 
013440 
010557 
013712 

033712 
030577 

013440 
03371 1 



1 14544 
050 1 44 
010557 
033715 
010555 
033552 
010S57 



OOOOOO 

0106 11 



043 100 
007006 
01O2OO 

0000 16 

000002 
17002 
OOOOOO 
010002 
005001 
000523 

047O0S 
OOOOOO 
017001 
000002 

000443 
17002 

000500 
010S22 



O3O10O 
10004 
027006 
000003 
007000 
003 100 
00700S 



1 32475 
012310 



152305 
1 33603 
1 10701 
122S20 

122513 
102333 
123006 
1S2S70 
122467 
OIOOOO 

142620 
132535 
012335 
1 12537 

123014 
152633 

133064 
042352 



002342 
052632 
042632 
OIOOOO 
123604 
123570 
1 12620 



NOP 

TST 

ALERT 

ASSUME 

BIS\F 

ADD 

BIS 

XNOR 

FIRST 

MOV 

ADD 

NOP 

AOD\T 

MOV 

MOV 

ASSUME 

ADD\T 

NOP 

ADD 

MOV 

R12 = 

MOV 

AOO\T 

NOP 
MOV\F 

ASSUME 

BIT 

ADD\RF 

AOD\F 

MOV 

ADD 

BIS 

AOO 



R1 1 
PROC 
PKIP 
#BFS 
#SDI 
#PLO 
R16, 
ACQUIRE A BUFFER 
#2,R1 1 
#BUF. BP. R17\N.B 



FOR 

, EQ. 

SV , R1 

I . U8 , 
OCK.R 
, R16 



ffRDPF 

POTENT 
BI TOO 
1 .BUF 
DBARXN, 
LL 



#BUF 
#CON 
(BUF 
BGRU 
#BUF 

#BUF 
(RTO 
REAL T 
(BUF 
#BUF 



BP. 
T,RT 
I ,R1 
P. EO 

TA, 

ST, 
S),R 
IME 
) ,R1 

. BP, 



R17 
CS 

4 0>SWM 

BITOO 

R17\N,B 

R17\N.B 
12\N 
COMMAND 
2 PSCMO 
R17, BAR 



%CALL 

%JNZRO 

IAL FULL 

%JNLSB 
BAR %CALL 

'/.JZRO 

%CALL 
IF NEEDED 

XCALL 
AR XJZRO 

•'.CALL 

%JZRO 

%CALL 



0. BFCK 
. NOBF 
BUFFERS 

0. IOEX 
S . LD1 1 

D . IDLE 

D.WSAF 
t 1 SKI * 

. WS I G 

D.RRWE 

D.ALBF 

D.RNBF 

0. IOPR 



GO CHECK SUFFER STATUS 
MAKE SURE PKT ACTIVE 



AR %JNLSB 

7.CALL 
AR %JNZRO 

%JMP 

■ GO DO 

%CALL 

'.JZRO 



(PRSE %CALL 

(RT0SI.R11 G>SWM 7.JN2R0 



D.REDC 
D.SGRP 

D.RRDE 
D.GRPC 
HEADER 
HDRCMP 
O.REOE 

HDRANL 
O.HCER 



RWROY.EQ, BIT15 

#0M00E,RLL %JNMSB D.LRER 

RLL.RLL 7.JNZR0 D.RED1 

#BUF .SO, R17\N,BAR "/.JNCRY D.RE01 

(BUF) ,DBAR 

#SDI .ST, DBARXN, BAR '/.CALL S.LD12 

#BFSV , R1 2 , BUF XCALL UNLOCK 

#BUF. TA, R17\N,BAR XJMP O.REDC 



MAKE 
REQU 
[U52 
[U52 
Wait 

[ECO 
[ 16K 
IU52 
(U52 
I U52 
I 16K 
[ 16K 
( 16K 
( 16K 
[ 16K 
I 16K 
COMPARE 
[ 16K 
I 16K 
«« N 
RESE 
(ECO 
(ECO 
MAKE 
[EER 
IF U 
TH 
EL 
R12: 
RESE 
UNLO 



; [E121 ) 



SURE PKIP IS LSB 
EST BUFFER SERVICE 
EC 1 ] R 1 1 au . PROC BUFFER PTR 
EC1JIF EQ THEN SKIP READ/UNLOCK U.PROC 

for it to be safe to xfer ;[E121] 

#21G0 WAIT FOR DRIVE SIGNALS 

]IF ERROR THEN GO FIND OUT WHICH ONE 

EC21G0 ATTEMPT BUFFER ALLOCATION 

EC2IIF NO BUFFER THEN GET OUT 

EC2IG0 PREPARE FOR I/O 

]R14=BUF .ST/SET WRITE MODE 

1MAKE SURE BGRUP IS LSB 

IIF NO GROUP SELECT THEN CONTINUE 

1G0 ISSUE SELECT GROUP CMD 

IIF NEQ O THEN SELECT GROUP ERROR 

100 GROUP CLEANUP 

*** 
1R12:RTC,SET CMD MODE. GO 00 HEADER COMPARE 
IIF MATCH THEN CONTINUE 12) ; [EI21] 

OTE R17 IS MODIFIED HERE! ;IE12lj 

SERDES ENABLE/GO DO HEADER ANAL YS I S ; [ E 1 2 1 
#2] IF HEADER COMPARE ERROR THEN GO DISPATCH 
#21R11:DRIVE STATE 

SURE RWRDY IS MSB 
REC1IF NOT HI THEN ERROR/IF IN DM MODE 

PROC LOCKING 
EN CONTINUE 

SE DBARsSDI CONTROL BLK PTR 
SDI STATUS 

! STATUS/UNLOCK U.PROC 
. PROC/CONTINUE 



KDB50. MICROCODE. .22-APR-19S6 1 1 : 27 ; 16.96 



KDBDP DIGITAL EQUIPMENT CORP., 

O.PROC READ ROUTINE (*** NEW SOI TIMING 



2901 ASSEMBLER VERSION 32 



PAGE ISO 



002633 
002634 
00263S 
002636 
002637 
002640 

00264 1 
002642 
002643 
002643 
002644 
002645 
002646 
O02647 
002650 
002651 
002652 

002653 
002654 

002655 
002656 
002657 

002660 
00266 1 
002662 
002663 
002664 

002665 
002665 
002666 
002667 

002670 
002671 
002672 



033715 
025564 
013440 
01 3440 
033715 
021344 

013740 
033751 

021357 
013440 
021357 
03375 1 
013740 
03371 6 
010557 
02 1356 

013740 
013740 
033751 
013440 
033716 
021356 
033751 
025544 
033715 
021344 



021357 
010557 
021357 

130444 
131557 
013440 



000503 
017001 
000000 
007017 
040003 
017017 

005001 
1 15005 

1 1501 1 
0O3O15 
1 ISO 1 1 
000340 
1 17002 
000003 
00700S 
0077SS 

007002 
005001 
1 15005 
1 1501 1 
000003 
1 1501 1 
000340 
1 17001 
040003 
017017 



003015 
0O70O5 
0077S5 

000004 
000002 
000000 



010000 
142637 
OOOOOO 

1 12641 
152653 
152670 

010000 
0S2642 

052643 
010000 
052645 
OOOOOO 
042647 
1OO0O 
123605 
102673 

OOOOOO 
010000 
052655 
042 65 6 
01000O 
0S266O 
OOOOOO 
052662 
152671 
152670 



010000 
123605 
1 12673 

OOOOOO 
123200 
1 10701 



. RNBF : 
D. RLF2 : 



DESIRE 
New c o 

MOV 

BIC\T 
NOP 
MOV 
MOV\F 

DECB\F 

MOV 

MOV\F 

ASSUME 

DECBXF 

MOV 

DECBXF 

MOV 

MOV\F 

MOV 

ADD 

DECB 

MOV 

MOV 

MOV\F 

MOV\F 

MOV 

DECBXF 

MOV 

8ICXF 

MOVXF 

DECBXF 

ASSUME 
DECS 
ADO 
DECB 

INC 
SUB 
NOP 



HEADER FOUND - 
de added 1/15/67 

(BUF) ,OBAR 
#1 , RLLXO , BAR 

R17, BAR 
(BUF) , DBAR 
R17X0.RLL .BAR 

#CONT,RTCS 

#<CONT+RD> ,R1 1 

BUF . BP.EO, 2 

R1 IX0.R17, RTCS 

OBAR, BUF 

R1 I X0.R17, RTCS 

#340, R1 1 

#DMREG2,8AR 

(BUFI ,R16 

#BUF .SD, R17\N, I 

DBARXO , R 1 G , BAR 

S0MREG2 , BAR 

#C0NT, RTCS 

#<CONT+RD> , R1 1 . 

R1 1 . RTCS 

IBUF) , R1 6 

R1 1\0, R1 6, RTCS 

#340,R1 1 

#1 , RLLXO, BAR 

(BUF) , DBAR 

R17X0, RLL .BAR 

BUF . BP, EO, 2 
DBARXO, R17.BUF 
#BUF .SD- 1 ,R17X 
DBARXO. R17.BAR 

RLL , RLL 
#BUF .BP.R17 



SET UP FOR DATA S 

to a 1 1 ow two shot 

IPRSE 

%JZRO 1$ 

%JMP 2$ 

7.JNLSB 0.RLF1 

7.JZR0 O.RNBF 



RTCS %JNCSR . 

"iJNCSR 

7.JNCSR 

7.JNCSR 

AR %CALL S.LD13 
IPSECC %JMP . REDF 



RTCS 7.JNCSR 
7.JNCSR 



7.JNCSR 

7.JNLSB D.RLF2 

7.JZR0 D.RNBF 



N, BAR %CALL S . LD13 
IPSECC %JMP O.REDF 



YNC *** 

s at buffer 

see i f bu 
bp i f non 
buffer a 1 
and join 
br if fai 
br i f no 
and set u 
c 1 oar f pa 
wait fop 



wa i t 
St or 
wait 
set 
wa i t 
R16 
R13 
BARs 
and 
here 
c 1 ea 
wa i t 
wa i t 
R1 6 
wa i t 
R1 1 
wa i t 
bp i 
bp i 
and 



fop 
e buf 

fop 
R1 I 

fop 
- sec 

= SDI 

buf ad 

ent er 
on 

p " f p 
fop 
f OP 

a sec 

fOP 

« dat 

f OP 

f fai 
f no 

set u 



•/.CALL 
7.JMP 



D , ARTC 
. IDLE 



store buf 
R13 = ptp 
BARsbuf ad 
and enter 
No buffer 
Two- 1 ime 
go find s 



f ex 
ft 
read 
" got 
led. 
buff 
to 
me s 
l st 

2d f 

f er 

3d f 

or d 

4tn 

tor 
ct 1 
. P 
tn 

ock 

ante 

1st 

2d f 

top 

3d f 

a sy 

4th 

1 ed 

buf s 

p t o 

i n 



k - RL 

ists, kill SERO 
tpy fop lock 

y in place - st 
buffer" code 
e 1 se get buf f 

er s , else r e 1 ea 
store buf 

ent flag 

flag, set F 



ES 
al 1 

rom 1 i st 

se lock 
1 1 blk 



lg. s 
i n ct 
lg, f 
at a s 
fig, 
lengt 

blk 
redec 
nsf ep 
fai 1 
sent " 
fig, 
lg ft 
lengt 

'g. P 
nc t i 
fig, 
I aga i 
left 
st op 



c 1 ear f lag 
tart restoring R17 
or i ng R 1 7 
sect Ingt i 



1 blk 
i ni sh 
ync t i 
get ad 



rest e 

meout 

of 



Ptr 
r R16, 

code 
- get 

fig 
Set RG 
c leap 
h 
pedecp 

eout 
tpy fo 
n!) el 

e 1 se 
buf 



set 
adp 
. cl 



ECC mode 
of sect In 
ear f 1 g 



Rl 6 
ctr 
r 1 o 
se g 
rest 
i n c 



s - 
1 ose 
omet 



ct 1 blk, hal f -r 
SDI ct 1 blk 
estore R17, set 
a transfer code 
restore lock to 
rest ore R 1 7 
h i ng else to do 



ck again 
et buf 
ore lock 
t 1 blk 

estore R17 

ECC mode 

old value 
abort re 



1211 

1211 

1211 

1211 

1211 

1211 

1211 

1211 

121 ! 

121 I 

121 1 

1211 

1211 

1211 

1211 

1211 

E121 1 

1211 

1211 

1211 

1211 

121 1 

1211 

1211 

1211 

1211 

121 I 

121 1 

1211 

121 1 
= 121] 
= 1211 
11211 
5 121 ] 
•1211 
51211 
11211 
5121 1 

; 1E121 1 

1121 1 



**************************** *x************** * **.* *.******* 

The timing and subtlety of the follwoing code deserves* 

clar if i cat ion. * 

At D.REDF: a 1 instruction loop awaits * 

either the SERDES WRC going low or NCRY being 

as these two signals are compined into the te 

WRC condition. The reception of the SYNC is 

by SERDES WRC going low 7.5 bits after the 

received, for a duration of a. 5 bits. 

Therefore the SYNC detection will be 

guaranteed at transfer rates upto 24.4 Mbits/ 



ng ass 

t estmu 

i nd i 

SYNC i 



ert ed* 
x * 

cat ed* 
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KDBDP DIGITAL EOUIPMENT CORP., 

O.PROC READ ROUTINE (*** NEW SDI TIMING 



2901 ASSEMBLER VERSION 32 



* The code following that guarantees that the SERDES 

* will be read no less than every two instructions, so 

* this guarantees reception at transfer rates up to: 

* 346ns*2/1 6bit s = 43.5ns/bit s 22 . 9Mb i t s/sec 

* 
*****s*******x***x********s**************************** 



002673 


03 1331 


170706 


052673 


. REDF : 


DECBXT 


(SD) , Rl 1 ffSSE 


7.JNWRC 


REDF 










i * * * 


PLEASE 


NOTE THAT THE 6>S£CC AND IPSSE IOC 










; *** 


DATA SYNC FOUND **• 






002674 


031336 


1030O6 


152700 




DECBXT 


(SO) ,R1 6, BUF 


7.JDCLK 


REDH 


002675 


03 1 336 


103006 


1 52700 




DECBXT 


(SO), R 16, BUF 


7.JDCLK D 


REDH 


002676 


013440 


020000 


002341 




NOP 




7.JNCRY D 


DTER 


002677 


03 131 6 


1O30O6 


042677 


. REOG: 


DECBXF 


(SO) ,RI6. BUF 


7.JNDCLK 


REDG 


002700 


1 30455 


017015 


012677 


.REDH: 


INC 


OBAR, OBAR, BAR 


%JNZRO D 


REOG 










; *** 


IMPORTANT - SET ECC TIMING KPSECCT) WH.E 


002701 


130315 


103766 


052701 


.RED! : 


INCBXF 


(SO) .OBAR, BUF 


IPSECCT 7.JN0CLK 0. 


002702 


013440 


007015 


OOOOOO 




MOV 


DBAR .BAR 






002703 


013700 


103006 


052703 




MOVXF 


(SOI. BUF 


7.JNDCLK . 




002704 


010557 


007000 


OOOOOO 




ADO 


#BUF . NL , R17XN 


BAR 




002705 


01371 1 


100006 


052705 




MOVXF 


(SD) ,R1 1 XN 


7.JNDCLK . 




002706 


033456 


000017 


OOOOOO 




MOV 


R17 , Rl 6 






002707 


01371 1 


10O0O6 


042707 




MOVXF 


(SO) , Rl 1 XN 


7.JNDCLK . 




002710 


033717 


000003 


OOOOOO 




MOV 


(BUF 1 , R17 






0027 1 1 


013711 


100006 


0527 1 1 




MOVXF 


(SO) ,R1 1XN 


7.JNDCLK . 




002712 


010557 


007000 


OOOOOO 




ADO 


#BUF .NL , R17XN 


BAR 




002713 


013711 


100006 


042713 




MOVXF 


( S D ) , R 1 1 X N 


7.JNDCLK . 




0027 14 


033712 


000003 


OOOOOO 




MOV 


( BUF ) , R12 






002715 


01371 1 


100006 


042715 




MOVXF 


(SD) ,R1 1XN 


7.JNDCLK . 




002716 


036152 


00001 7 


O10000 




XOR 


R17, R12 






0027 1 7 


13 3 12 


100006 


042717 




TSTBXF 


(SD ) , RI2 


7.JN0CLK . 




002720 


037732 


010003 


042721 




COMXT 


1 BUF ) , R12 


7.TN2R0 




002721 


037312 


100006 


042721 




COMBXF 


(SD) ,R12 


7.JNDCLK . 




002722 


010553 


007001 


OOOOOO 




ADO 


#SDI .SL , R1 3XN 


BAR 




002723 


01371 1 


100006 


042723 




MOVXF 


(SD) ,R1 1XN 


7.JNDCLK . 




002724 


033714 


000003 


OOOOOO 




MOV 


[BUF ) , Rl 4 














; *** 


IMPORTANT - RESET ECC 


TIMING WHEN 


LOAOI 


O02725 


01371 1 


looses 


042725 




MOVXF 


(SDI.R1IXN IFRECCT 7.JN0CLK 




002726 


013740 


007136 


OOOOOO 




MOV 


#HDLMT , BAR 






002727 


03471 1 


100006 


052727 




CLRXF 


(SD ) , R1 1 


7.JNDCLK . 




O02730 


013440 


0O301 4 


OOOOOO 




MOV 


R1 4 , BUF 






002731 


03731 1 


100006 


OS2731 




COMBXF 


(SO) ,R1 1 


7.JNDCLK . 




002732 


013740 


1 65001 


1 12323 




MOV 


#CONT, RTCS 


7.JLATE 


OVER 


002733 


010556 


147000 


1 12327 




ADO 


#BUF.NL , R1 6XN 


BAR 7.J0SER . RTDE 


0O2734 


013712 


0OO0O2 


OOOOOO 




MOV 


IRTDS) , R12XN 






002735 










ASSUME 


ORDY , EO, BITOO 






O02735 


013712 


040002 


102735 




MOV 


IRTDS) . R12XN 


%JNLSB 




002736 










ASSUME 


RWROY , EO, BIT 1 5 




002736 


01371 1 


030507 


012342 




MOV 


(ECC1.R11XN IPRSE •4JNMSB 


LRER 


002737 


1 13577 


033 100 


152764 




BISXT 


#BFULL , R17XN, BUF 7.JMSB 


REDJ 










; * * * 


ECC ERROR RESIOUE PROCESSING (NOT 


REAL 


002740 


013740 


0O7010 


133615 




MOV 


#HEADER,BAR 


7.CALL S 


ST12 


KDBDP 




KDBSO. MICROCODE 


, 22-APR 


-1986 1 


: 27 : 1 6. 96 







; DECR R11/ENABLE SERDES/WAIT FOR WORD RATE CLK 
MUST BE ON CONSECUTIVE CYCLES *** 



N LOA 

REDI ; 

BA 



SA 
IN 
Rl 
IN 
BA 
IN 
Rl 
IN 
CH 
IN 
IF 
IN 
1 1 
IN 
[1 

NG WO 
IN 
[ 1 
I 1 
I 1 
[ 1 
[E 
IE 
IE 
IE 
(E 
IE 
IE 
IF 

TIME) 

: SA 



DRV CLK THE 

DRV CLK THE 

TIMEOUT THE 

NOT DRV CLK 

CR DBAR, BAR/ 

DING DATA WO 

INPUT WORD 

=PTR TO EOC 

PUT WORD 257 

R:PTR TO NEX 

PUT WORO 258 

VE R17 IN Rl 

PUT WORD 259 

7=PTR TO NEX 

PUT WORD 260 

PTR TO NEX 

PUT WORD 261 

2=NEXT BUFFE 

PUT WORD 262 

ECK FOR SI 

PUT WORD 263 

SINGLE BUFF 

PUT WORD 264 

6K)BAR:PTR T 

PUT WORD 265 

6K1R14:SEARC 

RO 26 6. •'»■« 

PUT WORD 266 

6K]BAR:PTR T 

6K1 INPUT WOR 

6K1ST0RE HEA 

6KJ INPUT WOR 

C0#2)DR0P RD 

C0#2]IF PARI 

C0#21PRINE R 

C0#21MAKE SU 

C0#2IWAIT FO 

C0#21MAKE SU 

ERREC 1 1 1 6K1 I 

NO ECC ERRO 

* * * 

VE R12 



N DATA TO BUF, DEC R16 
N DATA TO BUF, DEC R16 
N ERROR EXIT 

THEN WAIT/ELSE RD DATA/DECR R16 
INPUT WORDS 1 -255. 
RO 256. *** 
256..INCR DBAR. SET ECC TIMING 

AREA 
(EOC) 
BUFFER STATUS 



LINK/STATUS THIS BUFFER 

LINK'S STATUS 
R'S STATUS 
LE BUFFER RING 

ER THEN FORCE R 1 2 = I 77777 ( BFUL L ON) 
HEADER SEARCH LIMIT 
H LIMIT 

.RESET ECC TIMING 
HEADER LIMIT 
D 267 . . CLR Rl I 
OER LIMIT 
268 . , CMPL Rl 1 

GATE/IF SERDES OVERRUN THEN ERROR 
TY ERROR THEN PROCESS 
R WAIT LOOP 
RE RECVR ROY IS LS8 
R RR IN LINE FOR SPEEO 
RE R/W ROY IS MSB 

EC0»2IIF RW RDY UP THEN CONTINUE 
R THEN INDICATE BUFFER F UL L /CONT I NUE 



KDBDP DIGITAL EQUIPMENT CORP., 2901 ASSEMBLER VERS I ON 32 

D.PROC READ ROUTINE (*** NEW SOI TIMING *»») 



00274 1 


1 14544 


000100 


010000 




BIT 


002742 


Ol 0553 


01 7024 


1 33623 




ADO 


002743 


033767 


000006 


01 oooo 




MOV 


002744 


013440 


OOOOOO 


133002 


. RECC : 


NOP 


002745 


033452 


00O0 14 


123002 




MOV 


0O2746 


03375 1 


000012 


133574 




MOV 


002747 


033451 


000012 


01O0O0 




MOV 


0027SO 


134551 


000374 


123005 




AND 


0027S1 


033151 


003014 


123002 




OR 


002752 


033751 


0OO0 12 


133574 




MOV 


002753 


134552 


000374 


123005 




AND 


002754 


031457 


000017 


OOOOOO 




DEC 


002755 


033152 


013014 


002744 


; *** 


OR 
RESIOU 


002756 


033751 


000060 


132507 




MOV 


002757 


O13740 


007010 


133604 




MOV 


002760 


010556 


007001 


12361 1 




ADO 


002761 


133557 


003020 


OOOOOO 




SIS 


002762 


010556 


007000 


1336 1 1 




AOD 


002763 


1 13S57 


003100 


1 OOOO 


; * * * 


BIS 

UPOATE 


002764 










ASSUME 


002764 


010553 


037007 


102776 


. REOJ: 


ADD 


002765 


013440 


003537 


010000 




MOV 


002766 


050144 


000544 


OOOOOO 




AOD\R 


002767 


010553 


027000 


012773 




ADD 


002770 


03371 1 


0OO0O3 


OOOOOO 




MOV 


002771 










ASSUME 


002771 


033571 


043100 


042772 




BIS\T 


002772 


133544 


0O02OO 


otoooo 




BIS 


002773 


1 14552 


000 1 00 


oooooo 


.REDL : 


BIT 


002774 


0105S7 


01 7001 


112613 




ADD 


00277S 


033454 


000532 


102231 


D . REOM 


MOV 


002776 


010S53 


007024 


133606 


. REON: 


ADD 


002777 


1 1 4544 


0O0 100 


01 OOOO 




BIT 


OO30OO 


132454 


1 00 1 4 


123617 




NEG 


00300 1 


133S56 


000200 


1 12775 


; ** * 


BIS 

ECC RE 


O03002 


033714 


0OO627 


OOOOOO 


.GECC: 


MOV 


0O3003 


013440 


000420 


OOOOOO 




NOP 


003004 


135554 


000374 


137777 




BIC 



#OMODE, RLL 

#SDI . OE , R13\N. BAR %CZRO S.CLRB 

#6, R17 



R14, R12 
#10. , R1 1 
R12, R1 1 
#176000, R1 1 
R14, R1 1 .BUF 
#10. , R1 1 
#176000, R12 
R17 

R14.R12, BUF 
ES PACKED, SET 
#<SECttDX> ,R 
#HEADER, BAR 
#BUF .ST, R1 S\N 
#BECC,R17,BUF 
#BUF . NL , R16\N 
#BFULL , R17\N 
D. PROC DATA BU 
BLAST, EO, BIT1 
#SDI . DB,R13\N 
R17.BUF OPSWM 
RLL, RLL IPRECC 
#SDI .ST.R1 3\N 
(BUF) ,R1 1 
PKIP, E9.BIT00 
#BFSV,R1 1 , BUF 
#PL0CK,RLL 
#BFULL,R12 
#BUF .ST, R17\N 
R12.R14 CPRRM 
•SOI .OE, R13\N 
#DMODE, RLL 
R14, R14 
#BLAST, R1 6 



%CALL 

•/.CALL 
•/.CALL 

•/.CALL 
%CALL 
%CALL 

"/.CALL 

%JNZRO 
UP TO CONT 
1 %CALL 

"'.CALL 
.BAR '/.CALL 

.BAR 7.CALL 

BUF 

FFER POINT! 



. GECC 
. GECC 
S . ROTL 

0. SETS 
0. GECC 
S . ROTL 
.SETS 

D. RECC 
INUE «»» 
D. CPUL 
S. LD12 
S . LD17 



S . LD17 



, BAR 7.JMS6 O.REDN 



BAR 7.JNCRV O.REOL 



BAR %JZRO 

%JMP 
BAR 7.CALL 

%CZRO 
%JMP 



. REDB 
. IODN 
. LD14 

.ST14 
. REDM 



[U52EC1IIF NOT IN DM MODE 

EU52EC1) THEN DISABLE OVERLAP POSSIBILITY 

R17:L00P COUNT 

GET ECC RESIDUE 

GET ECC RESIDUE 

ADJUST 1ST RESIDUE SITS 0-5 LEFT 10 BITS 

SAVE RESULT IN R11 

ISOLATE UPPER 6 BITS/SET BAR 

PACK 1ST ENTRY/GET ECC RESIDUE 

AOJUST 1ST RESIDUE BITS 6-9 LEFT 10 BITS 

ISOLATE UPPER 6 BITS/SET BAR 

DECREMENT LOOP COUNTER 

PACK 2ND ENTRY/IF NOT ZERO THEN LOOP 

(EC0#2]RESYNCH TO SECTOR PULSE 

RESTORE R12 

[ 16K]R17=BUF.ST 

[ 16K] INDICATE ECC ERROR 

R17:STATUS 6 NEXT LINK 

[16K1SET FULL 

MAKE SURE BLAST IS MSB 

IF LAST BUFFER THEN DON'T RESET SOI. OB 
[EC0#2]ELSE RESET SDI.DB/SET WRITE MODE 
IEC0#21ATTEMP TO LOCK OUT U.PROC/RESET ECC 
IF LOCKED THEN CONTINUE 

ELSE R1 1 =SDI STATUS 
MAKE SURE PKIP IS LSB 

IF PKT ACTIVE THEN SET BUFFER SERVICE FLAG 
FREE U.PROC 
IF THIS BUFFER EMPTY 

(16K1THEN GO GET NEXT SECTOR 

ELSE DO I/O DONE PROCESSING 
[U52EC1 ]R14:0VERLAP ENABLE FLAG 
[U52EC11IF NOT IN OMODE 
IU52EC1] THEN NEGATE AND RESTORE 
SET BLAST IN RIB/FINISH UP 



o 



ECC RESIDUE PROCESSING ROUTINES 
(ECC) , R14 IPSRSGEN 

IPRRSGEN 
#176000, R14 %RET 



130455 007015 137777 D.SETB: INC 



DBAR.DBAR, BAR 7.RET 



R14<eCC RESIDUE/SET RSGEN 
THANKS CURT I /RESET RSGEN 
ISOLATE 10 BITS OF RESIDUE 

SET BAR, INCR DBAR, RETURN 



003006 


03371 6 


000003 


10000 


D .ALBF: 


MOV 


(BUF) ,R1 6 




003007 


013440 


010000 


077777 






NOP\F 




%RNZRO 


003010 


025544 


0O70O1 


OOOOOO 






BIC 


#1 ,RLL\0, BAR 




OO301 1 


033716 


04O003 


153010 






MOV\F 


(BUF) ,R1 6 


•/.JNLSB 


003012 


031444 


01O0O4 


167777 






OEC\F 


RLL , RLL 


7.RZR0 


KDBDP 




KOBSO. MICROCODE 


, 22 


APR 


-1968 1 


: 27 : 1 6 . 96 





D.PROC DATA BUFFER ALLOCATION ROUTINE *«* 

ENTER WITH BAR -> BUF . BP 

RETURN CCODE : ZERO IF NO BUFFER AVAILABLE, : NZERO IF BUFFER OBTAINED OR EXISTED 

NOTE !!! - IF RETURN CCODE i ZERO THEN RLL IS STILL LOCKED MM! Ml 

IU52EC21 [ 16K1R1 BsBUFFER ADDRESS 
[U52EC21 [ 16K1 IF GOT IT THEN CONTINUE 
IU52EC21 I 16K1 IF BUFFER LOCK CLEAR 

IUS2EC21 1 16K] THEN WAIT FOR IT 
(U52EC2) [ 16K1 IF NO BUFFER THEN EXIT 



\...y < 



KDBDP DIGITAL EQUIPMENT CORP., 2901 ASSEMBLER VERSION 32 

D.PROC READ ROUTINE (*** NEW SOI TIMING ***) 



003013 010557 007002 



ADD 
.PAGE 



#BUF.BP, R17\N, BAR 7.JMP S.ST16 



[U52EC21 I 16K1SAVE BUFFER POINTER 



'1 
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.SSTTL HEADER COMPARE AND ANALYSIS ROUTINES 
««» NEW SDI TIMING *»» 
;♦ 09-JULY-83 U0AS2 MICROCODE 
ROUTINE NAME: 
HORCMP 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE PERFORMS THE HEADER COMPARE FUNCTION FOR THE UDA. 
THIS IS THE PRIMARY MEANS OF ROTATIONAL POSITION SENSING FOR THE UOA . 
THE HEADER IS 32 SITS LONG AND IS REPLICATED 4 TIMES. THE HEADER COMPARE 
ALGORITHM USED IN THE UDA IS AS FOLLOWS: 

THE HEAOER IS TO BE BROKEN INTO TWO 16 BIT FIELDS (LOW AND HIGH). 
IF ANY THREE OF THE FOUR LOW FIELDS AS STORED ON THE DISK MATCHES THE LOW 
FIELD DESIRED, AND ANY TWO OF THE FOUR HIGH FIELDS AS STORED ON THE DISK 
MATCHES THE HIGH FIELD DESIRED, THE HEAOER COMPARE SUCCEEDS. 

INPUTS : 

WRITE MODE SET ( G>SWM ) 

COMMAND MODE SET (IPSCMD) 

R12 = REAL TIME COMMAND 

R17 = POINTER TO CURRENT SECTOR BUFFER 

THE ISSUING OF THE LEVEL O COMMAND IS SYNCHRONIZED WITH SECTOR/INDEX PULSE 

OUTPUTS : 

R13 AND R14 CONTAIN THE DESIRED HEADER 

R11 IS AN ERROR INDICATOR - ON RETURN R11*0 MEANS SUCCESS, 

R11>0 MEANS DRIVE CLOCK TIMEOUT, RIKO MEANS HEADER TIMEOUT 

R12 IS A PARTIAL MATCH INDICATOR - ONCE UPDATED BASED ON THE RETURNED 

CONDITION CODES (SEE BELOW), IF Rt2 « 210 « O THE HEADER READ FROM 

THE DISK IS THE DESIRED ONE, OTHERWISE IT IS NOT 

IF THE CONDITION CODES ON RETURN ARE ZERO THEN R12 SHOULD BE DECREMENTED BY 20 
TO YIELD THE FINAL MATCH I ND I CATOR , OTHERWISE R12 IS THE FINAL MATCH INDICATOR. 

WHENEVER R11 IS NON-ZERO UPON RETURN, R12 IS FORCED TO 177777. 



003014 
003015 
00301 S 
003017 
003020 
003021 
003021 
003022 



01 3740 
01 4512 
014512 
0145 12 
1 70456 

01 3740 
037752 



007202 133055 HDRCMP: 



100502 
010642 
010722 
00071 1 

OO7010 
1701 45 



#SYNC, BAR 



*/= C A L L 



05301 5 
10301 6 
013017 
133053 

000000 

1 13024 



3IT\F (RTDS),RI2 0>RSE 7.JNDCLK . 

BIT (RTDSI.RI2 PRCMD %JZRO 

SIT (RT0S),R12 8>SRM 7.JBZR0 

INC\L R11.R16 IFSSE XCALL O.LDHD 

ASSUME WRT.E0.2 

MOV #HEADER,BAR 

#145, R12 SJWRC HDRCME 



t16K)BAR=PTR TO SYNC/SEND RTC 
[16K1WHILE PUTTING SERDES IN READ MOOE 
[16K1WAIT FOR SECTOR/INDEX PULSE 
[16K1WAIT FOR SECTOR/INDEX TRAILING EDGE 
ENABLE SERDES, GET HEADER IN (R14.R13) 
R16 = 2 FOR WRITE GATE SET AT D.WRTC+1 
[EC0#21BAR*HI HEADER SAVE AREA 

[U52EC2] [EC0#2!R12=232( LO BYTE), ALL ONESIHI BYTE) 

BITS 



THE PREVIOUS COM SETS UP TWO FOUR BIT COUNTERS IN THE LOW BYTE OF R12. THE HIGH 

COUNTS THE HIGH HEAOER MATCHES AND THE LOW 4 BITS C0UNT5 THE LOW HEADER MATCHES. 

A MATCH IS MADE WHEN THE COUNTERS ARE DECREMENTED TO BE LESS THAN 8. THEREFORE 

EACH 4 BIT COUNTER IS INITIALLY SET TO 66 7 PLUS THE NUMBER OF MATCHES DESIRED TO SATISFY 

THE MATCH CRITERIA. CURRENTLY HI COUNTER : 9. AND LO COUNTER = 10. 



003023 
003024 



031572 
01 6533 



170377 
103006 



043023 
153030 



HORCMD 
HDRCME 



SUBC\T 
XOR\T 



#377. R12 

(SO) ,R13\N. BUF 



V.JNWRC 
%JOCLK 



HDRCMO 
L01A 



(EC0»2)WAIT FOR WORD RATE CLOCK 
(EC0#2]MATCH R13 TO 1ST LO F I E LO /T I MEOUT 
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003025 016533 103006 153030 



XOR\T (SO) ,R13\N,BUF XJOCLK L01A 



IEC0#21MATCH R13 TO 1ST LO FIELD/TIMEOUT 



003026 
003027 
003030 
003031 
003032 
003033 
003034 
003035 
003036 
003037 
003040 
O03041 
003042 
003043 
0O3044 
003045 
OO3046 
0O3047 



013440 
Ol 6513 
031472 
Ol 6514 
131572 
016513 
031472 
016514 
131572 
016513 
031472 
016514 
131572 
0165 13 
031472 
016514 
131572 
034552 



020O00 
103006 
10012 
103006 
010020 
103006 
10O12 
103006 
01OO2O 
103006 
010012 
103006 
010020 
103006 
01001 2 
103006 
010020 
O002 10 



0130SO 
053027 

153031 
053031 
153033 
053033 
143035 
043035 
143037 
043037 
143041 
043041 
1 43043 
043043 
1 53045 
053045 
153047 
137777 



L0 1 : 
L01A: 
HI 1 : 



NOP 

XOR\F 

DEC\T 

XOR\F 

SUB\T 

XOR\F 

DEC\T 

XOR\F 

SU8\T 

XOR\F 

DEC\T 

XOR\F 

SUB\T 

XOR\F 

DEC\T 

XOR\F 

SUB\T 

AND 



(SD) 
R12. 
(SO) 
#20, 
(SD) 
R12, 
(SD) 
#20, 
(SD) 
R12, 
(SD) 
#20, 
(SD) 
R12, 
(SO) 
#20, 
#210 



, R1 3\N, BUF 
R12 

,R14\N,BUF 
R12 

, R1 3\N , BUF 
R12 

,R14\N,BUF 
R12 

,R13\N,BUF 
R12 

,R14\N,BUF 
R12 

,R13\N,BUF 
R12 

,R14\N,BUF 
R12 
R12 



7.JNCRY 

7.JN0CLK 

XTZRO 

7.JNDCLK 

%TZRO 

7.JNDCLK 

5STZR0 

•/.JNDCLK 

XTZRO 

7.JNDCLK 

7.TZR0 

7.JN0CLK 

XTZRO 

•'.JNDCLK 

XTZRO 

'/.JNDCLK 

7.TZR0 

"/.RET 



[ECO# 
MATCH 
[ECO# 
MATCH 
IF MA 
MATCH 
IF MA 
MATCH 
IF MA 
MATCH 
IF MA 
MATCH 
IF MA 
MATCH 
IF MA 
[ 16K] 
[ 16K] 
[ 1 6K1 



2] INIT 

R13 TO 
2] IF MA 

R1 4 TO 
TCH THE 

R13 TO 
TCH THE 

R1 4 TO 
TCH THE 

R13 TO 
TCH THE 

R14 TO 
TCH THE 

R13 TO 
TCH THE 
MATCH R 
IF MATC 
CHECK F 



HI/LO 

1ST L 
TCH TH 

1ST H 
N MASS 

2ND L 
N MASS 

2ND H 
N MASS 

3RD L 
N MASS 

3RD H 
N MASS 

4TH L 
N MASS 
14 TO 
H THEN 
OR 2 L 



FIELO 

FIE 
EN MA 

1 FIE 
AGE I 
FIE 
ACE I 

FIE 
AGE I 

FIE 
AGE 

1 FIE 
AGE I 
FIE 
AGE I 
4TH H 

MASS 
0/2 H 



MATC 
LD/T I 
SSAGE 
LO/TI 
NDICA 
LO/T I 
NO I CA 
LD/TI 
NDICA 
LO/T I 
NOICA 
LD/TI 
NDICA 
LO/TI 
NDICA 
I FIE 
AGE I 
I/RET 



H INDICATOR 
MEOUT 

INDICATOR 
MEOUT 
TOR 
MEOUT 
TOR 
MEOUT 
TOR 
MEOUT 
TOR 
MEOUT 
TOR 
MEOUT 
TOR 

LD/TIMEOUT 
NDICATOR 
URN 



a 
< 

3 
O 

il 

s 
o 

u. 

w 
o 
w 



O03050 
00305 1 
003052 



003053 
003054 



003055 
00305S 
003057 
003060 
00306 1 
003062 
003063 



013440 000500 131270 HDRCMF 

037151 000531 10000 

037152 000452 127777 HDRCMG 



010S57 
010557 



013440 
01 3700 
01 3440 
01 4440 
01 3740 
034451 
033752 



007003 
007004 



070700 
106003 
10601 2 
10601 1 
007003 
10601 1 
000060 



123605 

1 03606 



003055 
083056 
053057 
053060 
10000 
053062 
137777 



; *** 

. LDHD: 



WORO RATE CLOCK TIMEOUT ERROR RECOVERY PROCEDURE »** 

NOP S>RSE '/.CALL D.CLCS ; RESET SERDES ENABLE/CLEAR CTLR STATE BITS 

XNOR R11.R11 (PSWM ; SET WRITE MODE 

XNOR R12.R12 IPSCMD '/.RET i SET COMMAND MODE/RETURN 



LOAD HEADER'S INTO R13.R14 *** 

ADD #BUF .HL , R17\N, BAR '/.CALL S.L013 

AOO #BUF .HH, R17\N, BAR %JMP S.L014 



RI3:L0 HEADER 

R14=HI HEADER/RETURN 



SENO REAL TIME COMMAND FOR READ , WR I TE , FORMAT OPERAT I ON ««» 



NOP 


BUI 


'/SJACLO 


MOV\F 


(BUF) ,SD 


XJNOCLK 


MOV\F 


R12,S0 


'/.JNDCLK 


CLR\F 


R1 1 ,SD 


XJNDCLK 


MOV 


#DMREG3, BAR 




CLR\F 


R1 1 , R1 1 ,SD 


%JNOCLK 


MOV 


#< IDX*SEC> , R12 


%RET 


. PAGE 







[16KIENABLE SEROES 

[16K10UTPUT SYNC TO SERDES 

[16K10UTPUT REAL TIME COMMAND 

I 1 6K1CLEAR SERDES 

[16K]BAR:PTR TO DMREG3 FOR FORMAT 

[16KJCLEAR SERDES ANO R11 

I 1 6K1RETURN 
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ROUTINE NAME: 
HDRANL 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL PERFORM HEADER MATCH FAILURE ANALYSIS. 
IF THE HEADER COMPARE PAILS AND THERE ARE AT LEAST TWO OUT OF FOUR 
LOW FIELD MATCHES THEN THE STORED HIGH FIELDS ARE EXAMINED FOR A CORRECT 
POSITION AND DIFFERING HEADER COOES (I.E. REVECTOR TO THIS TRACK, OR 
REVECTOR). THIS ANALYSIS IS PERFORMED DURING THE SECTOR TIME OF THE 
MATCH FAILING SECTOR. IF THE LOW ORDER HEAOER WORDS OIDN'T MATCH, THE 
HEADER IS CHECKED FOR INTERNAL CONSISTENCY AND THEN COMPAREO AGAINST THE 
DESIRED HEADER TO DETERMINE IF WE ARE ON THE RIGHT TRACK. IF WE ARE, THEN 
THE HEADER SEARCH LIMIT IS DECREMENTED. 






INPUTS : 



R1 1 

R12 

R13.R14 

R17 

DEAR 

FLAG 



ERROR INDICATOR FROM HDRCMP ROUTINE 

HEAOER MATCH INOtCATOR FROM HDRCMP ROUTINE 

OESIRED HEADER FROM HDRCMP ROUTINE 

BUFFER POINTER 

POINTS TO DATA PORTION OF BUFFER 

SET IF PRIMARY AND SECONDARY REVECTORING IS TO BE IGNORED (USED BY REPLACE) 



OUTPUTS : 
R1 
R1 

R1 



003064 


033456 


0000 14 


133200 


HORANL 


MOV 


R14.R1 6 


T.CALL 


. ARTC 


003065 


013451 


0000 1 1 


OOOOOO 




TST 


R1 1 






003066 


013440 


10000 


1 13103 




NOP 




%JZRO 


HDRANA 


003067 


0337S1 


0000 17 


132513 




MOV 


#15 . , R1 1 


•/.CALL 


. WS I G 


003070 


033771 


010002 


177777 




MOV\T 


#2 , R 1 1 


7.RZR0 





2.R16 USED AS TEMPORARY REGISTERS 

7 PRESERVED; DBAR PRESERVED IF R 1 1 = ON RETURN 

1 IS THE OUTPUT STATUS: 

R11«-1 ON TRACK BUT VERY FAR AWAY - RESCHEDULE 

R11*0 NO ERRORS, KEEP LOOKING 

Rll'1 1EC0#21N0T USEO 

R11<2 FAILURE IN ORIVE - RETRY SEQUENCE NECESSARY 

R11=3 SECONDARY REVECTORING REQUIRED 

RM»4 SEARCH LIMIT EXCEEDED - TERTIARY REVECTORING REQUIRED 

R11=S SPECIAL RETURN FOR REPLACE - ON TRACK NO ERRORS 

R11:6 HEAOER COMPARE ERROR ON XBN 

IN THE CASE OF PRIMARY OR TERTIARY REVECTORING, BUF.HL/HH ARE REPLACEO 
BY THE HEAOER OF THE 1ST REPLACEMENT BLOCK ON THIS TRACK AND THE SEARCH 
LIMIT IS RE- INITIALIZED; THE DESIRED LBN IS SAVED IN ( OLDLBN , OLO L BN +1 ). 

[16KISAVE HI HEADER/GO ABORT R/T COMMAND 

CHECK ERROR STATE WORD 

(16K1BRANCH IF NO ERRORS 

(16KIG0 WAIT FOR RCVR ROY & R/W ROY 

(16K1RETURN HARD ERROR IF SOMETHING IS WRONG 

ELSE TREAT AS A MISSED HEADER 

COME HERE IF EVERYTHING LOOKS OK BUT THE HEADER DOESN'T MATCH (OR DIDN'T READ) 



00307 1 


010557 


007O02 


123607 


HORNOM: 


ADD 


003072 


013740 


007136 


123603 




MOV 


003073 


031 471 


1001 1 


063614 




DEC\T 



#BUF.SP,R17\N,BAR %CALL S.LDOB 
#HOLMT,BAR 7.CALL S.L011 
R1 1 ,R1 1 %CNZRO S.SI1I 



DATA BUFFER POINTER 

GET SEARCH COUNT 

[ U52EC21DECREMENT IT AND STORE IT BACK 
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003074 
003075 
OO3076 
003077 
003100 
003101 
003102 



034451 
010557 
134551 
033751 
I 14544 
013451 
033751 



01001 1 
O07OO4 
000360 
010004 
000 100 
01001 1 
000006 



027777 
133S03 
OOOOOO 
137777 
01OO00 
027777 
137777 



CLR 


R1 1 


7.RNZR0 




ADD 


#BUF. HH,R17\N 


BAR %CALL 


S 


AND 


#HDC0D,R1 1 






MOV 


#4 , R1 1 


%RZRO 




BIT 


#OMODE,RLL 






TST 


R1 1 


%RNZRO 




MOV 


#S, R1 1 


%RET 





RETURN OK IF LIMIT NOT REACHED 

GET HIGH DESIRED HEAOER WORD 

ISOLATE HEAOER TYPE 

IF LBN SET TERTIARY REVECT FLAG AND RETURN 

[ 16K1 IF IN DM MODE 

THEN SET TERTIARY REVECT 

ELSE MUST BE FCT OR RBN HEADER 



COME HERE TO ANALYZE A HEADER WE READ 



003 103 


0334S4 


0000 16 


OOOOOO HDRANA: MOV 


R16.R14 






003 1 04 


014552 


000O10 


010000 


BIT 


#10,R12 






003 105 


1 14554 


O10360 


013121 


BIT 


#HDC00,R14 


%JN2R0 


HDRANB 


003 1 06 


138554 


01O1 20 


013121 


XOR 


#RBNPRM, R1 4 


7.JNZR0 


HDRANB 


O03107 


033751 


060035 


023246 


MOV 


#35, R1 1 


%CNOPF 


HDRCKH 


003 1 10 


136554 


010140 


1 13210 


XOR 


#RBNX0R,R14 


■/.JZRO 


RBNPRI 


003 1 1 1 


033751 


060035 


023246 


MOV 


#35, R1 1 


■/.CNDPF 


HDRCKH 


003 1 12 


033771 


0I0O03 


167777 


MOV\T 


#3, R1 1 


7.RZR0 




003 1 13 


1365S4 


000240 


010000 


XOR 


#H1 1 XOR, R1 4 






003 1 14 


033751 


060035 


023246 


MOV 


#35, R1 1 


%CNDPF 


HDRCKH 


003 1 15 


013440 


010000 


01 307 1 


NOP 




%JNZRO 


HDRNOM 


003 1 16 


013740 


007136 


133623 


MOV 


#HDLMT,BAR 


%CALL 


S CUB 


0O3 1 17 


10557 


007001 


133603 


ADO 


#BUF.ST,R17\N, 


BAR %CALL 


S. LD1 1 


003 120 


133551 


003010 


1 1 3071 


BIS 


#BGOOO, R1 1 , BUF 


%JMP 


HORNOM 



RESTORE HI HEAOER 

DID LOW-ORDER MATCH? 

IF SO, CHECK OESIRED HEAOER TYPE 

IF NOT LSN, FORGET REVECTORING 

CHECK FOR PRIMARY REVECT (IF ENABLED) 

IF PRIMARY, GO DO IT NOW... 

NOW CHECK FOR 2DARY REVECT (IF ENABLED) 

IF SO, RETURN SPECIAL CODE. 

[U52EC2]R14:BAD HEADER COOE 

[U52EC2JN0W CHECK FOR BAD HDR CODE 

[U52EC21IF NO MATCH GO AWAY 

IU52EC2] HOR CODE 11 FAKES NOT FOUND 

(U52EC2) BUT SETS "ON-TRACK" FLAG 

(U52EC21 

NOT REVECTOR HEADER - CHECK THAT WE ARE ON THE RIGHT TRACK... 

FIRST CHECK THE DISK HEADER FOR INTERNAL CONSISTENCY, THEN (IF ITS CONSISTENT) 

CHECK IF IT IS THE SAME TYPE AS THE OESIRED HEADER AND IF IT DIFFERS 

BY MORE THAN THE MAX NUMBER OF THAT TYPE HEAOER ON A TRACK. 

IF IT DOES, SOMETHING HAS GONE AWRY 



003 121 
003122 
003123 
003124 
003125 
003126 
003127 
003 1 30 

O03131 

003 1 32 

003 1 33 
003134 
003 135 
00313S 
003137 
003140 
0O3 14 1 
003141 
003142 

003 1 43 

0031 44 

003 1 45 

KOBDP 



013740 
033473 
013740 
033453 
013740 
033476 
013740 
033456 

010SS7 
0361SS 
1 1 455 1 
134556 
136576 
138576 
013440 
I 14544 

010556 
134551 
010556 
010556 
034552 



OO7O10 
O10O14 
007012 
010014 
00701 1 
010014 
O07O13 
010014 

007004 
0000 1 1 
000360 
010360 
010120 
010060 
OIOOOO 
000 100 

O07O74 
000380 
017065 
007OS7 
OOOQ77 



123243 
143125 
133243 
043071 
133245 
143131 
123245 
043071 

133603 
OOOOOO 
10000 
003137 
043136 
053137 
013071 
133204 

133612 
OOOOOO 
103 150 
133604 
10000 



MOV 

MOV\T 

MOV 

MOV\F 

MOV 

MOV\T 

MOV 

MOV\F 

R13 : 

AOD 

XOR 

BIT 

AND 

XOR\T 

XOR\T 

NOP 

BIT 

ASSUME 

AOD 

AND 

ADO 

ADD 

ANO 



#HEAD 
R14.R 
#HEAD 
R14,R 
#HEAD 
R14, R 
#HEAD 
RI4 , R 
CONSIST 
#BUF 
R 1 1 , R 
#HDCO 
#HDCO 
#RBNP 
#RBN2 



ER.BA 
13 

ER+2 , 
13 

ER+1 , 
16 

ER+3, 
1 6 

ANT L 
HH.R1 
16 

D.R1 1 
D,R1 6 
RM.R1 
N0.R1 



%CALL 

%JZRO 

7.CALL 

XJNZRO 

%CALL 

7.JZR0 

'.CALL 

7.JNZR0 

HEAOER, R14. 

7\N,BAR XCALL 



8AR 



BAR 



BAR 



#DMODE,RLL 
LBNMSK, EO, 
#SDI . 12, Rl 
VHDCOD , Rl I 
#SDI . GC, Rl 
#SD I . RT , R1 
#RBNMSK, Rl 



'/.JNZRO 
7.TNZR0 
7.TNZR0 
%JNZR0 
7.CALL 

LOBYT 

6\N,BAR "/.CALL 

6\N,BAR %JZRO 
6\N,BAR %CALL 



HDRCCL 

HDRANC 

HDRCCL 

HDRNOM 

HORCCH 

HDRAND 

HDRCCH 

HDRNOM 

R16 ■ t 

S . L01 1 



HDRNOM 
HOSUBA 



HDRANE 
S . LO 12 



SEE IF 1ST LO HEAOER APPEARS 3 TIMES 
IF SO, SAVE AS OISK LO HEADER 
SEE IF 2D LO HEAOER APPEARS 3 TIMES 
IF NOT, INCONSISTENT HOR - CAN'T USE IT. 
SEE IF 1ST HI HEADER APPEARS 3 TIMES 
IF SO, WE HAVE A CONSISTANT HEADER 
SEE IF 20 HI HEADER APPEARS 3 TIMES 
IF NOT, INCONSISTANT HEAOER 
ONSISTANT HI HEADER *** 
GET DESIRED HI HEADER 

[EC0#2]SEE IF HEADER TYPE OF OISK AND DESIRED 
[U52EC21IF DESIRED HDR IS NOT LBN 

(U52EC2) THEN CONT I NUE/ I SO L ATE XOR'ED HDR CODE 
If noq o then test for prim revect ;(E121] 
If neq then test for 2dary revect ;EE12lj 
IV051IF NOT, DON'T USE 
IV051R16 -> SUBUNIT CHAR 
INSURE MASK IS LO BYTE 
GET LBN'S/TRACK IN R12 

ISOLATE HDR TYPE - IS HEADER AN LBN? 
IF SO, POINT AT START LBN 8 GO DIVIDE 
GET RBN'S/TRACK IN R12 
ISOLATE RBN'S/TRACK 



c 
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PACE 188 



003146 136581 

003147 010556 

003150 033456 

003151 132151 



O03152 
003 1 53 
003 1 54 
' 003155 
003156 
0031S7 



003 160 
O03 1 6 1 
O031 62 
O03163 
003164 
003165 
003166 
0031 67 
003170 
003171 
003172 
003 173 
003 174 

00317S 
003176 
003177 



131 153 
10557 
131 153 
1 14544 
1 33554 
03377 1 



010557 
010553 
034553 
030152 
01OSS7 
131 153 
030173 
1 1 1553 
031473 
010555 
031471 
013455 
037 151 

013440 
033751 
031453 



003200 013740 

003201 013740 

003202 010557 

003203 033715 



003204 
003205 
003206 
003207 



010555 
03371 6 
131556 
033456 



000 1 40 
017066 
0000 13 
000016 

00001 1 
007001 
0OOO12 
020100 
013010 
060005 



0O7006 
0O7067 
0OOO77 
0000 13 
007003 
00O01 6 
030012 
0000 12 
030013 
007023 
O1001 1 
010015 
OO001 1 

010000 
000060 
00001 3 



005005 
005005 
007006 
000003 



017002 
000003 
000056 
0000 15 



OIOOOO 

00307 1 

133254 HDRANE: 

123053 

000000 

1 3360S 
000000 
1 13071 
013071 
177777 



123605 
123605 
000000 
OOOOOO 
123605 
010000 
1531 67 
OOOOOO 
153175 
123603 
063514 
1 5307 1 
I 27777 



XOR 
ADO 
MOV 
RSUB 

SUB 
ADD 
SUB 

BIT 
BIS 



#RBNC00.R1 I 

#SDI . TG.R1 6\N,BAR %JNZRO HORNOM 

R13, R1 6 %CALL D. D8N0 

R1 6, R1 I %CALL D. LDHD 

R1 1 , R13 

»BUF .ST, R17\N,BAR "'.CALL S.LD14 

R12.R13 

#DMOOE,RLL %JCRV HDRNOM 

»8G00D,R14,BUF %JNZRO HDRNOM 



#5 , R1 1 



7.RDPF 



COMPARE 
IF NOT 
DIVIDE 
NORMAL I 
GET OES 
FIND 
[ 16K] [E 
SEE IF 
I 1 6KI I 

[ECO# 
SPECIAL 



HEADER 
RBN, F 
HEADER 
ZE LO 
IREO HE 
FSET FR 
C0#21R1 
OFFSET 
C0#2] IF 
21THEN 

RETURN 



TYPE AGAINST RBN 
RGET 
TO G 
CADE 
ADER 
OM B 
PO 



IS L 

WRO 

TREA 

FOR 



IT 
ET 
R T 

IN 

EGI 
SIT 
EGA 
NG 
T A 
RE 



EVERYTHING OK - BUT LET'S SEE HOW FAR WE ARE AWAY FROM TARGET 



103071 
132507 
1 13175 



12 10 15 
121015 
131006 
1 1 1006 



1 53207 
10000 
137777 
137777 



ADD 

ADO 

AND 

ADS 

AOD 

SUB 

ADD\T 

SUB 

DEC\T 

ADO 

DEC\T 

TST\F 

XNOR 

NOP 
MOV 
DEC 



#BUF .SO ,R17\N.BAR '/.CALL 

#SDI .RT,R13\N.BAR SCALL 

»RBNMSK,R13 

R13, R12 

#BUF .HL ,R17\N,BAR 7.CALL 

R16.R13 

R12.R13 

#10. ,R13\N 

R13, R13 

#SDI . RO, DBAR\N 

R 1 1 , R 1 1 

DBAR 

R1 1 . R1 1 



L013 
LD13 



%TNEG 

SJNEC 1$ 
BAR '/.CALL S . LOI 1 
%CNZRO S.ST11 
%JZRO HORNOM 
%RET 



Gat SOI 
Get RBN 
Mask ou 
Add to 
Re 1 oad 
sub des 
If nega 
If di f f 
then si 
R1 1 = ROT 
IF NEO 
[EC0#2] 
ELSE 



ot 1 bl 
' s/t r ac 
t crap 
LBN'S/t 
desi red 

red LB 
t i v«, 
er ence 
t and w 
ATIONAL 
THEN 
IF ZERO 
R1 1 *-1/ 



k ptr 
k frc 



10 
N fr 
rap 
less 
ait 

OPT 
OECR 

THE 
RETU 



SECTOR OFFSET 

START OF TRACK, 
(R14.R13) 

NNING OF FOUND TRACK 

IONER GOODNESS FLAG 

L (< TRACK SIZE) 

TRK THEN OECR HORLMT/IF IN DM 

S ORDINARY MISS 

PLACE CMD 

[E121 1 

[E121 1 

[E121 ] 

from buf ; [EI21 ] 

unit char ; (E121 1 

[E121 ] 
[E121 ] 
[El 21 1 
IE121 1 
[E121 ] 
IE121 ] 
[E121 ] 



get sects/tk 
header 

on act ua 1 LBN 
around 

en lo sectors 

the right sector 
COUNT 
SET 
ANG IN THERE ANYWAY 



#< IDX + SEO . R1 1 
R13.R13 



%JZRO 

■/.CALL 
7.JMP 



HDRNOM 
D . CPUL 
IS 



ROUTINE TO ABORT REAL TIME COMMAND ««» 

MOV #<CONT*RD> . RTCS 7.CALL X.SSTA 

MOV #<CONT+RD> , RTCS %CALL X.SSTA 

ADD #BUF ,SD,R17\N,BAR 7.CALL X.SSOT 

MOV (BUF), DBAR %JMP X . SSDT 



[mjt07] if zero, normal exit/else r13 has ^sectors 
(mjt07) wait for sector or index pulse 
[mjt07] loop until on sector 



I16KISET READ GATE FOR A WHILE (32 BIT TIMES) 
(16K1S0 WE CAN LOWER IT AND ABORT THE I/O 
[16KIREL0A0 OBAR WITH SOI CTL BLK PTR 

[16K1WHILE WE LOWER READ GATE 



**.« ROUTINE TO SET R16 AS POINTER TO SUBUNIT CHAR [V0S1 



HDSUBA: ADO\F 
MOV 
SUB 

H0SLB1 : MOV 

. PAGE 



#SDI . CP , DBAR\N , BAR %JZRO HDSL81 

I BUF ) . Rl 6 

#SOI CW. R 1 6 %RTN 

0BAR.RI6 %RTN 



[V051 IF NOT IN DM MODE, BRANCH 

(V051 ELSE, GET ADDRESS FROM OM PROGRAM 

(V051 ANO ADJUST/EXIT 

(V0S1 IN OPERATIONAL MODE, SET R1 Br DBAR, 
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ROUTINE TO COMPUTE PR I MARY RBN FOR CURRENT C Y L , GROUP . TRACK AND PLACE IT 

AS AN RBN HEAOER (ALSO USABLE AS AN RCT OFFSET FOR TERTIARY REVECTORING) 

IN BUF . HH AND BUF . HL 

ON ENTRY, DBAR --> SDI CTL BLK, R17 --> BUFFER 

ON EXIT, R11 : BUF.HHR17) = LO HEADER, R12 = BUF.HH1R171 : HI HEADER 



3210 
321 1 
3212 
3213 
3214 
32 1 4 
3215 
321 6 
3217 
3220 
3221 
3222 
3223 
3224 
3225 
3226 
3227 
3230 
3231 
3232 



135554 
010555 
013740 
1 14544 

010556 
010S56 
010SS6 

134552 
010556 
034556 
030151 

130472 
03O1S2 
031456 
010557 
010557 
010557 

133552 
014451 



000360 

007001 
007136 
000100 

007074 
0O7O65 
007066 
0000 17 
007067 
000077 
10013 
020012 
000014 
00001 6 
007003 
007002 
007004 
OO3 140 
0000 1 1 



133234 RBNPRI : 
133604 RBNCLC' 
133615 
133204 

133612 

133254 

123604 

1 220 1 5 

1336 10 

OOOOOO 

153226 RBNCLA 

153224 

OIOOOO 

103222 

123614 RBNCL8 

123607 

010000 

OIOOOO 

137777 



ENTRY 

SIC 

AOD 

MOV 

BIT 

ASSUME 

AOD 

ADO 

ADO 

AND 

ADD 

AND 

ADD\F 

INC\T 

ADD 

DEC 

ADO 

ADO 

ADO 

BIS 

CLR 



FOR PRIMARY 
#HDCOD, R14 
#SOI .SL 
»HDLMT . BAR 
#OMODE, RLL 
LBNMSK.EO, 
#SDI . 12. Rl 
#SDI .GCR1 
#SOI .TG.R1 
#RBNSTR, Rl 
#SDI .RT, Rl 
#RBNMSK, R1 
R13, R1 1 
R12 

R14, R12 
R16 

#BUF . HL , Rl 
#BUF .SP.R1 
#8UF .HH, Rl 
#RBNCDO, Rl 
Rl 1 , R1 1\N 



IG L 
D .SLBA 

S . LD12 
S.ST12 
HDSUBA 

S.LLI2 



RBN'S, SAVE OR 

•'.CALL 
AR\N,BAR '/.CALL 

7.CALL 

SCALL 
LOBYT 

6\N,BAR 7.CALL 
6\N,BAR SCALL 
6\N. BAR "'.CALL S . LD 
2 %CALL S.CL 
6\N,BAR SCALL S.LO 



7.JZR0 
7.TCRY 

%JMP 
7\N,BAR 7.CALL 
7\N,BAR ".CALL 
7\N, BAR 
2, BUF 

%RET 



R8NC 

S .ST 



BN AWAY FOR LA 
(U52EC2I 
RESET HE 
SINCE WE 
GET R16 
MAKE SUR 
GET LBN' 
DIVIDE L 
GET WORD 
R12< I 1 :B 
GET RBN 
ISOLATE 
MULTIPLY 
TRACK NU 
THE NUMB 
TO GET T 
RESULT 
RESTORE 
IN THE 8 
(SETTING 
RETURN 



TER US 
SAVE R 
ADER L 

WILL 
- > SUB 
E MASK 
S/TRAC 
BN BY 

CONTA 
>=STAR 
S/TRAC 
RBN'S/ 

LOOP 
MBER I 
ER OF 
HE FIR 
S I N ( 
DATA B 
UFFER 

THE R 
CODE Z 



13/R14 
IMIT. 
BE CHAN 
UNIT CH 

IS LO 
K 

LBN'S/T 
INING S 
T RBN. 
K IN Rl 
TRACK 
• MULTI 
N (R14, 
RBN'S/T 
ST RBN 
R12, Rl 1 
UFFER P 
AS THE 
BN HEAD 
ERO FOR 



IN P .8UF2/3 

GING THE SEARCH TGT 

AR 

BYTE 

TO GET TRACK * 

TART RBN 
CLEAR Rl 1 



PLY THE ABSOLUTE 
RI3) BY 
RACK IN R16 
ON THIS TRACK. 
I STORE IT 
TR FOR PRIMARY CASE 
NEW DESIRED HEAOER 
ER TYPE, OF COURSE) 
PRIMARY CASE 



ROUTINE TO SAVE R13/R14 IN SDI.RL ANO SDI.RH - USES R12 * 
CALL MUST DO "BIT #HDC0D,R14», WILL NOT SAVE NON-LBN'S 



003233 


01 3440 


OIOOOO 


027777 


D 


SLBN : 


NOP 


003234 


010S55 


007022 


123604 


D 


SLBA: 


ADD 


003235 


1 14544 


000 100 


O 1 OOOO 






bit 


003236 


01 3440 


OIOOOO 


00324 1 






nop 


003237 


010555 


007031 


133616 






AOD 


003240 


010555 


007032 


113617 






ADD 


003241 


010552 


OO70 14 


133616 


1! 




add 


003242 


010552 


00701S 


103617 






add 

. PAGE 



%RNZRO 

#SDI .PO, DBAR\N, BAR 7.CALL S.LD12 
#dmode , r 1 1 

Sjniro 1$ 
#SDI .RL , OBARVN, BAR %CALL S.ST13 
*SDI . RH ,OBAR\N,BAR %JMP S.ST14 
#p. buf 2 ,r 12\n, bar leal 1 s . St 1 3 
#p . buf 3 , r 1 2\n, bar %jmp s . St 1 4 



[U52EC2] IF NOT 

R12=PKT PTR 

test 4 f ix - -test i f dm 

Skip 

[OOAISAVE LO LBN 

[0DA1SAVE HI LBN/RETURN 



THEN RETURN 



c 
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PACE 190 



003243 


0337S1 


000036 


133606 


HDRCCL 


MOV 


#36. R1 1 




•/.CALL 


003244 


0337S6 


0OOOO6 


103247 


HDRCKL 


MOV 


#<HEA0ER-2> 


R16 


%JMP 


0O3245 


033751 


000036 


133606 


HDRCCH 


MOV 


#36, R1 1 




•/.CALL 


003246 


033756 


000007 


10000 


HDRCKH 


MOV 


#<HEAOER- 1 > 


R1 6 




003247 


030556 


037002 


1 13253 


HDRCHK 


ADO 


#2,R19, BAR 




SJ MSB 


0032SO 


016514 


000003 


000000 




XOR 


(BUF) , R14\N 






003251 


031471 


O 1001 1 


143252 




OEC\T 


R 1 1 , R 1 1 




XTZRO 


003252 


131551 


000010 


1 13247 




SUB 


#10, R1 1 




•/.J MP 


0O32S3 


034551 


000004 


127777 


HDRCKE 


AND 


#4,R1 1 




XRET 



SUBROUTINES USED BY HDRANL: 

HDRCCH, HDRCCL CHECK CONSISTENCY OF HEADER HI/LO WORDS (LOOK FOR 3 COPIES OF ( BUF ) ) 
INPUTS: (BUF) s MATCH WORD 

OUTPUTS: CC = 2R0 IF MATCH 

HDRCKH. HDRCKL CHECK EOUALITV OF HEADER HI/LO WORDS (LOOK FOR N COPIES OF R14) 
INPUTS: R14 = MATCH WORD, R11 « 33 + N 

OUTPUTS: CC : ZRO IF N COPIES OF R14 FOUND 

S.L014 ; SET UP R14 AND R11 FOR HDRCKL 
HDRCHK ; SET UP BASE OF LO HDRS FOR HDRCHK 
S.LD14 i SET UP R14 ANO R11 FOR HDRCKH 

SET UP BASE OF HI HDRS FOR HDRCHK 

ADORESS NEXT COPY OF HEADER, EXIT IF NONE 

COMPARE WITH DESIREO VALUE 

COUNT IT IF EQUAL 

DECREMENT HDR COUNT IN R11<5:3> a LOOP 

DONE ■ RETURN Z BIT IF WE FOUND MATCHES 

UNSIGNED DIVIDE ROUTINE 

ENTER AT D.DBNO WITH (R14.R13) CONTAINING BLOCK NUMBER (LBN OR RBN), 

R12 = OIVISOR, BAR --> STARTING BLOCK NUMBER< 27 : 24 > IN < 1 1 : S > 

OR ENTER AT D.DIVD WITH (R14.R13) CONTAINING A 32-BIT NUMERATOR, 

R12 : DIVISOR, R1 1 ■ O. 

IN EITHER CASE, ON EXIT, (R14.R13) = QUOTIENT, R11 = REMAINDER, R12 INTACT 



L/ 



003254 


135554 


000360 


1 33603 


D 


OBNO: 


BIC 


#HDC0D,R14 




•/.CALL 


S 


LD1 1 


GET STAR 


0032SS 












ASSUME 


LBNSTR.EO.RBNSTR 








003255 


134551 


000017 


oooooo 






AND 


#LBNSTR.R1 1 










ISOLATE 


003256 


131154 


00001 1 


132015 






SUB 


R1 1 , R14 




%CALL 


S 


CL 1 1 


MAKE BLO 


003257 


013740 


007017 


133621 


D 


DIVD: 


MOV 


#<HEA0ER»7> 


BAR 


7.CALL 


S 


ST16 


SAVE R16 


003260 


033756 


00004 1 


OOOOOO 






MOV 


#33 . ,R16 










INITIALI 


003261 


131151 


0000 12 


10000 


D 


DVDA: 


SUB 


R12, R1 1 










TRIAL SU 


003262 


O30151 


020012 


143264 


D 


OVOB : 


AOD\F 


R12.R1 1 




%JCRY 





DVDC 


JUMP IF 


003263 


O30153 


0000 13 


1 13265 






ADD 


R13.R13 




%JMP 





DVOO 


START DO 


003264 


130153 


0000 13 


OOOOOO 





DVDC: 


ADDC 


R13, R13 










START 00 


003265 


031456 


02001 6 


1 13271 


D 


OVDD: 


DEC 


R1 E 




SJCRY 


t) 


OVOF 


DECR ITE 


003266 


030154 


01001 4 


103272 






AOD 


R1 4 , R14 




7.JZR0 





OVDG 


NO CARRY 


003267 


130151 


02001 1 


103261 


D 


OVOE: 


ADDC 


R1 1 , R1 1 




%JCRY 


D 


DVDA 


DOUBLE R 


003270 


031 151 


0000 12 


1 13262 






SUBC 


R12.R1 1 




•/.JMP 


D 


DVDB 


WRONG, A 


003271 


130154 


01001 4 


013267 


D 


OVOF: 


AODC 


R14.R14 




'/.JNZRO 


D 


DVDE 


R13 CARR 


003272 


01374O 


007017 


113610 


D 


OVDG: 


MOV 


#<HEA0ER+7> 


BAR 


°/.JMP 


S 


LDI6 


RESTORE 



STARTING BLOCK NUMBER 
OCK # UNIT-RELATIVE, CLEAR R11 

SO WE CAN USE IT FOR COUNT 
IZE ITERATION COUNT 
UBTRACT TO TEST DIVISIBILITY 

YES / RESTORE R11 IF NO 
0UBL1NG NUMERATOR/QUOTIENT 
OUBLING BUT SET LO BIT TO 1 
!R CNT, CHECK CARRY TO HI NUM/OUO 
DOUBLE HI NUM/OUO. CHK FOR END 
111, ASSUME CARRY, LOOP IF CORRECT 
ADJUST TRIAL SUBTRACT AND LOOP 
UEO, DSL R14 W/CARRY * CHK FOR END 

R1E ANO EXIT 
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SBTTL REVECTORING PROCESS 
19-SEPT-1983 UOA/ODA MICROCODE 



REVECTORING CODE 

THIS CODE IS STRUCTURED AS A PROCESS WHICH RUNS SOMETIMES UNDER THE UNIBUS 
PROCESSOR AND SOMETIMES UNDER THE DISK PROCESSOR. IT IS DISPATCHED TO FROM 
THE IDLE LOOPS OF THESE PROCESSORS. 

WHEN REVECTORING IS DESIRED FOR A DRIVE, THE "RVCT" BIT IS SET IN ITS SOI 
CONTROL BLOCK STATUS WORD (SOI. ST). WHEN THE REVECTORING CONTEXT BLOCK 
(RAM LOCATIONS REVSTR THROUGH REVEND) BECOMES FREE (REVSOI'O) THEN REVSOI 
IS SET TO POINT TO THE SOI NEEDING REVECTORING AND THIS PROCESS IS ENTERED 
AT U.RVC1 BY THE UPPER PROCESSOR. THE VECTORING IS UNDER CONTROL OF THE 
WORD RVCVEC, WHICH ACTS AS A "PC" POINTING TO THE NEXT SECTION TO BE EXECUTED: 
IF RVCVEC IS EVEN A DISK PROCESSOR CODE SECTION IS INVOKED, WHILE IF IT IS 
ODO A UNIBUS PROCESSOR SECTION IS INVOKED: IN EITHER CASE RVCVEC IS A POINTER 
TO A DISPATCH IN THE UOA VECTOR TABLE. 



INPUTS : 



OUTPUTS: 



RVCBUF POINTS TO BUFFER NEEDING REVECTORING 
UBAR/OBAR POINTS TO SOI CONTROL BLOCK 



SDI.DB ADVANCED PAST SUFFER (IF APPROPRIATE), 

OPERATION COMPLETE, DISK 

ON CORRECT CV L /GROUP/TRACK FOR SUBSEQUENT OPERATIONS. 
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NEXT, THE LOWER PROCESSOR SAVES BUFFER PARAMETERS FROM THE BUFFER IN 

ERROR (1FRVCBUF) ANO COMPUTES THE INITIAL OFFSET INTO THE RCT 

FOR THE LBN NEEDING REVECTORING. 

THIS IS PURELY COMPUTATIONAL ANO COULD BE DONE IN THE UPPER PROCESSOR AS WELL, 

BUT WE CAN USE THE "RBNCLC" ROUTINE IN HEADER ANALYZE TO DO SOME OF THE WORK.. 



? 003273 
003274 



010557 
1 13556 



OO7OO0 
003200 



133610 
OOOOOO 



003275 013740 007230 123621 



003276 
003277 
003300 

0033O1 
003302 
0033O3 
0033O4 
003305 
003305 
003306 
003307 

003310 
00331 1 
003312 

00331 3 

00331 4 

0033 1 5 

00331 6 

00331 7 
003320 
003321 
003322 



033756 
033454 
033752 

01O557 
013740 
034552 
013740 

133552 
010557 

013440 

033453 
074551 
013740 
035553 
034552 
073 1 52 

013740 
013740 
130456 
013740 
017440 



000005 
OO0O12 
000123 

007005 
007132 
000377 
OO7 130 

000027 
007005 
OOOOOO 

OOOOI 1 
OOOl 77 
007222 
0OO1 77 
0001 77 
OOOO I 3 

007224 
007252 
0000 16 
007254 
OO30 16 



123365 
10000 

132105 

133604 
123615 
133053 
13361 6 

133617 
133615 
123210 

OOOOOO 
010000 

123614 
OOOOOO 
OOOOOO 
123575 

133615 
123610 
123621 
123610 
1 10701 



;MOV 
ADO 
SIS 

MOV 

SAVE TH 

MOV 

MOV 

MOV 

SAVE OR 

ADD 

MOV 

ANO 

MOV 

ASSUME 

BIS 

ADO 

NOP 

MOV 

AND\L 

MOV 

BIC 

ANO 

BIS\L 

MOV 
MOV 
INC 
MOV 
COM 
. PAGE 



R17 ,BUF 
#BUF .NL ,R17\ 
#BLAST , R1 6\N 



#RVC 

IS CO 

#<S . 

. R1 2, 

#RVC 

IGINA 

#BUF 

#RVC 

#LOB 

#RVC 

<RVC 

#REA 

#BUF 



EBF.BAR 
MMANO'S 

seci-s . c 

R14 

SAV.R12 
L LBN AN 
TA,R17\ 
TA , BAR 
VT.R12 
BNL .BAR 
BNH51 7> 
0CD.R12 
,TA, R17\ 



R1 1 , R13 
#177, R1 1 
#RCTOFF . BAR 
#177, R13 
#177, R12 
R1 3 , R1 2 

#RCTBLK, BAR 
#RVECDP , BAR 
R1 6 

ORVCFLG.SAR 
Rl 6 . BUF 



%JMP 
N.BAR 7.CALL 
UF 

%CALL 
PARAMETERS 

VLL>,R16 %C 

XCALL 
BUF.TA ** 
N.BAR °/.CALL 
•/.CALL 
%CALL 
5SCALL 
EO, <RVCBNL£ 

•/.CALL 
N, BAR 7.CALL 
•iCALL 



•/.CALL 

'/.CALL 
XCALL 
-.CALL 
"-CALL 
%JMP 



ACTUALLY DONE IN THE DISPATCH VECTOR... 
R16=STATUS * NEXT LINK OF REVECTOR CAUSING BUFFER 
INDICATE THAT ITS LAST BUFFER IN CHAIN 
FOR DURATION OF REVECTOR OPERATION 
SAVE BUF.NL OF 8UFFER CAUSING REVECTOR 
FROM MSCP PACKET (LATER SMASHED BY CONVERT ) *** 
ALL . RSAV ; R16=# WORDS TO MOVE/GO SET UP FOR MOVE 
; R14:R12 
SMOV ; R12:SAVE AREA/GO SAVE PARAMS 



.RVC2 
S . LD1 6 



S .ST1 6 



S . L01 
S.ST1 
. LDH 
S .ST1 
17tl> 
S .ST1 
S .ST1 
RBNPR 



.ST1 

. L01 
.ST1 
. LDI 
. IDL 



GET TRACK ADDRESS «. OP CODE 

SAVE ORIGINAL REAL TIME OP COOE 

ISOLATE TRACK ADDRESS 

STORE THE ORIGINAL HEADER FOR ERROR REPORT I NG 

REMOVE LEVEL 1 CODE TO READ (FOR RCT) 

RESTORE IN BUFFER FOR RBNCLC 

[US2EC21SAVE BUF.HL/H.SET UP BUF. SO, 

[U52EC2! CALCULATE INITIAL RCT OFFSET 

SAVE COPY OF LOW OFFSET IN R13 

R11 • INITIAL WORD OFFSET WITHIN RCT BLOCK 

SAVE INITIAL OFFSET 

REMOVE INTRA-BLOCK PORTION OF OFFSET IN R13 

REMOVE HIGH-OROER CRUO FROM HI OFFSET WORD 

COMBINE WORDS TOGETHER 

R12 LEFT 9 (RIGHT 7) : INITIAL BLOCK NUMBER 

[16K1SAVE INITIAL RCT BLOCK OFFSET (FROM BASE) 

(UOA)GET PROCESS VECTOR POINTER 

IUOA] INCREMENT IT AND STORE IT 

(U0A1R1 6.U . PROC/D . PROC FLAG 

[U0A1SWITCH TO U.PROC/GO IDLE 
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AT THIS POINT "SEEK" IS SET IN SOI. ST, WHICH TAKES PRECEDENCE OVER REVECTORING; 
WHEN THE SEEK COMPLETES THE LOWER PROCESSOR WILL COME HERE TO READ THE DESIRED 
RCT BLOCK INTO THE BUFFER POINTED TO BY RVCBUF 

THIS COOE IS USED BOTH TO READ THE RCT AND TO PERFORM THE FINAL READ/WRITE 
OF THE REVECTOR TARGET BLOCK 

AT THIS POINT, THE SEEK HAS BEEN ISSUED FOR THE REVECTOR BLOCK; WHEN IT IS DONE, 
WE WILL PERFORM THE USER'S ORIGINAL READ OR WRITE. ON THAT BLOCK. 



;MOV 



(BUF ) , R17 



%JMP 



ACTUALLY DONE IN DISPATCH VECTOR. 



003323 
003324 
003325 
003326 
003327 
003330 
003331 
003332 
003333 
003333 
003333 
003334 



01 4551 
013440 
010557 
0105S7 
135551 
035551 
010557 
013452 



133571 
135551 



000004 
OIOOOO 
0O7O05 
007001 
00OO20 
003O01 
007000 
00O012 



033100 
003 100 



OIOOOO 
003337 
I33B04 
133603 
OOOOOO 
OIOOOO 
123B03 
OOOOOO 



142123 
1 1 1002 



;MOV (BUF1.R17 7.JMP . RVC4 

BIT #DERR, Rl 1 

NOP 7.JNZR0 0.RV48 

ADD #BUF .TA,R17\N,BAR %CALL S.LD12 

ADD #BUF .ST, R17\N,BAR 7.CALL S.L011 

BIC #BECC,R11 

BIC #BGRUP, Rl 1 , BUF 

ADD #BUF.NL,R17\N,BAR 7.CALL S.LD11 

TST R12 

ASSUME READCD.GT.O 

ASSUME WRITCD.LT.O 

BIS\T #BFULL , Rl 1 , BUF %JMSS D.WRIT 

BIC #BFULL , Rl 1 , BUF 7.JMP . ERRD 



ACTUALLY DONE IN DISPATCH VECTOR... 

SEE IF WE GOT A SEEK ERROR 

IF SO. SKIP THE READ AND REPORT AN ERROR 

LOOK AT THE SOI LEVEL 1 COMMAND 

[ 16K1R1 1 sBUFFER STATUS 

[16K1CLEAR ECC FLAG 

[16K1CLEAR BGRUP FLAG IN BUF. ST 

GET BUFFER STATUS/LINK WORD IN R11 

CHECK IF OPERATION IS A READ OR A WRITE 



GO EXECUTE A WRITE (BUFFER FULL), 
IEC0#2]D0 REAO USING CURRENT R17 



*** 



D.IOON AND D.IOER RETURN HERE, CCiZERO IF OK **» 



003335 013440 OIOOOO 103317 D.RV4A: 

00333B 013740 007226 133611 

003337 010557 007001 133603 0.RV4B: 

003340 133551 000020 OOOOOO 

003341 033551 003001 103317 



NOP 
MOV 
ADO 
SIS 
BIS 
. PAGE 



%J2R0 D.RV2A 

#RVCBUF,BAR V.CALL S.LD17 

#BUF .ST. R17VN.BAR 7.CALL S.LD11 
»BECC, Rl 1 

#BCRUP . R 1 1 , BUF 7.JMP 0.RV2A 



THIS STEP OVER NOW IF READ WORKED 

R17=PTR TO REVECTOR BUFFER 

[16K1REA0 FAILED - GET BUFFER STATUS WORD 

(1SK1SET ECC FLAG 

[16K1SET FATAL ERROR ANO RETURN TO IOLE LOOP 
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FINAL PHASE - CLEAN UP AND FREE THIS SDI CTL BLK ANO THE REVECTOR PROCESS 

NOTE - TO PREVENT RACE CONDITIONS THE REVECTOR PROCESS MUST BE FREED FROM THE SAME 

PROCESSOR THAT ALLOCATED IT (IN THIS CASE DPROC). OR THE RVCT 8IT MUST BE CLEARED FIRST. 











; **« 


RESTORE 










D . RVC8 : 


;MOV 


003342 


033756 


000005 


123365 




MOV 


0O3343 


01 455 1 


000004 


O 10000 




BIT 


003344 


033754 


010123 


122105 




MOV 


003345 


033753 


OOOI 60 


010000 


; * *« 


MOV 

DO FINA 


0O334S 


010557 


007001 


123604 




ADO 


O03347 


014552 


000040 


OIOOOO 




BIT 


OO33S0 


01 3440 


010000 


103353 




NOP 


0033S 1 


010557 


007000 


133604 




ADD 


003352 


133552 


003 100 


oooooo 




BIS 


0033S3 


013740 


007232 


123623 


D. RVSA: 


MOV 


0033S4 


013740 


O0725O 


133623 




MOV 


0033SS 


033752 


000240 


122306 




MOV 


003356 


133553 


00020O 


010000 




BIS 


003357 


010555 


007000 


133S03 




ADD 


003360 


01 455 1 


000004 


010000 




BIT 


0O3361 


133573 


O10100 


042302 




BIS\T 


003362 


01 3457 


0000 17 


OOOOOO 




TST 


003363 










ASSUME 


003363 


033752 


030100 


002302 




MOV 


003364 


033552 


000040 


102302 


; »** 


BIS 
ROUTINE 


003365 


010555 


007022 


123604 


0. RSAV: 


ADD 


003366 


030552 


000024 


127777 




ADO 



ORIGINAL PARAME 

(BUF) ,R17 

#<S .SECI-S .CYLL 

#D6RR,R1 1 

#RVCSAV , R14 

#<BFRO+BFSV+SUS 

. CLEANUP OF SDI 
#BUF .ST,R17\N, B 
#BRCTS, R12 

#BUF . NL ,R17\N. B 

#BFULL,R12.SUF 

VRVCSDI .BAR 

#RVECUP,BAR 

#<XCMP*SUSP> ,R1 

#RVCT, R13 

#SOI .ST,DBAR\N, 

#0ERR,R1 1 

*ERRIP,R13 

R17 

BLAST, EO,B 

#BFSV. R12 

#SUSP, R12 



TERS TO 

XJMP 
>, R16 % 

%C2R0 
P> , R13 

STATUS, 
AR %CALL 

7.JZR0 
AR 7.CALL 

7.CALL 

"/.CALL 
2 '/.CALL 



END 

O.R 
CALL 



OF MSCP PACKE 

VC8 i ACTUAL 

D . RSAV ; R16 

; IF NOT 

MOV ; THEN 

; R13-SD 

; ASSUME 



ETC. »* 
S . LD12 



SV8A 

LO 12 



S . C 
S . C 
D . C 



LRB 
LRB 
LUR 



BAR %CALL S . LOT 1 
*/.JN2RD D.SETS 



[ EERRE 

[ EERRE 

[EERRE 

[ EERRE 

[EERRE 

RELEAS 

[UQAJC 

[U52EC 

[U52EC 

IU52EC 

CHECK 

[U52EC 

AND SE 



ITU 



T *** 

LV OONE IN DISPATCH VECTOR 

•LOOP COUNTER/GO SET UP FOR RESTORE 

FATAL ERROR 

GO RESTORE I/O PARAMS 
I STATUS BITS TO CLR 

ERROR - CLEAR BUF REO+BUF SRV 

C1GET BUFFER STATUS WORD 

CJCHECK IF THIS IS RCT SEARCHED CASE 

C1IF NOT THEN SKIP 

C1GET NEXT LINK PTR 

C1SET BFULL TO FAKE UPPER INTO RECOVERV 

E THE REVECTOR PROCESS 

LEAR U.PROC VECTOR 

21AND SET TRANSFER COMPLETE AND SUSPEND 

2IALWAVS CLEAR RVCT, AS WE ARE DONE 

21REL0AD R11 WITH SDI. ST 

FOR ERROR IN REVECT PROCESS OR FINAL SEEK 

21IF SO THEN CLEAR ERRIP/SET SUSP+XCMP 

TTING SUSPEND IFF THE REVECTOREO 



o 



7.JNMSB 
7.JMP 



D .SETS 
D .SETS 



PREPARE TO EXIT BV SETTING BUFF SERVICE REO, 
BUFFER WAS LAST IN CHAIN/GO CHG SDI STATUS 



ROUTINE FOR SAVING AND RESTORING MSCP I/O PARAMETERS *•* 

#SDI PO.OBAR\N,BAR %CALL S.LD12 : R12>MSCP PACKET POINTER 

#S.CVLL,R12 %RET i [U52EC21ADD SAVE START OFFSET/RETURN 

PAGE 
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«** NEW SDI TIMING *** 

.SBTTL D.PROC XFC ROUTINES 
:* 22-JAN-83 UDA52 MICROCODE 

ROUTINE NAME: 
XFC01 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL PROCESS THE FORMAT TRACK ON INDEX XFC. THIS 
COMMAND WILL ENABLE A DM PROGRAM TO FORMAT AN ENTIRE DISK. DM REGISTER 
O POINTS TO A TABLE WHOSE ENTRIES CONTAIN A DATA BUFFER POINTER, LO ORDER 
HEADER CODE, AND HI ORDER HEADER CODE. THE HEAD ADDRESS FOR THE FORMAT 
COMMAND IS IN DM REGISTER I AND DM REGISTER 2 CONTAINS THE SECTOR SI2E IN 
WORDS. THE FIRST SECTOR IS FORMATTED USING A FORMAT ON INDEX REAL TIME 
COMMAND AND SUBSEQUENT SECTORS ARE FORMATTED USING THE FORMAT ON SECTOR 
REAL TIME COMMAND. THE FORMAT OPERATION IS TERMINATED WHEN A TABLE ENTRY 
CONTAINS A ZERO DATA BUFFER POINTER. 



INPUTS: 

DM REGISTER 

DM REGISTER 

DM REGISTER 

DM REGISTER 

DM REGISTER 

DM REGISTER 

OUTPUTS : 

DM REGISTER 

DM REGISTER 



POINTER TO FORMAT CONTROL TABLE 

HEAD ADDRESS 

SECTOR SIZE IN WORDS 

HEADER PREAMBLE SIZE IN WORDS 

DATA PREAMBLE SIZE IN WORDS 

POINTER TO RECIRCULATE LIST ENTRY 



POINTS AT LAST DATA BUFFER PROCESSED 

- SUCCESSFUL COMPLETION 

1 - DRIVE SIGNAL TIMEOUT 

2 - READ/WRITE READY NOT HIGH 











; *** 


FORMAT 


INT 










XFCOI : ; 


MOV 


#D 










:. if 


nz , qdadm 


0O3367 


03371 6 


000603 


Q10000 




MOV 


(B 


003370 


130456 


OOOOI 6 


OOOOOO 




INC 


R1 


0O3371 


013740 


OO70O7 


12361 1 




MOV 


*0 


003372 


1 14557 


000 100 


OOOOOO 




BIT 


#B 


003373 


01 3460 


010400 


043374 




NDP\T 




0O3374 


120357 


0070 17 


123607 




INCB 


Rl 


003375 


120357 


007017 


133605 




INCS 


R1 


003376 


120357 


007017 


133606 




INCB 


Rl 


0O3377 


013740 


067005 


13361 1 




MOV 


*D 


003400 


013740 


OO7O07 


123622 




MOV 


#D 


OO3401 


013740 


007001 


123612 




MOV 


#D 


OO3402 


033757 


000040 


OOOOOO 




MOV 


#1 










; * * * 


WA I T FOR S 


0O3403 


033751 


Q00060 


132507 




MOV 


#< 


OO3404 


133552 


OOOOS3 


OIOOOO 


; . endc 
; * * * 
XF. REP : 


OR 
ENTRY 


#F 
POIN 



IALIZATIDN CODE >*« 
MREG2.BAR XJMP XFCOt 

UF) , R16 0ROPF 

6 

MREGO.BAR "'.CALL S.LDI7 

IT14.R17 

(PSDPF 
7\0, R17, BAR 
7\0, R I 7, BAR 
7\0.R17, BAR 
MREG5, BAR 
MREGO, BAR 
MREG1 , BAR 
DX.R17 

ECTOR PULSE (TO AVOID RACE IN 
SEC+IOX> , Rl 1 %CALL 
ORICD, R12 



%TNZRO 






•'.CALL 


S 


LDDB 


"'.CALL 


S 


LD13 


'/.CALL 


s 


LD14 


XCDPF 


s 


LD17 


•'.CALL 


s 


ST17 


7.CALL 


s 


LL 12 



D.CPUL 



; [QDA1 

T FOR MSCP REPLACE COMMAND ** 



[ 16K1EXECUTED IN JUMP TABLE 
[QDA] 

( 16K]R16:SECT0R SIZE 
(16KIADD ONE 
R17=TABLE POINTER 
IF RECIRCULATE BIT SET 
THEN SET DPF 
DBARsBUFFER POINTER 
R13:L0 HEADER FIELD 
R14=HI HEADER FIELD 
IF RECIRCULATE THEN RELOAD R17 
UPDATE TABLE POINTER 
R12:HEA0 ADDRESS 
IEC0#1 ]R17= INDEX PULSE FLAG 
DRIVE) »«* 

GO CHECK PULSE 

R12=F0RMAT ON INDEX CODE 8 HEAD ADDR 
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003405 
003406 

003407 
003410 
00341 1 

L**** 0034 12 
0034 13 



0337S1 
013440 

Ot3440 
013740 
013740 

0145 17 
0145 17 



00O012 
010520 

OO0440 
OO5003 
007202 

100502 

010002 



132513 
1434S1 

000000 
000000 
133055 

053412 
103413 



nz , qdadra 

MOV 

NOP\F 



#10. ,R1 1 



... 1PSWM 

«« START OF MAIN BOOY OF 

1A: NOP IPSCMO 

MOV #<CONT+WRT> . RT 

MOV #SYNC,8AR 
*» WAIT FOR INDEX/SECTOR 

BIT\F (RTOS) . R17 (PRS 

BIT (RTDS) , R17 



'/.CALL 

%JZRO 

FORMAT COD 



; (ODA! 

. WS I G 
XRWRER 

E «»* 



003414 014517 010002 003414 



003415 
0034 1 6 
0034 17 
003420 
003421 
003422 
003423 
003424 
003425 
003426 
003427 
003430 
003431 
003432 
003433 
003434 
003435 
003436 
003437 

OO3440 
O0344 I 
003442 
003443 
003444 
O03445 
003446 



003446 
003447 
003450 
00345 1 
O034S2 



033712 
01 4440 
O13740 
033717 
014440 
120357 
033716 
033451 
120357 
0337 13 
120357 
033714 
013740 
134551 
033737 
133752 
01374O 
03445 1 
033716 

03445 1 
1 30456 
03445 1 
Ol 3740 
034451 
1 3440 



1 10440 
013440 
037151 
013455 
033757 



O00703 
106772 
007007 
106003 
106012 
007017 
106003 
106015 
007017 
106003 
007017 
106003 
007005 
106100 
010003 
106115 
007002 
10801 1 
000003 

10657 1 
00001 6 
10601 1 
007007 
10601 1 
1 63017 



IOS551 
1 40000 
0005 1 1 
1001 5 
030020 



122550 
04341 6 
OOOOOO 
043420 
043421 
010000 
OS3423 
053424 
O10O00 
053426 
010000 
O53430 
10000 
053432 
053434 
04 34 34 
OOOOOO 
053436 
O10O00 

043440 
OOOOOO 

053442 
OOOOOO 

053444 
103462 



04344S 
1 1 3462 
12251 3 
103461 
003407 



O03453 034451 000011 OOOOOO 



* * * 

* * * 



* * * 
. endc 



WAIT FOR 

BIT 

GO WRITE 

MOV 

CLR\F 

MOV 

MOV\F 

CLR\F 

INCB 

MOV\F 

MOV\F 

INCB 

MOV\F 

INCB 

MOV\F 

MOV 

ANO\F 

MOV\T 

MOV\F 

MOV 

CLRNF 

MOV 

IMPORTAN 

CLR\F 

INC 

CLR\F 

MOV 

CLRNF 

MOV 

ASSUME 

RESET WR 

RESET EC 

INC\F 

NOP 

XNOR 

TST 

MOV 

END OF 

CLR 



INO 
(RTO 

HEA 
(BUF 
R12 
#DMR 
(BUF 
R12, 
R17\ 
(BUF 
OBAR 
R17\ 
(BUF 
R17\ 
(BUF 
#DMR 
#BIT 
(BUF 
#FOR 
#OMR 
R1 1 
(BUF 
T - 
R1 1 



EX/SEC 
SI , R17 
DER AN 
) , R12 
SO PS 
EGO. BA 
R17, 
SD 

0, R17, 
) , DBAR 
,BII,S 

, R 1 7 , 
) . R13, 
0, R17, 
) , R14, 
EG5, BA 
14, R1 1 

1 , R17 
SCO. R1 
EG2.BA 
R1 1 ,SD 
] , R16 
RESET 
R1 1 ,S0 



TOR 

DA 
0>SSE 
ECCT 



SO 

BAR 
SO 


BAR 
SO 
BAR 



.SO 

2,SD 



CS 

•/.CALL D.SRT 
PULSE TO GO HIGH *** 
E XJNDCLK . 

XJZRO 

PULSE TO GO LOW 

7.JNZR0 
TA *»* 

%CALL O.WHD 
XJNDCLK . 



7.JN0CLK 
V.JNDCLK 

XJNOCLK 
%JNDCLK 

7.JN0CLK 

7.JNDCLK 

7.JN0CLK 

7.TNZR0 

7.JNDCLK 



ECC 
PRE 



TIME ((PRECC 

CCT %JNDCLK 



R 1 6 
R1 1 
#OMR 
R1 1 
R17 
CONT 
ITE 
C ON 
R1 1 



R1 1 , SO 
EGO, BAR 
R1 1 ,S0 
UF 

eo , 1 

GATE ON WO 

WORD 272 
RTCS PRECC 



V.JNDCLK 
7.JLATE 



RO 272 . - (R1 1 



[16K1WAIT FOR RECVR ROY * R/W ROY 

MSKJIF ERROR THEN DONE/ELSE SET WRITE MODE 

[16K1SET COMMAND MODE 

[ 16K1SET WRITE GATE 

[ 1 6K]BAR:SYNC/SEND REAL TIME COMMAND 

[16K1WHEN ORV CLK.CHK FOR PULSE HI 

[16KIWAIT FOR PULSE TO GO HI 

[ EC0#2] D . SRTC RETURNS DMREG IN BAR 



[16KIWAIT FOR PULSE TO GO LO 



[ 16K1S0 WRITE HEADER 
WHEN ORV CLK, (SO) =ECC#2(259 ) 
BARsOM REG O PTR 

WHEN DRV CLK. (SO) =ECC#3(260) 
WHEN ORV CLK, (SO) 3ECC*4(261 ) 
BARstST WORD OF TABLE ENTRY 
WHEN ORV CLK, (SD > =ECC#5 ( 262 ) 
WHEN ORV CLK, (SD) =ECC#6(263) 
BAR:2N0 WORO OF ENTRY 
WHEN ORV CLK, (SO) =ECC#7(2S4) 
BAR:3R0 WORD OF ENTRY 
WHEN ORV CLK, (SD) =ECC#»(2S5 ) 
BARiPTR TO RECIRCULATE ENTRY 
WHEN ORV CLK, (SD) =ECC#9(2S6 ) 
IF RECIRC BIT SET THEN CHG R17 
WHEN DRV CLK, (SO ) =ECC#10( 267 ] 
(16K18AR=PTR TO SECTOR SIZE 
[1GK3WHEN DRV C LK , ( SO ) s BCC# 1 1 ( 268 ) 
[ 1 6K1R1 6=SECT0R SIZE 
DATA WORO 269, WORDS 269 S 270 MUST BE ZERO * 
WHEN DRV CLK, (SO ) =ECC#1 2( 269 ) 
MSKIADD ONE TO SECTOR SIZE 
WHEN ORV CLK,(S0):0(2 7O) 
[16K]BAR»DM REG O PTR 
WHEN DRV CLK, (SD ) =0(271 ) 

I EC0#2 1 UPDATE TABLE ENTRY PTR IN DM REG 
MAKE SURE CONT IS 1 
INCREMENTED : #CONT] *** 



R1 1 , R1 1 9RSE % 

DBAR 

#SEC,R17 

M FORMAT ROUTI 

R1 1 



7.JNDC 
•'.JOSE 

CALL 

7.JZR0 
7.JNMS 

NE *»* 



XFC1ER 
. WS I G 
XRWRER 
XFC1A 



XFCSST: 

; ■ i f 



ALL XFC'S EXIT THROUGH THIS CODE 



nz , qdadm 



I00A] 



I00A1 



WHEN ORV CLK, (SD) sWORO 272 

[EC0#2jIF RTDS PULSE/PARITY ERROR THEN DONE 
[EC0#2]RESET SERDES/WAIT FOR RCVR RDY S R/W RDY 
[EC0#2]IF NOT SET THEN ERROR 
IF BIT15 NOT SET THEN CONTINUE 

I 16K1R1 1 =0 (SUCCESS) 
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003454 


013440 


000540 


1 21270 




NOP 


PRECC 


SCALL 


. CLCS 


003455 


013440 


000500 


OOOOOO 




NOP 


G>RSE 














; *** 


CHECK 


FOR REPLACE COMMAND *«* 




003456 


1 14544 


000100 


O100O0 




BIT 


#DMOOE, RLL 






003457 


013740 


01 7001 


1 37777 




MOV 


SDMREG 1 , BAR 


V.RZRO 




003460 


013440 


00301 1 


104006 


; * * * 


MOV 
FORMAT 


R1 1 , BUF 
ERROR EXITS *** 


XJMP 


XFCRET 


00346 1 


033761 


000002 


1 1 3454 


XRWRER : 


MOV 


#2 , R 1 1 


%JMP 


XFCSST 


003462 


03375 1 


00000 1 


1 I34S4 


XFC1ER: 
; . endc 


MOV 


# 1 , R 1 1 


%JMP 


XFCSST 
; tOOA! 



RESET ECC TIMING 
RESET SERDES 



IN CASE NOT DONE 



IF NOT IN DM MODE 

THEN MUST BE REPLACE COMMAND/RETURN 
STORE R11/G0 BACK TO DM 

READ/WRITE READY ERROR 
R 1 1 sFAI LURE CODE 



c 
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ROUTINE NAMES: 
XFC02 
XFC03 

FUNCTIONAL DESCRIPTION: 

THESE ROUTINES WILL PROCESS THE REAO/WRITE N SECTORS XFC'S. THIS 
COMMAND WILL ENABLE A DM PROGRAM TO READ/WRITE ANV SECTOR(S) ON THE OISK. 
THE DM PROGRAM MUST COMPLETE ALL HEAD POSITIONING REQUIRED BEFORE EXECUTING 
THIS COMMAND. DM REGISTER O POINTS TO THE FIRST BUFFER OF A BUFFER CHAIN 
(THE BUFFERS ARE MIRRORS OF THE UDA SECTOR DATA BUFFERS), AND DM REGISTER 2 
CONTAINS THE SECTOR SIZE IN WORDS. 



o 



INPUTS : 



DM REGISTER 
DM REGISTER 2 



POINTER TO FIRST BUFFER IN CHAIN 
MSB • 1 ■ NO REVECTORING PLEASE 
SECTOR SIZE IN WORDS 



OUTPUTS : 

EMPTIED/FILLED DATA BUFFERS ON SUCCESSFUL COMPLETION 

OM REGISTER t - SUCCESS 

1 - DRIVE SIGNAL TIMEOUT 



XFC02 
XFC03 
XFCRW 
; . if 



003463 
003464 
003465 
003466 
003467 
003470 



013440 
013740 
013460 
013456 
013440 
013440 



000600 
007007 
030400 
000016 
010000 
000000 



oooooo 

123611 
153466 

oooooo 

1 12606 
1 12130 



;CLR 

; MOV 

nz , qdadm 

NOP 

MOV 

NOP\T 

TST 

NOP 

NOP 

PAGE 



(PROPF 
#0MREGO, BAR 

(PSOPF 



%JMP 
XJMP 



'/.CALL 
% T MS B 



T.JZRO 
5SJMP 



X F C RW 
XFCRW 



IOOA] 



. REOX 
.WRTX 

IODA] 



EXECUTED 
EXECUTED 



IN JUMP TABLE 
IN JUMP TABLE 



I 1 6K1RESET OPF 

R17=BUFFER POINTER 

IF MMSB SET THEN NO REVECTORS 

IF REAO XFC 

THEN GO DO XFC REAO 
ELSE GO 00 XFC WRITE 
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ROUTINE NAME: 
XFC04 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL PROCESS THE SEND SDI COMMAND XFC. OM REGISTER 
CONTAINS A POINTER TO A BUFFER INCLUDING THE COMMAND AND DATA, OM REGISTER 
1 CONTAINS THE BYTE COUNT FOR THE SUFFER (INCLUDING OP CODE). IF THE BYTE 
COUNT IS ZERO THE FIRST WORD OF THE BUFFER WILL BE SENT AS A SDI REAL TIME 
COMMAND . 



INPUTS : 



DM REGISTER O 
DM REGISTER 1 
DM REGISTER 2 



POINTER TO SDI COMMAND AND DATA BUFFER 
NUMBER OF BYTES TO TRANSFER FROM BUFFER 
SDI INTERCONNECT SELECT 



OUTPUTS : 

DATA TRANSFERRED TO ORIVE 
DM REGISTER 1 



SUCCESSFUL COMPLETION 
DRIVE SIGNAL TIMEOUT 



003471 033716 000003 131004 



XFC04: ;MOV #0MREGO,BAR 

; . i f nz , qdadm 

MOV (BUF1.R16 



0O3472 
003473 
003474 
003475 
003476 



013440 
013440 
013740 
013440 
03371 2 



OOOOOO 
OOOOOO 
007001 
01701 6 
0OOO03 



133474 
1 13454 
12361 1 
051347 
111212 



NOP 




NOP 




MOV 


#DMREG1 , BAR 


MOV\F 


R16, BAR 


MOV 


(BUF) , R12 



7.CALL 

•/.CALL 

%JMP 

•/.CALL 

7.JNZR0 

%JMP 



XFC04 

: IODA] 
X SSDI 

XF04A 
XFCSST 
S . L017 
LEV2 . T 
LEVOWR 

; [ooa] 



EXECUTED IN JUMP TABLE 

GO SELECT SDI INTERCONNECT 
R16=P0INTER TO COMMAND BUFFER 
GO DO THE RIGHT COMMAND 
SET DM R1/GD BACK TO DM 
R17=# BYTES TO TRANSFER 

IF BYTE CNT NEO O THEN SEND COMMAND FROM TABLE 
ELSE GO SEND REAL TIME COMMAND 



( 
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ROUTINE NAME: 
XFC05 



""> 



FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL PROCESS THE RECEIVE SDI RESPONSE XFC. THIS ALLOWS 
THE PROGRAM RUNNING ON THE DM TO GET A RESPONSE TO A SDI COMMAND SENT VIA 
THE SEND SDI COMMAND XFC. DM REGISTER CONTAINS A POINTER TO A SUFFER 
WHICH IS TO HOLD THE DRIVE RESPONSE, DM REGISTER 1 CONTAINS THE SIZE OF 
THE 8UFFER OESCRISED BY RO , AND DM REGISTER 2 CONTAINS THE SDI INTERCONNECT 
SELECT . 



INPUTS: 

DM REGISTER 

DM REGISTER 

DM REGISTER 



POINTER TO DRIVE RESPONSE BUFFER 
NUMBER OF WORDS IN BUFFER 
SDI INTERCONNECT SELECT 



OUTPUTS : 

FILLED DRIVE RESPONSE BUFFER 
DM REGISTER 
DM REGISTER 1 











XFC05: 


; NOP 












; . i f 


nz , qdadm 


003477 


133755 


000024 


13 1004 




MOV 


#12000, R15 


003500 


013740 


OO7O07 


123B05 


XFCSA : 


MOV 


#DMREGO, BAR 


0035O1 


013740 


007001 


12360S 




MOV 


#0MREG1 , BAR 


003S02 


013440 


000000 


131273 




NOP 




003503 


014551 


00000 1 


0100OO 




BIT 


#DCERR,R1 1 


003504 


031455 


1 001 s 


1 53506 




DEC\F 


R1S 


003505 


013440 


OIOOOO 


013500 




NOP 




003S06 


013740 


007007 


133615 


XFC5B : 


MOV 


#0MREGO,8AR 


003 5 07 


13440 


oooooo 


1 13454 


; . endc 


NOP 





DRIVE RESPONSE OP CODE 

BITOO - TIMEOUT OF RECEIVE OPERATION 

BIT01 • FIRST WORD NOT A START FRAME 

BIT02 - FRAMING ERROR 

BIT03 - CHECKSUM ERROR 



EXECUTEO IN JUMP TABLE 



%JMP 


XFC05 




; [OOAI 


".CALL 


X .SSDI 


'/.CALL 


S . LD 1 3 


7.CALL 


S . LD14 


7.CALL 


LEV1R0 


7.J2R0 


XFC5B 


7.JN2R0 


XFCSA 


%CALL 


S .ST12 


%JMP 


XFCSST 




; [OOA] 



GO SELECT SOI INTERCONNECT 
R13SP0INTER TO DRIVE RESPONSE BUFFER 
R14=SIZE OF BUFFER IN WORDS 
GO TRY AND READ DRIVE RESPONSE 
IF NOT DRIVE CLK TIMEOUT 
THEN RESPONSE RECEIVED 
IF R15 NEO O THEN LOOP 
STORE OP CODE IN DM REG O 
SET DM R1/G0 BACK TO DM 
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ROUTINE NAME: 
XFCOS 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL PERFORM THE COMPARE DATA PATTERN TO BUFFER XFC. 
DM REGISTER O CONTAINS THE WORD COUNT, DM REGISTER 1 CONTAINS THE 
SUFFER START AODRESS, OM REGISTER 2 CONTAINS THE FIRST DATA PATTERN. 
DM REGISTER 3 CONTAINS THE SECOND OATA PATTERN, AND OM REGISTER 4 CONTAINS 
THE THIRD DATA PATTERN. THE FIRST DATA PATTERN WILL 

COMPARED TO THE FIRST BUFFER WORD. THE SECOND TO THE SECOND, THE THIRD 
TO THE THIRD. THEN THE FIRST TO THE FOURTH, THE SECOND TO THE FIFTH, 
ETC . . ETC . 



INPUTS : 



OM REGISTER 



WORD 
WORD 
WORD 
WORD 
WORD 



OF TABLE 

OF TABLE 

OF TABLE 

OF TABLE 

OF TA8LE 



OUTPUTS : 

DM REGISTER 



POINTER TO TABLE CONTAINING THE FOLLOWING: 

WORO COUNT 

POINTER TO START OF COMPARE BUFFER 

COMPARE PATTERN #1 

COMPARE PATTERN #2 

COMPARE PATTERN #3 



O - ALL TRIPLE WORDS OF THE BUFFER COMPARED 

TO THE TRIPLE WORD COMPARE PATTERNS 
NONZERO - COMPARE ERROR AND VALUE IS OFFSET 
OF TRIPLE WORD FROM THE ENO OF THE 8UFFER. 











XFC06 : 


; NOP 




'iJMP 


XFC06 










; . i f 


nz . qdadm 




i [OOAI 


0035 1 O 


1 3740 


O07OO7 


133604 




MOV 


#DMREG0. BAR 


%CALL 


S . LDI2 


0035 1 1 


0I0SS2 


007001 


133606 




ADD 


» 1 , RI2\N. BAR 


'/.CALL 


5.1014 


0035 1 2 


010552 


007002 


123607 




ADO 


#2, RI2VN, BAR 


'/.CALL 


S . LD 15 


0035 13 


0IOS52 


007003 


13 3 6 10 




ADO 


#3, R12\N, BAR 


'/.CALL 


S. LD1 8 


0035 14 


010552 


007004 


13361 1 




ADD 


#4 , R12\N, BAR 


"/.CALL 


S. LD17 


0035 1 5 


010552 


007000 


123603 




ADD 


#0, R12\N, BAR 


•'.CALL 


S. LD1 1 


0035 16 


120354 


017014 


1 13454 


XFC06A: 


INCB 


R14\0, R14, BAR 


iSJZRO 


XFCSST 


003517 


016515 


000003 


010000 




XDR 


(SUFI , R1S\N 






003520 


120354 


017014 


0034S4 




INCB 


R14\0, R14, BAR 


%JNZRD 


XFCSST 


003521 


031451 


OOOOI 1 


OOOOOO 




DEC 


R1 1 






003522 


01 85 1 6 


010003 


143454 




X0R\F 


IBUF) , R16NN 


IJZRO 


XFCSST 


003523 


1203S4 


017014 


003454 




INCB 


R14\0, R14, BAR 


%JNZR0 


XFCSST 


003524 


0314S1 


00001 1 


OOOOOO 




DEC 


R1 1 






003525 


016517 


010003 


153454 




XDR\F 


IBUF) , R17\N 


7.JZR0 


XFCSST 


003526 


031471 


OIOOI 1 


15351 6 




DECNT 


R1 1 


7.JZR0 


XFCOSA 


O03527 


013440 


oooooo 


1 13454 


; . endc 


NOP 




%JMP 


XFCSST 
, [OOA] 



EXECUTED IN JUMP TABLE 

R12=TABLE POINTER 

R14=BUFFER START ADDRESS 

RISsDATA PATTERN #1 

R16:DATA PATTERN »2 

R17:DATA PATTERN »3 

R11:W0RD COUNT 

BAR:AODR/IF LAST ALU EO O THEN RETURN 

IF BUFFER NEO PATTERN #1 

THEN ERROR/ELSE BAR=NEXT WORD/INCR R14 
DECR WORO COUNT 
IF WORD CNT EO O THEN DONE/IF BUFFER EO PATTERN 

THEN ERROR/ELSE BARiNEXT WORD/INCR R14 
OECR R1 1 
IF BUFFER EO PATTERN »3 

THEN DECR R1 1 8 LOOP 

ELSE ERROR AND EXIT 
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ROUTINE NAME: 
XFC07 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL PROCESS THE RETURN ORIVE SIGNALS XFC. DM REGISTER 
2 CONTAINS THE SOI INTERCONNECT TO SELECT. THE ORIVE SIGNAL STATUS WILL 
BE RETURNED IN DM REGISTER 1 . 



INPUTS : 



%4**^ 



DM REGISTER 2 



OUTPUTS : 

DM REGISTER 1 



SDI INTERCONNECT SELECT 



REAL TIME DRIVE STATUS 











XFC07 : 


; NOP 










i . 1 f 


n: , qdad 


O03530 


013440 


000000 


121004 




NOP 


003531 


03371 1 


000002 


010000 




MOV 

; C 
BIC 


003532 


035551 


0002 14 


010000 




003533 


133551 


000001 


OOOOOO 




BIC 
MUST SE 


003S34 


03357 1 


1 1O004 


143535 




BIS\T 


003535 


03357 1 


1 50010 


153536 




BIS\T 


003536 


033571 


140200 


153537 




SIS\T 


003S37 


13357 1 


1 40001 


1 43540 




BIS\T 


OQ3540 


013440 


OOOOOO 


1 13454 




NOP 



( RTDS) , R1 1 



XFC07 

; [QDAl 
X .SSOI 



EXECUTED IN JUMP TABLE 



CLEAR THESE PREVIOUSLY FLOATING BITS 
#<BIT02 + BIT03<-BITO7>,R11 
#<BIT0S>,R1I 



GO SELECT SOI INTERCONNECT 
[ODAISET OM R1 



[ODA] DM BUG FIX 
[ODA] DM BUG FIX 



IN RTDS THAT HAVE BEEN REMOVED AND ARE ONLY JUMP CONDITIONS 



#BIT02, R1 1 
#8IT03, R1 1 
#BIT07, R1 1 
#BITOS, R1 1 



•/.TCSR 

•/.TOSR 

7.TDSER 

STPSER 

7.JMP 



XFCSST 

; [qda] 



[ODAISET RTCS RDY H 
[QDAJSET RTDS RCVD H 
[ODAISET DATA XMIT ERROR H 
[ODAISET RECV ERROR H 
[ODAIRETURN BACK TO DM 
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ROUTINE NAME: 
XFCOS 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL PROCESS THE ECHO DATA TO DRIVE XFC. OM 

REGISTER CONTAINS THE DATA TO BE ECHOED TO THE DRIVE AND DM REGISTER 

2 CONTAINS THE SOI INTERCONNECT SELECT CODE. 



INPUTS: 

OM REGISTER 
OM REGISTER 

OUTPUTS : 

DM REGISTER 
DM REGISTER 



DATA TO ECHO TO DRIVE (HI 
SDI INTERCONNECT SELECT 



BYTE MUST BE 2ER0! ) 













XFC08 : 


; MOV 


#DMREGO,BAR 


it J MP 


XFC08 












; . if 


nz , qdad 


Tl 




; [ODA] 


D 
< 


003541 


033712 


OOOO03 


121004 




MOV 


(BUFI , R12 


7.CALL 


X . SSOI 


003542 


133SS2 


0OO35O 


131212 




BIS 


#ECH0C0,R12 


•/.CALL 


LEVOWR 


003543 


033753 


010377 


0434S4 




MOV\F 


#377, R13 


itJNZRO 


XFCSST 


003544 


013740 


007007 


121244 


XFC08A: 


MOV 


#DMREGO,BAR 


'/.CALL 


LEVORD 


o 


003545 


031453 


10013 


103547 




DEC 


R13 


%JZRO 


XFC08B 


II 


003S4S 


1 3045 1 


01001 1 


043544 




INC\F 


R1 1 


%JNZRO 


XFC08A 


2 

cc 
O 

u. 

V) 

o 

V) 


003547 


013440 


003012 


1 134S4 


XFC088: 


MOV 


R12.BUF 


%JMP 


XFCSST 










: . endc 








; [0DA1 












.PAGE 









WORD OF DATA ECHOED BACK FROM ORIVE 

- SUCCESSFUL 

1 - TIMEOUT ON SDI LEVEL 1 SEND 

2 ■ TIMEOUT ON SOI LEVEL 1 RECEIVE 



EXECUTED IN JUMP TABLE 



SELECT SDI INTERC0NNECT/R12:DATA TO ECHO 

SEND ECHO REAL TIME COMMAND 

IF TIMEOUT THEN EXIT/ELSE R13=RECV T/0 VALUE 

DO LEVEL READ/RESET BAR 

IF O THEN DONE/ELSE DECR R13 

00 TIMEOUT LOOP 

SET OM R1/G0 BACK TO OM 



( 
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ROUTINE NAME: 
XFC09 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL PROCESS THE INITIALIZE DRIVE XFC COMMAND. THE 
SOI INTERCONNECT SELECT WILL BE CONTAINED IN DM REGISTER 2. 



003550 01344O 

003551 013440 

003552 013440 



OOOOOO 
000000 
OOOOOO 



121004 
131022 
1 0400G 



INPUTS : 

DM REGISTER 



OUTPUTS: 

NONE 



; NOP 
nz , qdactm 
NOP 
NOP 
NOP 

.PAGE 



SOI INTERCONECT SELECT 



%JMP 


XFC09 




: tODA] 


7.CALL 


X SSDI 


•/.CALL 


D . INIT 


%JMP 


XFCRET 




; [QDA] 



EXECUTED IN JUMP TABLE 



GO SELECT SDI 
GO INIT DRIVE 
GO SACK TO DM 



INTERCONNECT 
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ROUTINE NAME: 
XFC10 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE PROCESSES THE WAIT FOR SECTOR/INDEX PULSE XFC. 
THIS ROUTINE WILL WAIT FOR THE LEADING EDGE OF SECTOR OR INDEX 
PULSE TO OCCUR AND THEN WAIT FOR THE TRAILING EDGE BEFORE RETURNING 
TO THE CALLING PROGRAM. 



INPUTS : 



SOI INTERCONNECT 



003553 013440 OOOOOO 121004 

003554 033751 0OO06O 132507 

003555 034451 000011 113454 



nz , qdadm 






; IODAI 


NOP 




7.CALL 


X SSDI 


MOV #<SEC*IOX> 


RI1 


•/.CALL 


D . CPUL 


CLR R1 1 




%JMP 


XFCSST 

; !00A] 



EXECUTED IN JUMP TABLE 

GO SELECT SOI INTERCONNECT 

GO WAIT FOR SECTOR/INDEX TRANSITION 

ZAP R11/EXIT XFC 
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ROUTINE NAME: 
XFC11 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL PROCESS THE READ UNI8US MEMORY XPC. THIS ALLOWS 
THE DM PROGRAM TO READ OATA FROM THE HOST. DM REGISTER CONTAINS THE LOW 
OROER 16 BITS OF THE UNIBUS AOORESS, OM REGISTER 1 CONTAINS THE HIGH OROER 
16 BITS OF THE UNIBUS ADDRESS, DM REGISTER 2 CONTAINS THE NUMBER OF WOROS 
TO TRANSFER, AND DM REGISTER 3 CONTAINS THE DM BUFFER ADDRESS. WORD COUNT 
AND BUFFER AOORESS VALIDATION ARE PERFORMED HERE (D.PROC) ANO A FLAG IS SET 
TO REQUEST XFC SERVICE FROM THE U. PROCESSOR. THE XFC CODE IS PASSED TO THE 
U.PROC IS REGISTER R11 AND THE D.PROC THEN SETS THE REQUEST XFC SERVICE BIT 
IN THE RLL (SYSTEM STATUS) REGISTER. THE U. PROCESSOR CLEARS THIS BIT WHEN 
THE XFC IS COMPLETE. 



'"""V 



INPUTS : 

OM REGISTER 

DM REGISTER 1 

DM REGISTER 2 

DM REGISTER 3 

OUTPUTS : 

DATA READ FROM THE HOST 

DM REGISTER 1 



LD ORDER UNIBUS ADDRESS 
HI ORDER UNIBUS ADDRESS 
NUMBER OF WOROS TO TRANSFER 
OM DATA BUFFER ADDRESS 



SUCCESSFUL 

WORD COUNT EXCEEDS I6K 

DM SUFFER ADDRESS LESS THAN UN . BUF 

NONEXISTENT UNIBUS MEMORY 

UNIBUS PARITY ERROR 











XFC1 1 : 


;MOV 


#1 1 . ,R1 1 


XJMP 


XFC1 1 










; ■ it 


nz , qdadm 




; [Q0A1 


OQ3556 


01374O 


007002 


133604 




MOV 


#DMREG2, BAR 


'/.CALL 


S . L012 


003557 


1 14552 


0003QQ 


010000 




BIT 


#140000, R 1 2 






003560 


033771 


10001 


043564 




MOV\T 


#BITQO, R1 1 


%JNZRO 


XF 1 1C 


003561 


133544 


000020 


O10000 


XF1 1A: 


BIS 


#DXFC, RLL 






003562 


1 1 4544 


000020 


10000 


XF1 IB : 


BIT 


#DXFC, RLL 






003563 


1 1 4544 


01010O 


013562 




BIT 


#DMODE, RLL 


7.JNZR0 


XF1 IB 


0O3564 


Ol 3440 


1 OOOO 


013454 


XF1 1C: 


NOP 




IJ«ZRO 


XFCSST 


Q03S65 


I3S544 


000040 


100701 


XF1 10 : 
; . endc 


BIC 
. PAGE 


#DMBEG, RLL 


%JMP 


D . IDLE 
; IQOA] 



EXECUTED IN JUMP TABLE 

R12 = # WOROS TO TRANSFER 
[16K1TEST FOR GREATER THAN 1SK 
IF TOO BIG THEN ERROR EXIT 

ELSE OK AND TELL U.PROC 
CHECK IF U.PROC DONE 
IF NOT DONE THEN LOOP 
IF IN DM MODE THEN EXIT 

ELSE MUST HAVE BEEN XFC 17 
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ROUTINE NAME: 
XFC12 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL PROCESS THE WRITE UNIBUS MEMORY XFC. THIS ALLOWS 
THE OM PROGRAM TO WRITE DATA FROM THE HOST. OM REGISTER CONTAINS THE LOW 
ORDER 16 BITS OF THE UNIBUS ADDRESS, DM REGISTER 1 CONTAINS THE HIGH ORDER 
16 BITS OF THE UNIBUS ADDRESS, DM REGISTER 2 CONTAINS THE NUMBER OF WORDS 
TO TRANSFER, AND DM REGISTER 3 CONTAINS THE OM BUFFER ADDRESS. WORD COUNT 
AND SUFFER ADDRESS VALIDATION ARE PERFORMED HERE (O.PROC) AND A FLAG IS SET 
TO REQUEST XFC SERVICE FROM THE U. PROCESSOR. THE XFC CODE IS PASSED TO THE 
U.PROC IS REGISTER R11 AND THE D.PROC THEN SETS THE REQUEST XFC SERVICE BIT 
IN THE RLL (SYSTEM STATUS) REGISTER. THE U. PROCESSOR CLEARS THIS BIT WHEN 
THE XFC IS COMPLETE. 



INPUTS : 

OM REGISTER O 

DM REGISTER 1 

DM REGISTER 2 

DM REGISTER 3 

OUTPUTS: 

DATA WRITTEN TO THE HOST 

DM REGISTER I 



MOV 
. PAGE 



LO ORDER UNIBUS ADDRESS 
HI ORDER UNIBUS ADDRESS 
NUMBER OF WOROS TO TRANSFER 
DM DATA SUFFER ADDRESS 



SUCCESSFUL 

WORD COUNT EXCEEDS 4K 

DM BUFFER ADDRESS LESS THAN 640 

NONEXISTENT UNIBUS MEMORY 



EXECUTED IN JUMP TABLE 



i r " 



* kJ 



KDB50. MICROCODE., 22- APR-19S8 11:27:16. 99 



U.PRQC AND D.PROC SUBROUTINES 



DIGITAL EOUIPMENT CORP., 2901 ASSEMBLER VERSION 32 



PAGE 208 



J. 



.SBTTL U.PROC AND D.PROC SUBROUTINES 
;+ 04-FEB-63 USA MICROCODE 

ROUTINE NAMES: 
P . LOCK 
UNLOCK 

FUNCTIONAL DESCRIPTION: 

P. LOCK WILL WAIT FOR THE ALTERNATE PROCESSOR TO SET THE 'PLOCK' SIT 
IN THE CONTROL REGISTER IMAGE (RLL). IT WILL THEN CLEAR THE 'PLOCK' BIT 
IN THE RLL TO LOCK OUT THE ALTERNATE PROCESSOR. 

UNLOCK WILL SET THE 'PLOCK' BIT IN RLL, EFFECTIVELY UNLOCKING THE 
ALTERNATE PROCESSOR. 



INPUTS: 

RLL 

OUTPUTS : 

P . LOCK 
UNLOCK 

STACK LEVEL : 

NONE USEO 



CONTROL REGISTER IMAGE 



ALTERNATE PROCESSOR LOCKED OUT OF MUTEXED DATA AREAS 
ALTERNATE PROCESSOR FREE TO USE MUTEXED DATA AREAS 



0035 6 6 

003566 013440 020000 

003567 0S0144 000004 



ASSUME PLOCK, EO, BIT15 
137777 P.LCKA: NOP %RCRY 

103566 P. LOCK: ADD\R RLL, RLL 7.JMP P.LCKA 



PLOCK MUST BE MSB 

IF OTHER PROC FREE THEN RETURN 

IF OTHER PROCESSOR MUTEXING 



003570 133544 000200 137777 UNLOCK: 



BIS 
PAGE 



•PLOCK, RLL 



SET PLOCK/RBTURN 
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ROUTINE NAME: 

D.GMST ID. PROC GET MUTEXED SOI STATUS) 

FUNCTIONAL DESCRIPTION: 

THESE ROUTINES WILL LOCK OUT THE OPPOSITE PROCESSOR (USING THE 
PLOCK BIT IN RLL). LOAD THE SOI STATUS {FROM SOI ST] INTO RO OR Rll, 
AND RETURN. IT SHOULD BE NOTED THAT IT IS THE CALLER'S RESPONS I B I L I T V 
TO FREE THE OPPOSITE PROCESSOR 
BY EITHER CALLING UNLOCK OR BY PERFROMING THE FOLLOWING INSTRUCTION: 

BIS KPLOCK.RLL 

INPUTS : 

OBAR POINTING TO SOI CONTROL SLOCK OF INTEREST 



OUTPUTS 
S 



01 STATUS IN R1 1 

OCKED OUT U.PROC OR O.PROC 



STACK L 

N 



EVEL : 
ONE USED 



a 

< 

o 

II 

cc 
o 

LL 

o 



003571 010555 027000 113603 AOD »S0 I ST . OBAR\N . BAR %JCRY S.L011 : THEN R11 = SDI STATUS / RETURN 

003572 0S0144 000004 103571 O.GMST: A00\R RLL. RLL %JMP .-1 ; IF PLOCK (BIT151 IS ONE 

PAGE 



c 
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ROUTINE NAME: 
S . ROTL 
S .SWAB 
S . RR17 



(ROTATE R12 LEFT! 
(SWAP BVTES OF RI2) 
(ROTATE R17 RIGHT) 



FUNCTIONAL DESCRIPTION: 

S.ROTL WILL ROTATE R12 LEFT THE NUMBER OF TIMES SPECIFIED 
IN RI1. THIS IS THE ORIVE PROCESSOR'S ROTATE LEFT ROUTINE. 

S.SWAB WILL SWAP THE BYTES OF R 1 1 

S.RR17 WILL ROTATE R17 RIGHT 






R11 (S.ROTL, 
RI2 (S .ROTL) 
R17 (S.RR17I 



THE NUMBER OF TIMES TO ROTATE LEFT 
THE REGISTER TO ROTATE LEFT 
THE REGISTER TO ROTATE RIGHT 



OUTPUTS : 

R12 



STACK LEVEL: 

NONE USED 



ROTATEO LEFT R11 TIMES / BVTE-SWAPPEO 



003573 0734S2 

003574 031451 

003575 033751 



003576 
003577 



0534S7 
031451 



010012 
OOOOI 1 
O00O10 



010017 
OOOOI 1 



137777 
103573 
1 13574 



127777 
103576 



. ROTL 

SWAB 



SHF\L R12 
DEC R1 1 

MOV #8 . , R1 1 



%R2R0 

%JMP . - I 

%JMP S.ROTL 



ROTATE R12 LEFT/IF R11 = 

OECR R1 1 

SWAP BVTES ENTRY 



O THEN RETURN 



ROUTINE TO SHIFT R17 RIGHT THE NUMBER OF PLACES SPECIFIED BY R11 



SHF\R 
DEC 
. PAGE 



R17 
R1 1 



%R2R0 
%JMP 
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ROUTINE NAME: 

S.S011 (GETS ADDRESS OF SDI.1 IN R11) 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINES WILL LOAD THE ADDRESS OF SDI.1 IN R11 



OUTPUTS : 
R1 1 



003600 033751 000355 0100OO S.SD11: MOV 

003601 133551 000002 127777 BIS 

. PAGE 



ADDRESS OF SDI.1 



#SOI . 1SL0BYT.R1 1 

#SOI . 1SHIBYT.R1 1 SRET 



; R1 1 :L0 SOI . 1 ADDRESS 

; SET IN HI ADORESS/RETURN 



Q 
< 

a 

ii 

5 

o 

u. 

to 
o 
eo 






KDBSO. MICRO CODE. .22-APR-19SS 11 : 27 : 16.96 



KDBOP DIGITAL EQUIPMENT CORP., 2901 ASSEMBLER VERSION 32 

U.PROC AND D.PROC SUBROUTINES 



PAGE 212 



c 



ROUTINE NAMES: 

S . LDCR.S . LDOO.ETC . 
FUNCTIONAL DESCRIPTION: 

THESE ROUTINES WILL LOAD THE REGISTER NUMBER SPECIFIED AS THE LAST 
TWO CHARACTERS OF THE SUBROUTINE NAME, I.E. S.L011 WILL LOAD R11 FROM BUF. 

INPUTS : 

BAR POINTER TO THE BUFFER ADDRESS WHOSE DATA IS DESIRED 

TO BE LOADED IN THE REGISTER 

OUTPUTS: 

REGISTER LOADED WITH CONTENTS OF SUFFER POINTED TO BY BAR 



LOAD R2 FROM BUFFER 
LOAD R1 1 FROM BUFFER 



003602 


033702 


000003 


137777 


S 


L0R2 


MOV 


(BUF) 


R2 


%RET 


003603 


03371 1 


000003 


127777 


S 

s 


LD1 1 
LDPC 


MOV 


(BUF) 


R1 1 


%RET 


OO3604 


033712 


000003 


127777 


s 


LD12 


MOV 


(BUF) 


R12 


%RET 


003S05 


033713 


0OO003 


1 37777 


s 

s 


LD13 

LDCC 


MOV 


(BUF) 


R13 


IRET 


003S06 


033714 


000003 


127777 


s 
s 
s 


LD1 4 
LOCY 
LD15 


MOV 


(BUF) 


R14 


%RET 


003607 


033715 


000003 


137777 


s 


LDDB 


MOV 


(BUF) 


R15 


%RET 










LDRT1 : 










003610 


033716 


000003 


137777 


S 


LD16 


MOV 


(BUF) 


R1 6 


%RET 


00361 1 


033717 


0OOOO3 


127777 


s 


LD17 


MOV 


(BUF ) 


R1 7 


SRET 



0036 1 2 
003EI3 



033712 
034552 



; *** SPECIALTY ROUTINES *** 

000003 000000 S.LL12: MOV (BUFI.R12 
000377 137777 S . ML 1 2 : AND #L0BYT,R12 
. PAGE 



LOAD R12 FROM 8UFFER 
LOAO R13 FROM BUFFER 



LOAD R14 FROM BUFFER 



LOAD R15/DBAR FROM BUFFER 



LOAO R16 FROM BUFFER 
LOAO R17 FROM BUFFER 



R12: (BUF) 

ISOLATE LO BYTE/RETURN 
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ROUTINE NAMES: 

S STOO. S .STRO.ETC . 

FUNCTIONAL DESCRIPTION: 

THESE ROUTINES WILL STORE THE THE REGISTER NUMBER SP6CIFIE0 AS THE 
LAST TWO CHARACTERS OF THE SUBROUTINE NAME INTO THE BUFFER LOCATION POINTED 
TO BY BAR, I.E. S . ST 1 1 WILL STORE RI1 INTO THE BUFFER. 



INPUTS : 



POINTER TO BUFFER AREA WHERE REGISTER OATA IS 
DESIRED TO BE STORED 



O03614 013440 003011 



003615 
0036 I 6 



O036I7 
003620 



003621 
003622 



013440 003012 
013440 003013 



01 3440 
013440 



01344O 
01 3440 



00301 4 
003015 



00301 6 
003017 



127777 
137777 



127777 
137777 



137777 
127777 



S.SI1I 
S STPC 
S ST12 
S ST 1 3 
S STCC 
S .ST14 
S ST15 
S STDB 
ST0RT1 
S . ST1 6 
S .ST17 



MOV 
MOV 



MOV 
MOV 



MOV 
MOV 
. PAGE 



Rl 1 , BUF 



R12. BUF 
R13. BUF 



R14. BUF 
R1S, BUF 



R16, BUF 
R17.BUF 



%RET 
'/.RET 



•/.RET 
•/.RET 



%RET 

%RET 



STORE R1 1 INTO BUFFER 



STORE R12 INTO BUFFER 
STORE R13 INTO BUFFER 



STORE R14 INTO BUFFER 
STORE R15/0BAR INTO BUFFER 



STORE R16 INTO BUFFER 
STORE R17 INTO BUFFER 
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ROUTINE NAME: 
S .CLRB 
INIT1 
INITM1 



(CLEAR BUFFER LOCATION) 
(SET SUPPER LOCATION TO 1) 
(SET BUFFER LOCATION TO -1) 



FUNCTIONAL DESCRIPTION: 

THE S.CLRB ROUTINE WILL STORE ZERO INTO THE BUFFER POINTED TO 
BV BAR. 

THE INIT1 ROUTINE PUTS A 1 IN THE MEMORY LOCATION POINTED TO BV BAR. 

THE INITM1 ROUTINE PUTS A -1 IN THE MEMORY LOCATION POINTED TO BY BAR. 

***NOTE THESE ROUTINES CAN BE CALLED BV EITHER PROCESSOR BECAUSE THEV 
USE NO REGISTERS. 






INPUTS : 

BAR 



POINTER TO BUFFER LOCATION TO CLEAR/SET TO 1/-1 



OUTPUTS: 

CLEARED BUFFER LOCATION (S.CLRB) 
1 IN BUFFER LOCATION (INIT1I 
-1 IN BUFFER LOCATION (INITM1) 



003623 014440 003000 

003624 013740 003001 

003625 017740 003000 



137777 


S . CLRB : 


CLR 


, \N.BUF 


%RET 


137777 


INIT1 : 


MOV 


#1 , BUF 


%RET 


137777 


INITM1 : 
. PAGE 


COM 


#0, BUF 


%RET 



(BUF) = O/RETURN 
INITIALIZE TO 1 /RETURN 
INITIALIZE TO 177777 / RETURN 
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SBTTL DIAGNOSTIC MACHINE INTERPRETER AND OMOT 



LARV 
GRACE 
GRACE 
GRACE 



27-JUN-79, UPDATED O3-0EC-SO 
SEPT-81 , FOR [EC0#1 I 
N0V-B1 , FOR ( 16K1 
FEB-82, FOR UDA52 



DIAGNOSTIC MACHINE INSTRUCTION FORMATS 



ARITHMETIC INSTRUCTIONS 



OP 



OP ♦ MODE 1- RB»10 * RA 

(RA=0 --> ABS MEM OEST IN LINE) 



Q 
< 

a 

ii 

5 
cc 
O 
u. 

W 

o 

05 



looooo 

10100O 
102000 
103000 
IO400O 
105000 
1O6O0O 
1O700O 
1 14000 
1 154O0 
1 15O0O 
1 17400 
1 10200 
1 10600 
1 10700 



STORE 

BITSET 

BITTEST 

BITCLR 

LOAD 

ADD 1 

COMPARE 

SUBTRACT 

CLEAR (RA) 

INCREMENT ( RA ) 

TEST (RA) 

DECREMENT ( RA ) 

ROTATE (RA) LEFT 

ROTATE (RA) RIGHT 

SWAP BYTES (RA) 



200 
400 
SOO 



BRANCH INSTRUCTIONS 
OP 



REGISTER 

REGISTER (RBI AUTOINC (270 = IMMEDIATE) 

AUTODEC REGISTER ( RB ) (470 IS AN ILLEGAL MODE) 

MEMORY, INDEXED BV RB (670 IS AN ILLEGAL MODE) 

INDICATES INDIRECTION 

** STORE ILLEGAL IN MODE 27X OR XXO >* 
\ 
\ "MODE" AND "RB" DON'T APPLY 



"MODE" AND "RB" DON'T APPLV, RA=0 ILLEGAL 



OP + ADDRESS 



JUMP O IS RETURN 



JUMP 

10000 JUMP IF ZERO 

20000 JSB (JUMP SUBROUTINE) 

30000 JUMP IF POSITIVE 

4O0OO JUMP IF CARRY CLEAR 

5O0OO JUMP IF NONZERO 

6O00O XFC (ESCAPE TO MICROCODE) - XFC O IS BREAKPOINT 

70000 JUMP IF NEGATIVE 



REGISTER USAGE: 



A r " 



RPC 
RIB 
RCC 
RCY 
RT1 
RT2 



(R12) 
(R13) 
(R14) 
(R15) 
(R16) 
(R17) 



DM PROGRAM COUNTER 

HOLDS CURRENT DM INSTRUCTION 

HOLDS LAST ARITHMETIC/LOGICAL RESULT FOR COND COOES 

HOLDS CARRY OF LAST ARITHMETIC OP 

GENERAL PURPOSE TEMP #1 

GENERAL PURPOSE TEMP #2 
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DM REGISTERS ARE STORED IN FIRST 8 LOCATIONS OF BUFFER MEMORY 

IN GENERAL, DM RN : LOCATION N; EXCEPTIONS: ROtLOC 7, SP = LOC 6 
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003826 
003627 



003640 
00364 1 
003642 
003643 

003644 



00364S 
003646 



033752 
1335S2 



0003SS 

00O0O2 



10OOO 
OOOOOO 



CENTER DM HERE TO ZAP H I GH - ORDER CARRY BITS 
MOV #0M.6£G-»0MSTR«L0BYT,RPC ; [16K]RPC = L0 DM START AOOR 

BIS #0M. BEG4HIBYT.RPC ; [16KIRPC=HI DM START AOOR 



003630 034455 020015 013734 GETCRY: 



til RCY %JNCRY SETCRY ; 

FETCH IS THE BEGINNING OF EVERY DM CYCLE 



003631 


120452 


007012 


OOOOOO 


FETCH: 


INC 


RPC\0, RPC, BAR 














DMPC : 


; TRACE 


THIS ADDRESS 


FOR 


TO SEE 


DM PROG 


003632 


1 1 4544 


000040 


010000 


FETCH2: 


BIT 


#DMBEG, RLL 








003633 


033713 


010003 


143776 




MOVAF 


(BUF) , RIB 




"/.JZRO 


0XFC17 


003634 


1 14553 


030020 


013752 


FETCH3: 


BIT 


#10000, RIB 




XJNNEG 


BRANCH 


003635 


014553 


01O2OO 


01 3647 




BIT 


#200 , RIB 




%JNZRO 


SNGLOP 


003636 


1 14553 


O10001 


103706 




BIT 


#400 , RIB 




7.JZR0 


MODE04 


003637 


053456 


1001 3 


013676 




MOV\R 


RIB, RT1 




%JNZRO 


M0DE6 



SET CARRY (INVERTED) FROM LAST OP 



START FETCH AND BUMP PC 

COUNTER 

IF DM NOT RUNNING 

THEN OONE/ELSE GET DM INSTRUCTION 
BRANCH CLASS IS POSITIVE 
1-OP INSTS HAVE lOOOO ON 
OECODE THE SRC/OST MODE 
START SHIFTING RB INTO <2:0> 



054556 
014553 
053456 
130454 
013440 



1 20452 

031456 



000034 
10 100 
0000 1 6 
000016 
003014 



01 7012 
000O1 2 



010000 
1 13645 
123703 
010000 
113713 



1037 1 6 
1037 1 3 



AUTOINCREMENT MODE - CHECK FOR RB=0 (IMMEDIATE OR ABSOLUTE MODE) 



MOV\R 

INC 

MOV 



INC 

OEC 



#7*4 , RT1 
#100,RIB 
RT1 , RT 1 
RT1 , RCC 
RCC, BUF 



RPC\0 , RPC, BAR 
RPC. RT1 



t.jzro 

)SCALL 



%JZRO 
%JMP 



IMMED 
GETRBX 



OPOCO 
CKSTO 



ISOLATE RB 

BR IF IMMED/ABS MODE AND SEPARATE THEM 

NOT IMMED/ABS MODE, FETCH REGISTER 

MAKE INCREMENTED COPY 

STORE COPY, SRC ADR = ORIGINAL 

CODE SHARED WITH AUTODECREMENT 



BR IF IMMED MODE - SOURCE 
ABS MODE - ALLOW STORES 



NEXT WORO 
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SINGLE-OPERAND INSTRUCTIONS COME HERE FOR DECODE 



003647 
O036SO 
003651 

0036S2 
003653 
003654 
0036SS 
003656 
003657 
003660 
003661 

003662 
003663 
003664 
003E65 

003666 
003687 
003670 
003671 
003672 
003673 

003674 
003675 



1 14553 
033756 
033756 

01 4553 
120472 
033714 
1 14553 
014553 
0301S4 
033154 
034455 

016155 
053454 
136554 
036555 

0S3454 
053454 
053454 
053454 
134554 
013440 

053454 
053454 



010001 
010000 
00000 1 

007007 
017012 
000003 
00000 1 
10100 
000014 
023015 
000015 

010014 
040014 
000200 
00000 1 

O0OO1 4 
000014 
003014 
OOOOI 4 
000377 
003014 

0000 14 
000014 



013652 
1 13717 
1 13717 

OIOOOO 
1 63750 
000000 
010000 
003662 
OIOOOO 
103734 
103631 

003666 
103673 
000000 
103673 

1 33674 
1 33674 
1 33674 
133674 
103631 
103631 

12367S 
137777 



SNGLOP: SIT 
MOV 
MOV 

ROTATE: AND 

INC\T 
MOV 
BIT 
BIT 

ROL: ADD 
BIS 
CLR 



XOR 
MOV\R 
XOR 
XOR 

MOV\R 
MOV\R 
MOV\R 

MOV\R 

AND 

MOV 

MOV\R 
MOV\R 



R0TR3: 
R0TR1 : 



#400, RIB 
#0,RT1 
#1 .RT1 

#7, RIB\N , BAR 
RPC\0.RPC,BAR 
(BUF) ,RCC 
#400, RIB 
#100, RIB 
RCC, RCC 
RCY , RCC , BUF 
RCY 

RCC, RCV\N 
RCC, RCC 
#100000, RCC 
#1 ,RCV 

RCC. RCC 
RCC, RCC 
RCC, RCC. BUF 
RCC, RCC 
#HIBYT,RCC 
RCC, BUF 

RCC , RCC 
RCC, RCC 



%JNZRO 

7.JZR0 

%JMP 



%JCRY 
%JMP 

7.JNZR0 
•/.JNLSB 

7.JMP 

7.CALL 
7.CALL 
%CALL 

"/.CALL 

ZJMP 

7.JMP 

'/.CALL 
%RET 



ROTATE 
0PDCD1 
0PDCD1 



SETCRY 
FETCH 



SWAB 
STORCC 



R0TR3 
R0TR3 
R0TR3 
R0TR3 
FETCH 
FETCH 

R0TR1 



ROTATES HAVE 200 BIT SET 
SOME DPS TAKE AN IMPLIED 
WHILE SOME TAKE AN IMPLIED 



START REG FETCH, DECODE DIRECTION 

IF MEMORY THEN GET ADDR 

GET REGISTER/MEM IN RCC 

CHECK FOR ROR 

IF ROR THEN CONTINUE 

DOUBLE THE REGISTER 

LSSiOLD CARRY, BR ON NEW CARRY 

SET NEW CARRY TO O 

SEE IP NEW CARRY SAME AS OLD 
IF SO. 16-BIT ROT = 17 BIT ROT 
OTHERWISE MUST CHANGE NEW SIGN 
AND NEW CARRY 

SHIFT 4 BITS 

AND ANOTHER 4 BITS 

SHIFT BACK 4 BITS 

AND ANOTHER 4 BITS 

ISOLATE THE CC/GO FETCH NEXT INST 

STORE ANSWER AND RETURN 






ROTATE RIGHT 
ROTATE RIGHT 



AND ANOTHER 
AND RETURN 
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003676 
003677 



003700 
003701 



003702 
003703 



O037O4 
003705 



003706 
003707 
003710 



0037 1 2 
003713 
00371 4 
003715 



054SS6 000034 010000 MODES: 
120452 017012 103704 



033714 000003 
03O156 000014 



053456 000016 
013440 007016 



123702 
113713 



O100OO 

1036 10 



003711 0S4S56 000034 133702 



031 456 
1 14553 
014553 
013440 



OOOOI 6 
OOOOI 6 

1 100 
01701 6 



123621 
OIOOOO 
1 13744 
033750 



GETRB: 
GETRBX : 



033716 000003 OIOOOO PCREL: 
030156 000012 113713 



05 34 5 6 10013 013711 
054556 000034 010000 
053456 000016 103713 



\~J" 
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SRC/ 
INDE 



DST MODE IS MEMORY 
XED BY REGISTER SPE 



REFERENCE - ADDRESS OF OPERAND IS NEXT WORD 
CIFIED IN INSTRUCTION 



ANDXR 
INC 



MOV 

ADD 



MOV\R 
MOV 



#7*4, RT1 
RPC\0,RPC,BAR 



(BUF) , RCC 
RCC, RT1 



%JZRO PCREL 
7.CALL GETRB 
7.JMP CKSTO 



RT1 , RT1 
RT1 , BAR 



IF RB=0 AND M0DE=6, 



7.JMP LDRT1 
DRESSING MODE IS PC RELATIVE 



ISOLATE RB (COMPLEMENTED) 

START DISPLACEMENT FETCH 

ANO BREAK OUT MODE 60 

GET DISPLACEMENT IN RCC, AND 

FETCH INDEX REGISTER INTO RTI 

FORM FINAL ADDR, CHECK IF STORE 

GET RB INTO <2:0> OF RTI 
ROUTINE TD SET RTI = (RTI) 



MOV 

ADD 



(BUF) , RTI 
RPCRT1 



GET DISPLACEMENT WORD 

USE PC INSTEAD OF INDEX REG 



7.JMP CKSTO 
COME HERE IF SRC/DST MODE IS REG OR -(REG) 
7.JNZR0 M00E4 
%JMP CKSTO ; 
MODE - DECREMENT RB , OPERAND ADDRESS IS NEW RB 
GETRB 



MOV\ 
AND\ 
MOV\ 

AUTO 

AND\ 



RIB.RT1 
#7*4, RTI 
RTI , RT1 



BREAK OUT THE TWO MODES 

ISOLATE R8, SHIFT IT INTO <2:0> 

CHECK FOR STORE, USE RB AS SRC 



DECREMENT REGISTER 
R #7*4, RT1 



DEC 
BIT 
BIT 
MOV 



RTI 

#7000, RIB 
#100, RIB 
RT1 , BAR 



%CALL 
7.CALL 



7.JZR0 
7.CN2R0 



ST0RT1 



STORE 
INDRCT 



ISOLATE RB, SHIFT IT INTO <2:0> 
AND FETCH ITS CONTENTS 
DECREMENT CONTENTS OF REGISTER 
TEST FOR STORE INSTRUCTION 
BR IF STORE, TEST INDIRECTION 
PUT DIRECT/INDIRECT ADDR IN BAR 



o 
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MAIN OPERATION DECODE AND EXECUTION - SRC ADDR IN BAR 



00371 6 
003717 
003720 
003721 
003722 
003723 

003724 
00372S 
003726 

003727 
00373O 
003731 
003732 
003733 
003734 

003735 
003736 
003737 
003740 
003741 



003742 
003743 



003744 
003745 
003746 



033716 

014553 
1 14553 
1 14553 
1 14553 
033454 

033714 
1 32154 
034154 

1 14553 
033714 
033154 
030154 
024455 
033755 

033714 
035154 
131 154 
024455 
033755 



120452 
133554 



014553 
014553 
013440 



OOO0O3 
0O70O7 
010002 
O1O0O4 
010010 
00301 6 

10003 
OOOOI 6 
0000 1 6 

10010 
010003 
OO301 6 
OOOOI 6 
02301 4 
00000 1 

010003 
00301 6 
OOOOI 6 
023014 
00000 1 



0070 12 
007200 



0O70O7 
000100 



010000 
010000 
103742 
013727 
013724 
103631 

103726 

1 13630 

1 13631 

013735 
013732 
103631 

oooooo 

003631 
1 13631 

013737 
103631 
OOOOOO 

1 13631 
1 13631 



123606 
103720 



133606 
OOOOOO 



OPDCD : 
OPOCD 1 ; 
0PDCD2: 

OPXXO: 

OlOAD : 

OPXIO 
OCOMP 
OBTST 

0PXX1 
0PX01 
OBSET 
OTADO 



0PX1 1 
OBCLR 
OSUBT 



MOV 

AND 



MOV 

RSUB 

AND 

BIT 
MOV 
BIS 
ADD 

CLR 
MOV 

MOV 

BIC 
SUB 
CLR 
MOV 



(BUF) , RT1 
#7 , RIB\N, BAR 
#1000, RIB 
#2000, RIB 
#4000, RIB 
RT1 , RCC, BUF 

(BUF ) , RCC 
RT 1 , RCC 
RT1 , RCC 

#4000, RIB 
(BUF I , RCC 
RT1 , RCC, BUF 
RT1 , RCC 
RCC\0 , RCY , BUF 
#1 , RCY 



7.JZR0 
7.JNZR0 
%JNZR0 
%JMP 



MEMDST 
0PXX1 
0PX1O 
FETCH 



7.JZR0 OBTST 
7.JMP GETCRY 
7.JMP FETCH 



( BUF ) , RCC 
RT1 .RCC.SU 
RT1 , RCC 
RCC\0, RCY 
#1 , RCY 



F 
BUF 



7.JNZR0 
7.JNZR0 
%JMP 

7.JNCRY 
7.JMP 

%JNZRO 
%JMP 

%JCRY 
%JMP 



0PX1 1 
OTADD 
FETCH 

FETCH 
FETCH 

OSUBT 
FETCH 

FETCH 
FETCH 



GET SOURCE OPERAND 

START FETCH OF DEST REG 

RA=0 MEANS DEST IS MEMORY! 

OP CODE IS 3 BITS WIDE 

SO IT TAKES 3 LEVELS OF OECOOE 

LOAD INSTRUCTION IS SIMPLE MOVE 

FETCH DEST REG FOR TEST INSTS 
COMPARE INST SETS COND COOES 
SO DOES BIT TEST INST 

CONTINUE DECODING 

FETCH DEST REG ANO DO FINAL DCD 
BIT SET INST DOES WHAT IT SAYS 
ADD INST TOO SLOW TO STORE RSLT 
STORE RSLT, CLR CARRY S TEST IT 
SET DM CARRY IF 2901 CARRY SET 

FETCH DEST REG AND 00 FINAL DCD 
BIT CLEAR INST DOES THE OBVIOUS 
SUB INST TOO SLOW TO STORE RSLT 
STORE RESULT AND COMPUTE COMP- 
LEMENT OF 2901 CARRY AS C-BIT 



COME HERE FROM 0PDCD2 IF RA = 0, MEANING MEMORY DEST (A LA P0P-11 MODE 37) 



INC 
BIS 



RPC\0, RPC, 
#100000, RC 



BAR %CALL 
CBAR %JMP 



S . LDCC 
0P0C02 



GET MEMORY ADDR FROM INST STREAM 
FORCE NON-ZERO AND RE-DECOOE OP 



ALL STORES COME HE 
WITH TARGET ADORES 



RE (EXCEPT MOO 
S (LESS INDIRE 



E 270 WHICH IS ILLEGAL) 
CTIONI IN RT1 



ANO #7.RIB\N,8« 
BIT #100 , RIB 



003747 013440 



003750 033716 

003751 013440 



01 701 6 


033750 




MOV 


RT1 


BAR 




SCNZRO 


INDRCT 






; * * * 


VALIDATE RAM ADDRESS 


TO 


BE STORED INTO 








BIC 


#170000. RT1 














CMP 


#a . 


RT1 














ASSUME 


DM. BEGS 1 , EO 















MOV\LF 


#<DM.BEG/2> 


RIB 


%JNCRY 


STORB 








CMP 


RIB 


RT1 














MOV\F 


#ER 


OMI ,R1 1 




7.JCRY 


STORB 






;STORA: 


NOP 


















BIS 


#CN 


ERR , RLL 




%JMP 


STORA 


0O3014 


103631 


STORB: 


MOV 


RCC 


BUF 




%JMP 


FETCH 


000003 


010000 


INDRCT : 


MOV 


(BUF) , RT1 








0O701 6 


127777 




MOV 


RT 1 


BAR 




7.RET 





START FETCHING SOURCE REGISTER 

TEST FOR INDIRECTION 

SET UP ADDRESS TO STORE IT IN 

-> 7, 556 -> 7777 LEGAL **« 

ISOLATE ADDRESS (12 BITS) 

IF LESS THAN S 

MAKE SURE DM. BEG IS EVEN 

THEN OK/ELSE RIBsSSB. 
IF RT1 >= 556 

THEN DO STORE/ELSE CONTROLLE 
FATAL ERROR 

SO D.PROC WON'T TIMEOUT 
AND HANG IT UP HERE 
STORE REG IN DEST AND GET OUT 

RT 1 s INDIRECT PTR 
BARsINDIRECT PTR 
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BRANCH CLASS INSTRUCTIONS COME HERE FROM "FETCH" FOR EXECUTION 



003752 


120452 


007012 


1236 11 BRANCH: INC 


003753 


1 14553 


000020 


OIOOOO 


BIT 


003754 


1 14553 


10040 


01401 1 


BIT 


0037S5 


1 14553 


017100 


003765 


AND 


003756 


033452 


010017 


053764 


MOV\F 


003757 


033753 


017006 


013631 


MOV 



RPC\0, RPC, BAR 7.CALL S.L017 
#10000, RIB 

#20000, RIB 7.JN2R0 JCOND 

#40000, RIB\N, BAR 7.JNZR0 JS8XFC 

R17.RPC 7.JNZR0 OJCC 

#6, RIB, BAR 7.JNZR0 FETCH 



[ 16K!R17=BRANCH AODR 
{1SK1DEC0DE BRANCH TYPE 
DECODE 3 BIT BRANCH TYPE 
[16K1TEST RIB FOR CONO/XFC 
[16KID0 UNCONDITIONAL BR HERE 
TEST FOR RETURN INST 



RETURN IS ENCODED AS AN CONDITIONAL JUMP AODRESS OF O 



O03760 
003761 
003762 
003763 



0337 16 
013440 
120366 
120452 



000003 010000 

007016 133604 

007013 133621 

007012 103632 



003764 OI3455 0000 15 114013 OJCC: 



003765 
003766 
0O3767 
003770 
003771 

003772 
003773 
O03774 

003775 
003776 
003777 
004000 

004001 
004002 

OO4003 
004003 
004003 
004003 
OO4003 
004004 
004005 
004006 
OO40O7 
004010 



031472 
O13740 

031456 
013440 
135552 

033756 
1335S6 

135553 
Ol 1553 
033773 
01 1553 
033471 
030553 
1 33553 



013440 

O30556 
033472 
033756 
133556 

034555 



010012 
0O70O6 
OOOOI 6 
00701 6 
003300 

00O3S4 
007002 
OOOI 40 
010022 
03002 1 
0O001 4 
030013 
000343 
002377 



00301 4 
0O701O 
OIOOI 6 
00O354 
007002 
0OO001 



043772 
123610 

123621 
OOOOOO 
104016 

O1O0O0 
133615 
OOOOOO 
104003 
053777 
OIOOOO 
053561 
OOOOOO 
OIOOOO 



133520 
123B10 
054010 
010000 
1 33604 
1 13631 



XFCRET 
XFCRTA 



MOV 
MOV 
INCB 
INC 

TST 

DEC\T 

MOV 

DEC 

MOV 

BIC 

XFC 

MOV 

BIS 

BIC 

SUBC 

MOV\ 

SUBC 

MOV\ 

AOO 

OR 

DM B 

ASSU 

ASSU 

ASSU 

ASSU 

MOV 

ADD 

MOV\ 

MOV 

BIS 

AND 



(BUF ) ,RT1 

RTt.BAR 7.CALL S.LDPC 

RIB\0, RT1 , BAR %CALL ST0RT1 

RPC\0,RPC, BAR %JMP FETCH2 



RCY 



%JMP 



JEOJPL 



PROCES 
#D 
#0 
#6 



REAKPO 
RC 



C.RPC 

. BAR 

1 

1 .BAR 

400OO 

SING 

M. BEG 

M. BEG 

oooo, 

FCMAX 
FCFIN 
FCPAS 
B.R1 1 
XFCTA 
I BYT 
INT P 
CEO, 
0. 
MB6G + 
MBEG + 
4 , BUF 
DMDDT 
1 ,RPC 
M. BEG 
M. BEG 
, RCY 



7.JNZRD 

•'.CALL 
7.CALL ST 



RT1 
0RT1 



RPC, BUF 7.JMP 



GET VALUE OF STACK PTR 

SET BAR/LOAD PC 

INCR STACK PTR 8 GO STORE IT 

START FETCH OF NEXT INST 

JUMP ON CARRY CLEAR - USE JEO 

[U52EC1 1BREAK JSB OUT FROM XFC 
FETCH STACK PTR 

DECREMENT STACK PTR a STORE IT 
POINT BAR AT NEW TOP OF STACK 
I16KISAVE PC AND START NEXT FETCH 



+ OMB 

SKIB 
RIB 
, RIB 
, RIB 
, RI 

B- 1 > 

RIB 

ROCE 

R14 

R15 

ODTA 

ODTC 

DMB 

■OMB 
3HIB 



PCSL0BYT.RT1 
YT.RT1 , BAR 7.CAL 



7.JZR0 
7.TNMSB 



\N 

\N 

7.JNMSB 
SLOBYT, RIB 
PAR 
SSING »** 



F«17> , EO, <<OMBE 
YB17> , EO, <<DMB 

7.CALL S 
PC> , RT1 , BAR 7.CA 

%JNZRO XF 
PCSLOBYT, RT 1 

M , BAR %CAL 

7.JMP FE 



i I16KIRT1=L0 BYTE OF ODT PC 
L S.STPC; I16K1SAVE PC FOR ALL XFC'S 

i CLEAR EXTRANEOUS BITS FROM COOE 

FCO : I16K1IF XFC O THEN BKPT/ELSE IF XFC ILLEGAL 

; THEN FORCE XFC STOP I 

; IF XFC PROCESSED BY U.PROC 
1 1 A i THEN INVOKE U.PROC 

; ELSE RIB EO LO XFCTA8 ADDR 

; CRAM PAR WITH XFC ADORESS 

, (16K1MAKE SURE RCC>=R14 

; [16K1MAKE SURE RCV::RIS 
G + DMBPCai7>-M> 
G*00TAF«17>+1> 

ST15 ; IU52EC1 ] I 16K1SAVE CARRY FLAG 
LL LDRT1; [16K1RT1:00T START AODR 
CRTA ; (16KIIF NEO O THEN START IT 

; I16K]RT1=L0 BYTE OF DM PC 
L S.LDPC: [16K1REST0RE DM PC FROM MEMORY 
TCH ; MAKE SURE CARRY IS LEGAL 



c 



CONDITIONAL JUMP INSTRUCTIONS (JEO, JNE, JPL, JMI 1 



OO401 1 


.1 14553 


010 100 


0040 15 


JCOND : 


BIT 


OO40 1 2 


013454 


01001 4 


014016 




TST 


OO4013 


120472 


017017 


153632 


JEOJPL : 


INC\T 


00401 4 


120452 


007012 


103632 




INC 


OO40 15 


1 1 4554 


0102OO 


104013 


JSIGN : 


BIT 


00401 6 


120472 


01701 7 


043632 


JNEJMI : 


INC\T 



#40000, RIB 
RCC 

R17\0,RPC , BAR 
RPC\0. RPC, BAR 

#100000, RCC 
R17\0, RPC, BAR 



SJNZRO JSIGN ; BREAK OUT SIGN JMPS FROM O JMPS 

•SJNZRO JNEJMI ; BREAK OUT JEO FROM JNE 

%JZRO FETCH2 : I16K1SET NEW PC AND FETCH IF O 

7.JMP FETCH2 ; USE OLD PC ANO FETCH IF NOT 

%JZRO JEOJPL : BREAK OUT JPL FROM JMI 

%JNZRO FETCH2 ; (16K1SET NEW PC S FETCH IF NON- 
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OO4017 1204S2 00T012 103632 



RPC\0 , RPC , BAR XJMP FETCH2 ; USE OLD PC AND FETCH IP NOT 



o 
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DIAGNOSTIC MACHINE DEBUGGING TECHNIQUE 

EXAMINES AND DEPOSITS REGISTERS AND MEMORV AND SETS BREAKPOINTS 
FOR THE DIAGNOSTIC MACHINE, USING A DL-11 ON THE UNIBUS. 



FLAG DEFINITIONS: 



000001 
000002 
000010 



NUMFLG 
OPNFLG 
ZFLG 



2 
10 



NUMBER SEEN 

LOCATION OPEN 

SIGNIFICANCE FLAG FOR NUMERIC OUTPUT 



177560 
1 76510 



DL1 IAD 
OL 1 1 44 



= 177560 ; ADDRESS OF CONSOLE 0L11 

> 176510 ; ADDRESS OF 11/44 CONSOLE 

WORK LOCATIONS USED BY OMDT 



= INPUT 

REGISTER DEFINITIONS 
> R17 



STORAGE FOR 3 EAS Y - TO ■ RECAL L NUMBERS ♦ 



. UNUSEO LOWER-MICRO REGISTER WHEN DM RUNNING 



Q 
< 

a 

ii 

5 
cc 
O 



ENTER HERE ON BREAKPOINT OR INITIALLY 



[ 16K1N0 DMODT MM! 
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;JUMP TO ERROR ROUTINE 



AH0F03 

***************** 



********* 



007403 013440 OOOOOO 117774 LOPAR: NOP 



THE PAR (Pipeline Address Register) IS FORCED HERE TO THE LO VECTOR 
TABLE AND TO THE HI VECTOR TABLE DURING THE PAR TEST. 

NOTE: THE LOCATION LOPAR (AH0F03) ANO HIPAR (AHOFFC), WHICH ARE USED 
IN THE PAR TEST, MUST NOT BE CHANGED. 

************************************************************************ 

5.JMP HIPAR ;JUMP TO HIPAR 

*************************************************************** 



TABLE NAME: 
DTSTBL 

FUNCTIONAL DESCRIPTION: 

This table contains the addresses of D-PROC tests that can be looped 

on . 



******* 



********** 



000004 








TESTBL 


= • • 


7400 


007404 


034451 


0O00 1 1 


1 10053 


OTSTBL : 


CLR 


DER 


007405 


034451 


0000 1 1 


1 10053 




CLR 


DER 


007406 


03445 1 


0000 1 1 


1 10053 




CLR 


DER 


007407 


034451 


0000 1 1 


1 0005 4 




CLR 


DER 


0074 10 


034451 


0000 1 1 


1 1 OOBO 




CLR 


DER 


0074 1 1 


034451 


0000 1 1 


100064 




CLR 


DER 


O07412 


034451 


0000 1 1 


100067 




CLR 


DER 


007413 


034451 


0000 1 1 


100075 




CLR 


DER 


0074 14 


034451 


0000 1 1 


100 100 




CLR 


DER 


007415 


03445 1 


00001 1 


1 10101 




CLR 


DER 



%JMP 


HD 


TO 


HANG 





PROC 


LET 


U 


PROC 


LOOP 


%JMP 


HD 


T1 


HANG 





PROC 


LET 


U 


PROC 


LOOP 


%JMP 


HD 


T2 


HANG 


D 


PROC 


LET 


u 


PROC 


LOOP 


%JMP 


T3 




LOOP 





PROC 


TEST 








%JMP 


T4 




LOOP 





PROC 


TEST 








7.J MP 


T5 




LOOP 


D 


PROC 


TEST 








7.JMP 


T6 




LOOP 





PROC 


TEST 








7.JMP 


T7 




LOOP 


D 


PROC 


TEST 








•/.JMP 


HO 


T8 


HANG 


D 


PROC 


LET 


u 


PROC 


LOOP 


%JMP 


T9 




LOOP 


a 


PROC 


TEST 
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TABLE NAME: 

VECTAB 



(CONTROLLER HARDWARE ERROR, STATE ANO ERROR VECTOR TABLE) 



c 



FUNCTIONAL DESCRIPTION: 

THIS TABLE CONTAINS ALL OF THE VECTOR TABLES FOR BOTH THE U.PROC 
AND D PROC CONTROLLER MICROCODE LOADING THE 'PAR' REGISTER IN PREPARATION FOR 
ENTERING THIS TABLE NEED ONLV LOAD THE LEAST SIGNIFICANT 8 BITS (LOW BYTE) 
OF THE REOUIREO OFFSET. THE CONTROLLER HAROWARE WILL FORCE THE MOST SIGNIFICANT 
8 BITS (HI BYTE) TO ALL ONES. THE CONTROLLER ERROR DETECTING HARDWARE USES THE 
LAST 16 ENTRIES OF THE VECTOR TABLE ANO THESE ENTRIES MUST START AT ADDRESS 
OFFO HEX). A DESCRIPTION OF HOW THE HARDWARE FORMS THE VECTOR ADDRESS 
AND THE ERRORS DETECTED FOLLOW: 

ERROR VECTOR ADDRESS - GENERAL 

THE ERROR VECTOR ADDRESS IS 'BIT ENCODED' BASED ON THE ERROR 
WHICH OCCURRED. IN ALL CASES, THE INSTRUCTION IN WHICH THE 
ERROR OCCURRED WILL COMPLETE. THE FOLLOWING INSTRUCTION WILL 
COMPLETE. AND THE NEXT INSTRUCTION WILL BE THE ERROR VECTOR. 

SEO ADR BIT 03 OCTAL DECODE: 

0: D PROCESSOR 

1 : U PROCESSOR 
SEO ADR BITS 02-00 OCTAL DECODE: 

O: NOT USEO BY HARDWARE 

1: SI READ PARITY ERROR 2 

2: BI WRITE PARITY ERROR 2 

3: SCI PARITY ERROR I 

4s NOT USEO BY HAROWARE 

S: RAM PARITY ERROR 

6= TIME OUT ERROR 

7: CROM PARITY ERROR 

CONTROL MEMORY PARITY ERROR 

THE PROCESSOR WITH THE CROM PARITY ERROR WILL EXECUTE THE 
FAULTY INSTRUCTION, THE FOLLOWING INSTRUCTION, THEN THE ERROR 
VECTOR INSTRUCTION. THE SIGNAL 'CROM PE L' WILL BECOME ACTIVE 
ON THE CYCLE FOLLOWING THE ERROR. THIS CORRESPONDS TO THE THIRD 
INSTRUCTION AFTER THE ERROR WHEN USING THE LOGIC ANALYSER. 
IF THE VECTOR ADDRESS HAS A PARITY ERROR, THE PROCESSOR 
WILL HANG. (UNTIL IT GOES AWAY) SO DISPLAY STATUS. 

TIMEOUT ERROR 

THE TIMEOUT CIRCUIT IS ENABLED WHEN EVER A SUCCESSFUL JUMP IS 
EXECUTEO. FALLING THROUGH TO THE NEXT INSTRUCTION RESETS THE 
TIMEOUT CIRCUIT. NOTE - TIMEOUT ERRORS DO NOT OCCUR ON THE 
UNIBUS PROCESSOR. 

*** THE HARDWARE MUST BE CHANGED TO DISABLE THE UNIBUS TIMEOUT ..." 



; TIMEs 
i TIMEs 
; INSTs 



< 1 6600 . *7/ 1000 . > 
< 1 6600 . «8/ lOOO . > 
< 16600. *7* 1000. /INSTR> 



MSEC MINIMUM TIMEOUT 
MSEC MAXIMUM TIMEOUT 
INSTR MINIMUN 
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NULL AREA WITH JUMP TO ERROR ROUTINE (+PARITY) - JUST IN CASE *** 



13440,0, <BIT15*BIT12+SEQERR> 



;JUMP TO ERROR ROUTINE 



NOTE - IF VECTAB SIZE CHANGES THEN THE PRECEEDING ORG MUST ALSO 
THE EQUATION IS .ORG VALUE s FE9H - SIZE OF VECTAB *«* 



007640 
007641 
OOT642 



007S43 

007643 
007644 
007645 
007646 
007647 
007650 



00765 I 
007652 
007653 



I33S44 
0I374O 
1 14544 



013440 
033717 
033717 
033717 
033717 
033717 



033752 

033752 
033751 



010010 OS7777 
O07O34 123614 
000002 107640 



003017 
000003 
0000O3 
000003 
000003 
00OO03 



1 13273 
103323 
103323 
1 13342 
1 13342 
1 13342 



. ORG 

D .STPA: 



VECTAB 
V . ORVC 
V . RVC3 
V . RVC5 
V . RVCS 



AHOFAO 

BIS\F 

MOV 

BIT 



#CN .ERR, RLL 
#FAILUR, BAR 
#INDIAG,RLL 



7.RNZR0 

%CALL 

%JMP 



.ST1 1 
.STPA 



[mjtOS ] ORIGIN OFAO HEX 
[U52EC1 ] 1 1 6K! IF ZERO, EXIT/CONTROLLER ERR BIT IN 
[U52EC11SAVE LAST FAIL CODE IN CASE U . PROC OOESN* 
[U52ECI 1 [ 16K1CHECK IF DIAGNOSTIC 







START CONTROLLER VECTOR TABLE *»* 

REVECTORING STATE VECTORS - MUST START ON ODD WORD. 

CODE IN VECTOR IS TO STORE INCREMENTED VECTOR PTR SACK IN MEMORV 

ASSUME .11,14,1 ; UPROC STARTS FIRST 



000220 1 1 1341 
000157 111445 
000004 112037 



MOV 
MOV 
MOV 
MOV 
MOV 
MOV 



MOV 
MOV 
MOV 



R17, BUF 




TSJMP 


D 


RVC2 


(BUF) , R17 




HJMP 


D 


RVC4 


( BUF ] ,R17 




XJMP 


D 


RVC4 


(BUF) , R17 




XJMP 





RVCS 


(BUF) ,R17 




7.JMP 


D 


RVCS 


(BUF) , R17 




7.JMP 





RVC8 


PROCESSING 


STATE VECTORS 


* * * 


#TOPOL , R12 




%JMP 


LEV2 . 1 


#T0PRSP,R12 




7. JMP 


R 


TOPO 


#<V .DCLR- . > 


R1 1 


7. J MP 


□ 


INSV 



INIT RVCBUF, COMPUTE INITIAL RCT OFFSETS 

COMPLETE READ OF RCT BLOCK 

DO OPERATION ON TARGET BLOCK 

CLEAN UP AND EXIT 

[mitOSlCLEAN UP AND EXIT 

[mjtOSlCLEAN UP AND EXIT 



SEND TOPOLOGY COMMAND 
RECEIVE TOPOLOGY RESPONSE 
LINK INTO DRIVE CLEAR FLOW 



LEVEL ERROR ANO I/O ERROR STATE VECTORS «*« 



007654 


013440 


000000 


1114 6 5 


V 
V 


INIT : 

ATTN : 


NOP 


007655 


033752 


00001 1 


1 1 1341 


V 


ERRO: 


MOV 


007656 


033752 


000366 


1 1 1445 






MOV 


007657 


034556 


000357 


1 1 140 1 


V 


DCLR: 


ANO 


007660 


033753 


00001 1 


1 1 1S02 






MOV 


007S6 1 


033751 


00003 1 


101773 


V 


ERRC : 


MOV 


0O7662 


033752 


0002 16 


1 1 1506 






MOV 


007663 


033753 


0000 1 1 


101476 






MOV 


007664 


033751 


00001 6 


1 12037 


V 


ERSK: 


MOV 



%JMP 



S . INIT 



#GETSTA,R12 
#STARSP,R12 
#<LOBYT-ORV 
#INPUT,R13 
#<V . ATT2 



%JMP LEV2. 1 

%JMP R.GSTA 

DF> ,R1 6 7.JMP S.DCLR 
7. JMP R.RESP 

ERRO.R11 %JMP D.ERRO 



#RECALB,R12 %JMP S.LRSP 
#INPUT,R13 7.JMP R.LRSP 
#<V .SEEK- . > ,R1 1 7.JMP D.INSV 



SEEK PROCESSING STATE VECTORS «« 



007665 
007666 
007667 
007670 
007671 
007672 
007673 

KDBDP 



033757 
033753 
033752 
0337S2 
135557 
033753 
033752 



0000 17 
00001 1 
0000 1 1 
000366 
003014 
0000 1 1 
000210 



1 1 1467 
1 1 1502 
111341 
1 1 1 445 
101504 
101476 
101441 



MOV 


#SDITMO, R17 


%JMP 


S. ONLN 


MOV 


#INPUT. R13 


7.JMP 


R. RESP 


MOV 


#GETSTA, R12 


7. JMP 


LEV2 . 1 


MOV 


#STARSP , R12 


%JMP 


R . GSTA 


BIC 


#<DRV . AV ! DRV 


AT> ,R17 


BUF 7.JMP 


MOV 


*INPUT,R13 


%JMP 


R. LRSP 


MOV 


#GTUCHR, R12 


7.JMP 


S.GUCH 



SEND DRIVE INIT 
ATTENTION'S USE THIS TOO 
SEND GET STATUS COMMAND 
RECEIVE GET STATUS RESPONSE 
SEND DRIVE CLEAR COMMAND 
RECEIVE DRIVE CLEAR RESPONSE 
OECIDE WHAT TO DO NEXT 
GO SEND RECALIBRATE COMMAND 
RECEIVE LONG TIMEOUT RESPONSE 
LINK INTO SEND SEEK FLOW 



SEND ONLINE COMMAND 

RECEIVE DRIVE CLEAR RESPONSE 

SEND GET STATUS COMMAND 

RECEIVE GET STATUS RESPONSE 
RUNN ; [16K1SEND RUN COMMAND 
; RECEIVE LONG TIMEOUT RESPONSE 
; IU52EC1ISEND GET SUBUNIT CHAR COMMAND 
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007674 


033754 


00001 6 


101443 






MOV 


#<SDI . LL-SOI 


. HI > , R1 4 


007675 


133753 


00O201 


1 1 1360 


V 


CMD1 : 


MOV 


##CHGM0D,R13 




7.JMP 


007676 


033753 


0000 1 1 


1 1 1502 






MOV 


#INPUT,R13 




%JMP 


007677 


013440 


000600 


1 1 1367 






NOP 


IPRDPF 


7.JMP 


0O770O 


033753 


00001 1 


1 1 1502 






MOV 


#INPUT.R13 




%JMP 


007701 


013440 


000000 


111613 






NOP 






7. JMP 


007702 


033456 


00OO15 


101510 


V 


SEEK : 


MOV 


DBAR, R16 




%JMP 


007703 


033753 


00001 1 


101536 






MOV 


#INPUT,R13 




7.JMP 


007704 


033753 


000002 


101 673 






MOV 


#< . -V SEEK> , 


R1 3 


7.JMP 












* * * 


LEVEL 


1 ERROR STATE 


VECTORS 


OO7705 


033752 


000006 


1 1 1426 


V 


ERR1 : 


MOV 


#ERECOV, R12 




%JMP 


007706 


033753 


OOOOI 1 


1 1 1S02 






MOV 


#INPUT , R1 3 




7.JMP 


0O7707 


033752 


000001 


102022 






MOV 


#PKIP,R12 




7.JMP 


0077 10 


01 3440 


000000 


1077 10 


V 


NULL : 


NOP 






7.JMP 



CMOD 
. RESP 
.CFL 1 
. RESP 
. IMFF 

SEEK 
.SEEK 



S . EREC 
R. RESP 
D. DONE 
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: IU52EC1 1RECEIVE SUBUNIT CHAR 
(VO5ISEN0 STYLE 1 CHANGE MODE COMMAND 
(V051RECEIVE CHANGE MOOE RESPONSE 
[V051SEND STYLE 1 CHANGE FLAG 
[V0S1RECEIVE CHANGE FLAG RESPONSE 
[V051CHECK IF IGNORE MEDIA FORMAT FLAG SET 
SEND SEEK COMMAND 
RECEIVE SEEK RESPONSE 
SEEK COMPLETE CHECK 
R13:ERR0R RECOVERY BACKUP VALUE 



SEND ERROR RECOVERY COMMAND 
RECEIVE ERROR RECOVERY RESPONSE 
STATE VECTOR COMPLETION ROUTINE 
R12:PKIP FOR INOCUOUS NONZERO VALUE 
[V05JNULL ENTRY 



ONLINE COMMAND STATE VECTORS **» 



VECTORS «*« 











V 


ONLN: 






0077 1 1 


01344O 


000000 


102071 


V 


OLRO : 


NOP 














,,, 


ATTENTION CONTINUATION 


007712 


010555 


O07044 


10147 1 


V 


ATT2 : 


AOO 


#SOI .SI , DBAPAN 


007713 


033753 


OOOOI 1 


101476 






MOV 


#INPUT,R13 


007714 


133753 


000201 


1 1 1360 


V 


SUCH : 


MOV 


##CHGM0D,R13 


007715 


0337S3 


OOOOI 1 


1 1 1502 






MOV 


#INPUT,R13 


0077 16 


037457 


O00O12 


101665 






COM 


R12.R17 


007717 


0337S3 


OOOOI 1 


1 1 1502 






MOV 


#INPUT,R13 


007720 


01 344Q 


000000 


102074 






NOP 





BAR %JMP 
%JMP 
7.JMP 
%JMP 
%JMP 
7.JMP 
%JMP 



RCAL 
LRSP 
CMOD 
RESP 
DCON 
RESP 
ZATT 



AVAILABLE SPIN DOWN STATE VECTORS ■•«« 



00772 1 
0O7722 



007723 
007724 
007725 
007726 



007727 
007730 
007731 
007732 
007733 
007734 
007735 

KDBDP 



013440 
033753 



133557 
0334S6 
033753 
037 151 



033752 

033752 
033757 
034457 
033753 
01 3440 
033752 



000400 
OOOOI 1 



101367 
1 1 1502 



NOP 

MOV 



IPSDPF 
NPUT.R13 



SJMP 
■'.JMP 



. CFL1 
.RESP 



GO DO ONLINE READ OF FCT 



SEND RECALIBRATE COMMAND 

RECEIVE LONG TIMEOUT RESPONSE 

[V051SENO STYLE 2 CHANGE MODE COMMAND 

RECEIVE CHANGE MODE RESPONSE 

CHECK FOR NEED TO SEND DISCONNECT COMMAND 

RECEIVE DISCONNECT RESPONSE 

STATE VECTOR COMPLETION ROUTINE 



SEND STYLE 2 CHANGE CONTROLLER FLAGS 
RECEIVE CHANGE CONTROLLER FLAGS RESPONSE 



AVAILABLE AND SPIN DOWN AFTER ONLINE ERROR «»« 



003010 102036 

OOOOI 1 1114 14 

OOOOI 1 11 1S02 

000011 112073 



BIS *DRV . AV, R17, BUF 7.JMP D.INS1 

MOV R11.R16 7.JMP S . DCN2 

MOV #INPUT,R13 7.JMP R.RESP 

XNOR R11.R11 7.JMP D.WAIT 

CONTROLLER GET ORIVE STATUS VECTORS «•*. 



OOOOI 1 
00O366 
000335 
000017 
OOOOI 1 
OOOOOO 
00O207 



I 1 1341 

I 1 1445 
1 1 1541 
1 1 1403 
1 1 1 502 
102074 
1 1 1341 



STAT 
.DCON: 



. ZATT : 
. GCHR 



MOV 
MOV 
MOV 
CLR 
MOV 
NOP 
MOV 



#GETSTA,R12 
#STARSP,R12 
#SDI , 4SL0BYT 
R17 
#INPUT, R13 

#GTCCHR, It 1.2 



%JMP 
7. J MP 
R17 %JMP 
%JMP 
%JMP 
7. J MP 
7.JMP 



LEV2 . 1 
R. GSTA 
C. DUPL 
S . 0CN1 
R. RESP 
D. ZATT 
LEV2 . 1 



(U52EC21SET AVAILABLE AND STEP TO NEXT VECTOR 
IU52EC21SEND DISCONNECT COMMAND 
RECEIVE DISCONNECT RESPONSE 
STATE VECTOR COMPLETION ROUTINE 



SEND GET STATUS COMMAND 
RECEIVE GET STATUS RESPONSE 
GO CHECK FOR DUPLICATES 
SEND DISCONNECT COMMAND 
RECEIVE DISCONNECT RESPONSE 
CLEAT ATTN AND FINISH UP 
SEND DRIVE GET COMMON CHAR 
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007736 
007737 
007740 
007741 
007742 
007743 



007744 
007745 
0O7746 
007747 
OO7750 
00775 1 
0O7752 
0O77S3 
0077S4 
0077SS 

00001 2 
007756 
007757 
0000 14 

00002 1 
0OO022 

0077S0 
007760 
0O77 60 



007760 
007761 
007 7 62 
007763 
007764 
007765 
007766 
007767 



007770 
00777 1 
0O7772 
0O7773 

007774 
007775 
007776 



033754 
033752 
033752 
033754 

010S55 
013440 



013740 
034456 
033756 
Ol 3740 
013440 
013440 
013440 
013740 
01 3440 
Ol 3440 

0337S1 
033751 



17045 1 
036 15 1 
0361 5 1 
1 704S1 
1704S1 
03371 1 
1 14544 
173751 



1 13740 
013440 
O13440 
01 3440 

070151 
173751 
1 13740 



0000 10 
0003S5 
000210 
0000 1 6 

007043 
000000 



007002 
OOOOI 6 
OOOOOI 
007007 
OOOOOO 
OOOOOO 
OOOOOO 
007007 
OOOOOO 
OOOOOO 

00001 3 

00001 4 



OOOOI 1 
OOOOI 1 
OOOOI 1 
00001 1 
003003 
000002 
000060 



004061 
OOOOOO 
OOOOOO 
OOOOOO 

000471 
000040 
00404 1 



I 1 1433 
102032 
101 44 1 
101443 
1 1 1 646 
102074 



103367 
103463 
I 13463 
103471 
103477 
103510 
I 13530 
I 13541 
I 13550 
1 13553 

1 13556 
103556 



XFCPAS 
UP . XFC: 
XFCFIN 
XFCMAX 



1 17642 
1 17642 
1 17642 
1 17642 
107775 
1 12324 
1 17770 



107774 
107642 
107642 
107642 

107760 
107776 
1 17774 



HIPAR: 

O.ER 

D . RAMP : 



2901 ASSEMBLER VERSION 32 



PAGE 226 



MOV 
MOV 
MOV 
MOV 
ADD 
NOP 



#S0 I . OL , R 1 4 



%JMP 



R.GCCH 



#UN BUF8L0BYT , R1 2 %JMP D . GSCB 
SGTUCHR.R12 7.JMP S . GUCH 
#<SDI . LL-SDI . HI > ,R14 %JMP R . GUCH 
#SOI . UN, DBAR\N , BAR %JMP C . SUBU 
%JMP D . ZATT 



RECEIVE DRIVE GET COMMON CHAR 
(I6K1GET SUBUNIT CHARACTERISTICS BUFFER 
SEND GET SUBUNIT CHAR COMMAND 
; RECEIVE SUBUNIT CHAR 
CHECK IF ALL SUBUNIT'S CHARACTERISTICS ARE IN 
CLEAR ATTN AND FINISH UP 



DRIVE PROCESSOR DIAGNOSTIC MACHINE XFC VECTORS 



MOV 
CLR 
MOV 
MOV 
NOP 
NOP 
NOP 
MOV 
NOP 
NOP 

MOV 
MOV 



#0MREG2, 

R 1 6 

#1 ,R1 6 

#DMREGO, 



#DMREGO, BAR 



•XFCTAB 
#11. 
#12 . 

-XFCTAB 



R 1 1 
R1 1 



%JMP 


XFC01 


7.JMP 


XFCRW 


%JMP 


XFCRW 


7.JMP 


XFC04 


%JMP 


XFCOS 


7.JMP 


XFC06 


%JMP 


XFC07 


%JMP 


XFCOS 


%JMP 


XFC09 


XJMP 


XFC10 


%JMP 


XFC1 1 


7.JMP 


XFC1 1 



( 16K1XFC 


XFC 


02 - 


XFC 


03 - 


XFC 


04 - 


XFC 


05 - 


XFC 


06 - 


XFC 


07 - 


XFC 


OS - 


XFC 


09 - 


XFC 


10 - 


START OF 


XFC 


1 1 - 


XFC 


12 - 


BIAS FOR 



01 - FORMAT TRACK ON INDEX 
READ N SECTORS 
WRITE N SECTORS 
SEND SDI COMMAND 
RECEIVE SDI COMMAND 
COMPARE DATA PATTERN TO BUFFER 
RETURN DRIVE SIGNALS 
ECHO OATA TO DRIVE 
INITIALIZE DRIVE 
WAIT FOR SECTOR/INDEX 
U.PROC XFC'S/ENO OF D.PROC'S 
REAO UNIBUS MEMORY 
WRITE UNIBUS MEMORY 
U.PROC XFC'S 



FOR EOUATE 

XFC DONE VALUE 

MAXIMUM XFC VALUE 



: = . -UP . XFC+XFCUPR+7 
.':i . -UP . XFC+XFCUPR+S. 

ASSUME XFCMAX, EO , 22 
ASSUME XFCFIN, EO , 2 1 
ASSUME XFCUPR, EO , 1 2 

NOTE - THESE HARDWARE ERROR VECTORS MUST START AT OFFOH ««* 
D. PROCESSOR ERROR VECTORS *** 



OOOOI 1 117642 CON.ER: INC\L 



XOR 

XOR 

INC\L 

INC\L 

MOV 

BIT 

MOV\L 



R1 1 , R1 1 

R1 1 , R1 1 

R1 I , R1 1 

R1 1 ,R1 1 

R1 1 ,R1 1 

(BUF) , R1 1 ,BUF 

#INOIAG,RLL 

#ER.S0P,R1 1 



%JMP 
%JMP 
7. J MP 
%JMP 
7.JMP 
7.JMP 
%JMP 
7.JMP 



STOP 
STOP 
STOP 
STOP 
STOP 
RAMP 
TIMO 



U. PROCESSOR ERROR VECTORS 



MOV 
NOP 
NOP 
NOP 

ADD\L 
MOV\L 
MOV 



#ER.S0P + OODP, DCRO %JMP 
%JMP 
%JMP 
%JMP 



R 1 1 , R1 1 IPSCLR 
#ER . SAP , R1 1 



%JMP 
%JMP 



. +1 



D . ER 
D.STOP 
D.STOP 
D.STOP 

CON. ER 



#ER . SAP+ODDP , DCRO %JMP 
KDB50. MICROCODE. .22-APR-1988 11 : 27 : 16.96 



IMPORTANT »■« 

NOT USED (BY HAROWARE I 

BI RO PE2 

BI WR PE2 

NOT USED (BY HARDWARE) 

NOT USED (BV HARDWARE) 

RAM PE (ATTEMPT TO CLEAR ERROR) 

TIMEOUT / IN OIAG MODE? 

CROM PE 



NOT USED [BY HARDWARE) 
NOT USED [BY HARDWARE) 
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007777 
01O0O0 



013440 OOOOOO 107642 



NOP 
. ENO 



7. J MP 
; END OF FILE 
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ACLO 


000007 


ALGADR 


034000 


ALOLMT 


000035 


ALUTST 


000 166 


ATTCOD 


OOOIOO 


ATTN 


000002 


AVAIL 


000100 


AVL . LN 


000040 


BA 


037777 


BAORH 


000266 


BADRL 


00026S 


BAO. LN 


000034 


BAR 


000007 


BA1 6 


OOOOOI 


BA17 


0OOOO2 


BA16 


0OOOO4 


BA19 


000010 


BA20 


000020 


BA2 1 


000040 


BA22 


OOOIOO 


BA23 


000200 


BA24 


000400 


SA25 


OOIOOO 


BA26 


002OO0 


BA27 


0O4O0O 


BA2S 


10000 


BA29 


020000 


BCAID 


000005 


BCAIS 


0000 1 5 


BCGRP 


000002 


BCICSR 


000050 


BDCST 


0000 IS 


BDSNF 


002000 


BECC 


100 00 


B E C E R 


020000 


8ER0N 


0O04O0 


SEP. MAX 


000 ISO 


BFRO 


0OOO20 


BFSV 


000100 


BFULL 


040000 


8G00O 


004000 


BGRUP 


OOOOOI 


BIBAD 


000037 


BIBER 


OOOOIO 


BICSR 


000004 


BICSRE 


000200 


BIOTYP 


000000 


BIEAOR 


0OO044 


BIECSR 


00OO14 


BIGPRO 


000360 


BICPR1 


0O0364 


BIGPR2 


000370 


BIGPR3 


0OO374 


BI IDES 


000020 


B I I MSK 


0OOO24 


BIPSDE 


0O0030 


BIPSFC 


000060 


BIPSRC 


000034 


BIROCM 


OOOOOI 


BIRTRY 


000300 


BISAOR 


000040 


BITOO 


00O001 


BIT01 


00OO02 


BIT02 


000004 


8IT03 


0000 1 


BIT04 


0O0020 


BIT05 


000040 


BIT06 


000100 


BIT07 


00O200 


B IT08 


000400 


BIT09 


0O10O0 


BIT 10 


002OO0 


BIT1 1 


004000 


BIT12 


OIOOOO 


8 I T 1 3 


020000 


BIT14 


040000 


BIT 1 5 


lOOOOO 


BIT1 6 


OOOOOI 


BIT17 


000002 


BIT1S 


000004 


BIT19 


000010 


BIT20 


000020 


SIT21 


000040 


BIT22 


000100 


BIT23 


000200 


BIT24 


0O04O0 


BIT25 


001000 


SIT23 


0O2OO0 


BIT27 


004O0O 


BIT2S 


10000 


BIT29 


02OOO0 


BIT30 


O40OO0 


SIT31 


10OO00 


BIUCSR 


OOOIOO 


BIWRCM 


000004 


BIWSTA 


000054 


BLAST 


100000 


SLOCK 


OOOOOI 


BLRWR 


001000 


BLSTB 


040000 


BMAPDN 


000010 


BNXCOP 


000004 


S0ARD2 


001000 


BRANCH 


0037S2 


BRARS 


000020 


BRCTS 


000040 


BREG 


000006 


BRLV4 


OOOOOI 


BRLV4R 


000400 


BRLV4S 


OO0020 


BRLV5 


0OOOO2 


BRLV5R 


001000 


BRLV5S 


000040 


BRLV6 


000OO4 


BRLV6R 


002000 


BRLV6S 


000100 


BRLV7 


000010 


BRLV7R 


004000 


BRLV7S 


000200 


BROKE 


10000 


BRTRY 


1OOOO0 


BTCNT 


000236 


BTP.OTH 


004000 


BUF 


000003 


BUFBEG 


002055 


BUFEND 


0O52SS 


BUFLMT 


00004 1 


BUFPTR 


000133 


BUFPOO 


000133 


BUFPO 1 


000133 


BUFP02 


000137 


BUFP03 


00O1 4 1 


BUFP04 


000143 


BUFPOS 


00014S 


BUFP06 


0001 47 


BUPP07 


OOOISI 


BUFPOS 


0001 53 


BUFP09 


000133 


BUFP10 


0001S7 


BUFP 1 1 


000 1 6 1 


BUPP12 


000163 


BUFP13 


0001 6 3 


BUFP14 


000167 


BUFP15 


000171 


BUFP1 6 


000173 


BUPP17 


0OO175 


BUFPI6 


0001 77 


BUFP19 


00O2O1 


BUFP20 


000203 


BUFP21 


000205 


BUPP22 


000207 


BUFP23 


O0O2 1 1 


BUFP24 


00O213 


BUFP2S 


000213 


BUFP26 


0002 17 


BUPP27 


00022 1 


BUFP23 


00O223 


SUFP29 


000223 


BUFP30 


00O227 


BUFP31 


0O0231 


BUFP32 


000233 


BUFP33 


000235 


BUFP34 


000237 


8UFP35 


000241 


BUFP36 


000243 


8UFP37 


000245 


BUFP3S 


000247 


BUFP39 


00023 1 


BUFP40 


0002S3 


BUFP4 1 


000255 


BUFP42 


0002S7 


BUFP43 


000261 


BUFP44 


000263 


BUFP45 


000265 


BUFP46 


0OO267 


BUFP47 


0002 71 


BUFP4S 


000273 


BUFP49 


000275 


BUFP50 


000277 


BUFP51 


000301 


BUFP52 


000303 


BUFR1 . 


005255 


BUFR2. 


005672 


BUF . SC 


O00012 


BUF. BP 


000002 


BUF.OL 


0O04 15 


BUF . EC 


000401 


BUF . ED 


000400 


BUF . GP 


0000 1 1 


BUF . HH 


0O00O4 


BUF . HL 


000003 


BUF . LL 


0000 15 


BUF . NL 


000000 


BUF. SO 


000006 


BUF. ST 


000001 


BUF .TA 


0O0OO5 


BUF . UA 


000007 


BUF . US 


000010 


BUF. U1 


0000 13 


BUF. U2 


000014 


BUF .56 


000000 


3 . BAD 


000010 


B . BTO 


000004 


8. CPE 


000200 


B .CTE 


10000 


B . DTVP 


00041 6 


B. ICE 


00000 1 


B . ISE 


002000 


B . IVE 


000400 


B . LED 


000020 


B . LOOP 


000 100 


B.MPE 


004000 


B .MTCE 


020000 


8. NABO 


000001 


B . NEX 


0OOOO2 


B . NMR 


O40O0O 


B . NRTY 


OOO20O 


B . 000 


000040 


8 . ROS 


000040 


B .RTO 


0O0O2O 


8 . SPE 


OOOIOO 


B.STO 


0OOO1O 


B . TOP 


00 1000 


B2TST 


000 1 6 1 


CCLASS 


000400 


CCSRWO 


000032 


CCSRW1 


0OO033 


CDONE 


O0001 6 


COUPLA 


001343 


COUPLB 


001550 


CDUPLC 


00 15 62 


CDUPLD 


001563 


COUPLE 


001566 


CFLAGS 


000320 


CF . ATN 


000200 


CF.MSC 


OO0100 


CF. THS 


000020 


CHGFLG 


000202 


CHGMOD 


O00201 


CKSTO 


0O3713 


CLIMIT 


0001 42 


CLK 


000464 


CLKP 


000463 


CLKOO 


000472 


CLK01 


0OO5O5 


CLK02 


000504 


CLK1 


000462 


CLK10 


000461 


CLK16 


0004 eo 


CLK32 


0O0456 


CLK6 


0O0457 


CLK64 


000435 


CLRERR 


000 1 65 


CLRTST 


00005 1 


CMOCOF 


000030 


CMOLEN 


OO0026 


CMDLIM 


0OO024 


CMDO 


000004 


CMDPOF 


000031 


CMOPTR 


000027 


CMODEL 


000022 


CMPBUF 


00O242 


CNTFLG 


0001 70 


CNT . LN 


0OO03O 


CNVTV1 


000040 


CNVTV2 


000042 


CNVTV3 


000044 


CNVTV4 


000045 


CN . ERR 


0O400O 


CODVER 


000023 


COMPLT 


000176 


CONT 


000001 


CONTCD 


1 52000 


CONT. F 


0013 33 


CON. ER 


007760 


CON .ST 


000170 


C0PY4 


000000 


CPE 


000012 


CR 


O00004 


CROY 


OOOOIO 


CRI 


000004 


CRY 


000022 


CSEEKA 


O01 675 


CSERR 


OOOOIO 


CSR 


00003 1 


CTMOUT 


000 170 


CYCLE 


000552 


CYLSTR 


170O0O 


CSTYPE 


000002 


C .AONL 


00 1 624 


C . ATTN 


001 630 


C.OCON 


001665 


C . DUPL 


00 154 1 


C. OUPX 


001 627 


C . IMFF 


001613 


C . LOGA 


001 636 


C . LOGS 


001633 


C .SEEK 


001 673 


C.SUBC 


001 660 


C .SUBU 


001 64 6 


OATENO 


033317 


OATT 


000400 


DBAR 


0000 15 


OCERR 


000001 


DCLASS 


OOIOOO 



^namr 






OCLK 


000030 


OCMASK 


00O17O 


DCN .ST 


OOOOOI 


DCN . TT 


000200 


OCRD 


000004 


OCRS 


OOOOOI 


DCRTST 


00025 1 


DDC 


002000 


DDD 


004000 


DER 


OOOOI 1 


DERR 


000004 


DEVCL 


000377 


DFAIL 


002000 


CHANG 


000046 


DI 


000400 


DIAG 


000400 


D 


NITA 


001024 


DINIT8 


001027 


DINITC 


001030 


0I5C0N 


0OO204 


DISM 


000062 


D 


SN 


0OOO33 


DL 1 IAD 


177360 


DL1 144 


176510 


OMBEG 


020000 


DMBPC 


000002 


DMOBG 


OOOOOO 


DMDT 


004020 


DMNTRY 


003626 


OMODE 


040000 


DMODT 


OOOOI 2 


OMOVH 


0000 1 1 


DMOVL 


OOOOIO 


DMPC 


003632 


OMREGO 


0O0007 


0MREG1 


OOOOOI 


DMREG2 


00OO02 


DMREG3 


O0O003 


DMREG4 


000004 


0MREG5 


000005 


0MREG6 


000006 


0MREG7 


OOOOOO 


DMSTR 


0000 13 


DMTEMP 


0001 6 6 


DM. BEG 


0O1352 


OOFFOA 


002053 


DOFFDB 


002061 


OPF 


000026 


DPROC 


0OOO0 6 


ORAMPE 


0O03O4 


ORAVL 


O10000 


GROUP 


002000 


DRDY 


OOOOOI 


DRINIT 


004000 


DROMPE 


000266 


ORPLCA 


001067 


ORFLCB 


001 107 


DRPLCC 


001 1 12 


DRPLCD 


0O1 127 


DRPLCX 


00 1 1 OS 


0RPLC1 


001 141 


DRVCLR 


000005 


DRVOL 


004000 


ORV. AT 


0O2000 


DRV. AV 


0O4OOO 


DRV .CI 


004000 


ORV .C2 


002000 


DRV . C3 


OOIOOO 


ORV. C4 


0OO40O 


DRV.DS 


OOIOOO 


DRV .00 


004000 


ORV OE 


000200 


DRV .DF 


000020 


ORV. OR 


0OO040 


ORV .EL 


OOOOIO 


ORV .FO 


0O20O0 


DRV .OA 


000200 


DRV ,PE 


000040 


ORV. PS 


000002 


DRV. RE 


OOOIOO 


DRV RR 


000100 


DRV RU 


OOOOOI 


DRV . SN 


1 70000 


DRV . SR 


000020 


DRV . SU 


170000 


DRV . SI 


1 oooo 


DRV .82 


020000 


DRV . S3 


O40000 


DRV .54 


1 ooooo 


DRV.S7 


0O0400 


ORV . UM 


1 76000 


0RV.U1 


OIOOOO 


DRV . U2 


O2000O 


DRV.U3 


040000 


DRV. U4 


100000 


DRV .WE 


000010 


DRV . W1 


OIOOOO 


DRV . W2 


O2000O 


0RV.W3 


040000 


ORV .W4 


100000 


DSDIEA 


00 1744 


DS0IE8 


001763 


DSDIEC 


001753 


OSER 


OO0034 


OSK. LN 


000054 


OSLEOS 


00015 1 


DSR 


0OO035 


DSTSH 


000007 


DSTSL 


0O0006 


0TEMP1 


000206 


DTIMEA 


002 1 13 


OTMP 


0000 12 


DTSTBL 


007404 


OUPVC 


OOIOOO 


OUP. LN 


000014 


DXFC 


010000 


D 


ALBF 


003006 


D 


ARTC 


003200 


D 


ATTN 


00 1 053 


D 


AVAL 


001054 


D . 8FCA 


002476 


D 


BFCK 


002475 


D 


CLCS 


001270 





CLRS 


0O201 1 





CLUR 


0O23O6 
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RBNXOR 


060000 


RBN2N0 


030000 


RBPA 


0000 17 


RCC 


000014 


RCI 


000003 


RCLR 


0000 13 


RCMO 


000012 


RCSRWO 


000024 


RCSRW1 


000025 


RCTBLK 


000224 


RCTOFF 


000222 


RCT. EN 


100000 



RCT .MT 


oooooo 


RCT PR 


020000 


RCT SE 


030000 


RCY 


0000 15 


RD 


000004 




RDCLK 


ooosoo 


RDCLKO 


000476 


ROFST 


000004 


RDNXT 


000014 


RDPF 


000010 




READ 


O0OO0 1 


REAOCD 


013400 


RECAL8 


0002 1 6 


RECC 


000006 


RECCT 


000007 




RELE5 


000136 


REPSTA 


O0026O 


RETCNT 


0O740O 


RETURN 


003760 


REVEND 


000133 




REVSTR 


000 123 


RGDATH 


000272 


RGOATL 


00027 1 


RIB 


000013 


RLL 


000004 




RNGBSH 


OOO 1 62 


RNGBSL 


0001 60 


ROL 


003657 


ROR 


003662 


ROTATE 


003652 




R0TR1 


003675 


R0TR3 


003874 


RPC 


0000 12 


RPE 


0000 13 


RPOK 


000027 




RROY 


000032 


RRM 


OOOOOS 


RRSGEN 


OOOOOI 


RSE 


0O0O04 


RSPCOF 


000022 




RSPLEN 


000O2O 


RSPO 


000002 


RSPPOF 


000023 


RSPPTR 


000021 


RTCS 


000005 




RTCS05 


O00O4O 


RTCS06 


000100 


RTCSI3 


000040 


RTCS14 


000100 


RTDS 


000002 


r 


RTDSER 


OO1O20 


RT0SO6 


OOO 100 


RTOEVE 


OOOOIO 


RT1 


OOOOI 6 


RUNN 


ooooi 4 a 




RUPF 


OO0O10 


RVACTV 


0O0O20 


RVCBNH 


00013 1 


RVCBNL 


0OO130 


RVCBUF 


000226 1 




RVCEBF 


000230 


RVCFLG 


000254 


RVCIND 


0002 1 6 


RVCRTY 


000220 


RVCSAV 


000123 ' 


*.«* 


RVCSOI 


000232 


RVCT 


1OO000 


RVCTA 


OOO 132 


RVCVEC 


000234 


RVECDP 


000252 




RVECUP 


000250 


RVWRIT 


OOOOOI 


RWM 


000015 


RWRDY 


100000 


R.GCCH 


001433 




R. GSTA 


OOI 445 


R. GSTB 


O01452 


R. GUCH 


O01 443 


R. GXCH 


001436 


R. LRSP 


OOI 476 




R.RESP 


001S02 


R. RSPA 


001503 


R. SEEK 


001536 


R.TOPO 


001445 


RO 


OOOOOO 




R1 


OOOOOI 


RIO 


OOOOIO 


R1 1 


00001 1 


R12 


OOOOI 2 


R13 


OOOOI 3 




RI4 


0O0O14 


R15 


000015 


R16 


OOOOI 6 


R17 


OOOOI 7 


R2 


000002 




R3 


000003 


R4 


OO0OO4 


RS 


000005 


R8 


000006 


R7 


O00OO7 




SAREG 


000364 


SAVAOR 


000274 


SAVBUF 


000270 


SAVCNT 


000272 


SAVEOC 


000266 




SAVR7 


000172 


SAVUAR 


000262 


SCAN 


0000 IS 


SCLR 


000003 


SCMO 


000002 




SC.AOL 


000400 


SC.BAD 


0003O0 


SC . CNT 


000140 


SC . DCL 


0OO24O 


SC . DOE 


OO0340 




SC.OIS 


000400 


SC.DSY 


000140 


SC . DUP 


000200 


SC . ECC 


000340 


SC . EC1 


000400 




SC .EC2 


0OO440 


SC.EC3 


000500 


SC . EC4 


000540 


SC . ECS 


000600 


SC. ECS 


O0O640 




SC .EC7 


000700 


SC .ECS 


000740 


SC . EDC 


000100 


SC . PER 


OOOOOO 


SC. HDR 


000100 




SC . IMR 


0OO24O 


SC . INV 


000 too 


SC . IOP 


000100 


SC . LVO 


000400 


SC.NML 


OOOOOO 




SC NOM 


OOO 140 


SC NVL 


000040 


SC . N12 


000240 


SC ODB 


000 100 


SC . ODT 


000040 




SC OVR 


OOOO40 


SC . PAR 


000200 


SC . POS 


0001 40 


SC . RRD 


000300 


S C . RWR 


000200 




SC .SCN 


000 10O 


SC .SDI 


000040 


SC . STO 


0O0O4O 


SC.UNK 


OOOOOO 


S C . WP H 


020000 




SC .WPS 


O1OO00 


SO 


OOOO06 


SOCLK 


000501 


SDIBEG 


001355 


SDIB . L 


000120 




SDICLK 


0O0345 


SDICl 1 


000350 


SDICL2 


000351 


SDIRTY 


000003 


SDIS 


0000 17 




SDITMO 


000O17 


SDITO 


OO4400 


SOITST 


000354 


SDI .AT 


000046 


SDI . BH 


000030 




SDI.BL 


000027 


SOI . CH 


0000 12 


SOI . CL 


00001 1 


SOI . CP 


000002 


S D I . CW 


O0OO56 




SDI .08 


000007 


SDI . OL 


OOOOIO 


SDI . DP 


000070 


SDI .EC 


0O0O3S 


SDI Ed 


000035 




SOI . ES 


O0OO26 


SDI EO 


000020 


SOI . El 


000017 


SDI .PC 


000073 


SDI . GC 


000065 




SOI . GO 


000074 


SDI . GP 


000013 


SDI . HI 


00O063 


SDI . H2 


0O0064 


SOI . I 1 


000037 




SDI . 12 


000040 


SOI . 13 


00004 1 


SDI . LL 


000101 


SOI . LN 


0O007O 


SOI . LT 


OO0O34 




SDI . L 1 


00007S 


SDI 1.2 


000076 


SDI .Ml 


00007 1 


SDI .M2 


0O0072 


SOI . OE 


00002 4 




SOI . OM 


000025 


SOI . OP 


000054 


SOI .PH 


000100 


SOI .PL 


000055 


SDI . PO 


000022 




SOI . RC 


000034 


SDI . RH 


000032 


SOI .RL 


00003 1 


SOI .RO 


0O0023 


SDI . RS 


00003 6 




SOI . RT 


000067 


SOI . RV 


OO0O77 


SDI .SD 


0000S7 


SDI SL 


OOOOOI 


SDI .SS 


OOOOI 4 




SOI .ST 


OOOOOO 


SDI .SV 


0OOO2 1 


SDI .SW 


000003 


SOI SI 


0OO044 


SDI . S2 


00004S 




SOI .S4 


000050 


SDI .SS 


00005 1 


SDI .SB 


0000S2 


SOI .S7 


000053 


SDI . TG 


0000 6 6 




SDI . TI 


000042 


SOI . TM 


000004 


SOI . TO 


0O0O33 


SDI . US 


0O0OO6 


SDI . UE 


000043 




SDI .UF 


00OO60 


SDI . UG 


000005 


SDI UN 


000043 


SDI VI 


000061 


SDI . V2 


000062 




SDI . XH 


000016 


SDI . XL 


OOOOI 5 


SDI . XR 


000033 


SDI . 1 


0O1355 


SDI . IT 


O0O01O 




SDI . 12 


000074 


SOI . 2 


001475 


SDI . 2T 


000047 


SOI . 3 


OOI 615 


SDI . 4 


001735 




SDPF 


OOOOOO 


SDRD 


000430 


SDRRDV 


000522 


SDTIMO 


00O200 


SDWRT 


000374 




SO . RS 


0005 1 6 


SD. RST 


OOOS14 


SEC 


000020 


SECC 


OOOOI 6 


SECCT 


000017 




SECSZ 


000400 


SECTR 


000012 


SEEK 


000002 


SEEKGS 


00 1526 


SEEKL 


000006 




SEKPRV 


0000S1 


SEKSAV 


000052 


SEOERR 


000003 


SEOTST 


000022 


SEOUEN 


000010 




SE001 


000030 


SERIAL 


0OOO4O 


SES 


040000 


SETCRY 


0O3734 


SEX2SK 


000036 




SF 


0004OO 


SFERR 


0OOOO2 


SFT20 


0002 14 


SGRPCO 


107000 


SIMTST 


OOOOOO 




SLAT 


020000 


SM 


000040 


SNGLOP 


003647 


SRM 


000015 


SRSGEN 


OOOOI 1 




SSE 


000014 


SST 


002OOO 


STARSP 


0003S6 


START 


000432 


STCACH 


033317 




STOALN 


000400 


STEP 


OOOOI 1 


STEP1 


004000 


STEP2 


010000 


STEP3 


020000 




STEP4 


040O0O 


STEST 


000030 


STOP 


OOOOI 1 


STOPCM 


140000 


STOPEN 


O2OOO0 




STORB 


003747 


STORCC 


003673 


STORE 


0O3744 


ST0RT1 


003621 


STRTCO 


O7O4O0 




STRT. F 


001332 


STS 


004000 


ST , ABO 


000002 


ST . AVL 


0O0OO4 


ST . CMO 


OOOOOI 




ST .CMP 


000007 


ST . CNT 


000012 


ST .OAT 


OOOOIO 


ST . DRV 


000013 


ST . HST 


OOOOI 1 




ST MFE 


000005 


ST .MSK 


000037 


ST .OFL 


000003 


ST . SHF 


000007 


ST. SUB 


OOOO40 

a"' 


ST .SUC 


OOOOOO 


ST .WPR 


000006 


SUPF 


OOOOOO 


SUSP 


0O0O40 


SWAB 


003666 


-,, 


SWM 


000005 


SY 


000 1 12 


SYNC 


000202 


SYNCH 


O23O00 


SVNCL 


000274 




SVO 


0001 12 


SV8 


000122 


S . ADRH 


000023 


S . AORL 


0O0O22 


S .CFL 1 


001367 




S . CLRB 


003623 


S .CL 1 1 


002015 


S . CMOD 


001380 


S . CYLH 


000025 


S . CYLL 


00OO24 




S . OCLR 


001401 


S .DCNE 


001413 


S .DCNI 


001403 


S . 0CN2 


001414 


S . DCN3 


00141 1 




S . EREC 


001426 


S . GRUP 


000026 


S .GUCH 


001441 


S . INIT 


001465 


S . LBNH 


0000 17 




S . LBNL 


000016 


S . LOCC 


003606 


S . LDCT 


003607 


S. LDOB 


0O36O7 


S. LOPC 


003604 




S . L0R2 


003602 


S LD1 1 


003603 


S . LD12 


003604 


S. L0I3 


003605 


S . LD14 


O036O6 




S . L015 


003607 


S. 101 6 


0O361O 


S . LD17 


00361 1 


S. LL12 


003612 


S . LRSP 


OOI SO 6 




S .ML 12 


0036 13 


S ONLN 


001467 


S . OPFL 


00003 1 


S. RCAL 


001471 


S . ROTL 


003574 




S .RR17 


003S77 


S RUNN 


00 15O4 


S .S01 1 


O0360O 


S.SECI 


00003 1 


S SECS 


000030 




S . SEEK 


00 1 510 


S .SN03 


001375 


S .SRM 


000531 


S.STCC 


003617 


S STDB 


003620 




S .STPC 


0038 IS 


S .ST1 1 


003814 


S.ST12 


003615 


S.ST13 


003616 


S . ST 14 


003617 




S.ST15 


003620 


S .ST1 6 


003621 


S .STI7 


003622 


S . SWAB 


003575 


S . TRAK 


000027 




TEMP 


0002 5 6 


TEMPI 


000046 


TEMP2 


000047 


TEMP3 


000050 


TEST 


000008 




TESTBL 


O0OO04 


THEN 


000451 


TMOUT 


000276 


TMR.BS 


0OO178 


TMR.MC 


000174 




TOPOL 


000220 


TOPRSP 


000157 


TP010 


0004 1 1 


TP01 1 


0OO417 


TP012 


000442 




TP013 


00045 1 


TP01 4 


000432 


TPO! 5 


000536 


TP01 6 


0OO432 


TPOI 7 


OOOS03 




TSBRPE 


0002S4 


TSCRPE 


0000 13 


TSTCNT 


OOOOOO 


TSTHNG 


000014 


TSTRTN 


000524 




TSTXL 


000142 


T3 


O0OOS4 


T4 


000060 


T5 


00OO64 


T6 


000067 




T7 


O0OO75 


TS 


00010 1 


UBAR 


000005 


UBURST 


000140 


UCRO 


O00OO4 




UCRS 


00OO14 


UCSREN 


OO0400 


UDA1 


OOOOOI 


UDD 


000005 


UDDI 


000010 




JDS 


O00O15 


UER 


OO0007 


UF CMR 


OOOOOI 


UF . CMW 


000002 


UF .MSK 


O00OO3 




UF . RMV 


00O2O0 


UF . RPL 


100000 


UF .WPH 


020000 


UF .WPS 


010000 


UF . 576 


O00OO4 




UMP 


000020 


UMPN 


OOOOOO 


UNC . RM 


000200 


UNC.SS 


100000 


UNERR 


O0OO40 




UNITF 


1 77400 


UNLOCK 


003570 


UNSUCC 


000175 


UN . BUF 


001355 


UPF 


000026 




UPROC 


000026 


UP . XFC 


007760 


UO. CNT 


OOOOOO 


URETRY 


000040 


UTEMP1 


000210 




UTMP 


000010 


UWMCI 


OOOO06 


U3K 


000100 


VAX I NT 


000400 


VAXO 


O00OO6 




VAX . PG 


000400 


VC ,CMD 


OOOOOO 


VC . DMM 


177760 


VC . LOG 


0OOO20 


VC.RSP 


OOOOOO 




VECT 


000010 


VECTAB 


007643 


V.ATTN 


007655 


V. ATT2 


007712 


V .AVAL 


007721 




V.CM0 1 


007675 


V . OCLR 


007657 


V. OCON 


007732 


V. DRVC 


007643 


V . ERRC 


0076 6 1 




V.ERRO 


007655 


V .ERR1 


007705 


V.ERSK 


007664 


V. GCHR 


00773S 


V .GCR1 


007737 




V. GCR2 


007742 


V . GSTA 


007727 


V. INIT 


007 68 4 


V. NULL 


007710 


V . OLRD 


00771 1 




V . ONAV 


007724 


V . ONLN 


00771 1 


V. RVC3 


007644 


V . RVC5 


007645 


V . RVCS 


007646 




V.SEEK 


007702 


V .SKON 


00766S 


V .STAT 


007731 


V.SUCH 


007714 


V .TOPO 


007651 




V . ZATT 


007734 


WAIT 


0001S6 


WCI 


0O0005 


WD 


OOOOOO 


WMCI 


O0OOO7 ' 




WRAP 


OOOOOO 


WRC 


0OO037 


WRFST 


OOOOOS 


WRITCO 


122400 


WRITE 


000OO4 




WRNXT 


000O15 


WRRDXR 


131000 


WRRDX1 


175377 


WRSND 


0O00O3 


WRT 


000002 




XBNCOO 


120000 


XBNSTR 


170000 


XCMP 


000200 


XFCFIN 


000021 


XFCMAX 


000O22 




XFCPAS 


000014 


XFCRET 


004006 


XFCRTA 


004010 


XFCRW 


003483 


XFCSST 


003454 




XFCTAB 


007744 


XFCUPR 


0000 12 


XFC01 


003367 


XFC02 


003463 


XPC03 


O03463 




XFC04 


00347 1 


XFC05 


003477 


XFC06 


003510 


XFC06A 


003518 


XFC07 


003830 




XFCOS 


003S41 


XFC08A 


003544 


XFC08B 


003547 


XFC09 


003550 


XFC1A 


003407 




XFC1ER 


003462 


XFC10 


003553 


XFC11 


003556 


XFC12 


003566 


XFC5A 


00350O 




XFCSB 


003506 


XF . REP 


003405 


XF04A 


003474 


XF 1 1A 


003561 


XF1 IB 


003562 




XF1 1C 


003564 


XF1 10 


003565 


XRWRER 


003461 


XSSTAA 


001016 


X SSDI 


O01OO4 




X . SSOS 


001012 


X .SSOT 


001006 


X .SSDX 


001007 


X SSTA 


00101 5 


ZFLG 


OOOOIO 




2R0 


O0OO2 1 


SDPASS 


00013 1 


$DRPE 


000271 


SECC 


000434 


SEND 


010000 




SSOI 1 


00O346 


SSDI2 


000347 


SSDI3 


000352 


SSDI4 


000372 


$SDR1 


000520 




SS0R2 


000521 


SS0R3 


000523 


$SD 1 


000402 


$SD2 


000403 


$SD3 


000404 


r 


SSD4 


000413 


SSDS 


000423 


$$BDA 


000O02 


$$KDA 


000001 


SSKDB 


000002 4 




$$ODA 


OOOOOI 


SSUDA 


OOOOOO 












\ 


, 
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SSBOA 


1 -0 


8 





1 2 





1 3 





14 





1 4 





IS 





1 5 







SI -0 


51 





5 1 





51 


-0 


64 





65 





67 





7 1 







80-44 


S3 


73 


83 


103 


83 


-114 


9 1 


251 


9 1 


251 


9 1 


253 


1 19 


541 


$$KDA 


1 -0 


1 





























$SKOB 


1 -0 


1 





























$$oda 


1 -0 


1 





8 





12 





1 3 





1 5 





15 





18 







6S-0 


65 


O 


71 





76 


4 


83 


104 


83 


1 13 


85 


142 


1 21 


701 


S$UOA 


1 -0 


8 





1 2 





1 3 





15 





15 





18 


O 


20 







45-0 


46 





59 





67 





70 





74 





74 





75 







1 1 1 -467 


1 16 


521 


1 1 7 


527 


202 


3531 


















$OPASS 


84- 131 






























SDRPE 


93-271 






























$ECC 


108-434 






























$END 


223-8000 






























$S0 1 


104-4O2 






























$SD2 


104-4O3 






























$SD3 


104-4O4 






























SS04 


106-413 






























$SDS 


106-423 






























$SDI 1 


99 -346 






























SSDI2 


99-347 






























SSDI3 


99-3S2 






























$SDI4 


101 -372 






























$SDR1 


1 16-S20 






























SSDR2 


116-521 






























$SDR3 


1 16-523 






























ACLO 


12-0 


13 





13 





1 2 1 


70 1 


185 


3055 














ALGADR 


65-0 


65 





65 

























A L L MT 


44-0 


48 





























ALUTST 


62-54 


88 


1 66 


























ATTCOD 


45-0 






























ATTN 


25-0 


99 


353 


100 


362 


121 


732 


122 


740 


122 


742 


122 


743 


122 


753 


AVAIL 


25-0 


99 


353 


101 


371 


121 


722 


121 


732 


121 


733 


122 


740 


122 


743 


AVL . LN 


52-0 






























8 . SAD 


30-0 






























B . BTO 


42-0 






























B. CPE 


42-0 






























B. CTE 


42-0 






























B. OTYP 


42-0 






























B. ICE 


42-0 






























B. ISE 


42-0 






























B. IVE 


42-0 






























B. LED 


30-0 






























B . LDDP 


30-0 






























B.MPE 


42-0 






























B.MTCE 


42-0 






























S . NABO 


30-0 






























B. NEX 


42-0 






























B . NMR 


42-0 






























B . NRTV 


30-0 






























8 . DDD 


30-0 






























B . RDS 


42-0 






























B . RTO 


42-0 






























B .SP6 


42-0 































1 S-0 
74-0 
176-2S44 



18S-30SS 
21 -0 
S3- 1 13 



22-0 30 

74-0 74 
124-7400 225-7 



7S-0 
416 22S-741 6 



45-0 
76-3 
22S-77SO 



46-0 
79-31 



45-0 46-0 
224-7404 

22-0 22-0 

93-266 94-30 



25-0 
99-3S3 



27-0 

100-362 



29 -O 
101 -373 



157-1745 161-21 OO 



c 
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B . STO 

B . TDF 

82TST 

BA 

BA1 6 

BA17 

BA18 

BA19 

BA20 

BA21 

BA22 

BA23 

BA24 

BA25 

BA26 

BA27 

BA28 

BA29 

BAD. LN 

BADRH 

BADRL 

BAR 



BCAID 
8CAIS 
BCGRP 
BCICSR 



42-0 
42-0 
83-63 

21 -O 

21 -0 

21 -0 

30-0 

30-O 

30-0 

30-O 

42-0 

42-0 

42-0 

42-0 

42-0 

42-0 

42-0 

42-0 

52-0 

51 -0 

51 -O 

18-0 
1 13-503 
129- 1055 
132- 1 142 
136- 1 173 
146- 1375 
1 50- 1476 
1S4- 1611 
1SS- 1700 
158-2004 
1 60-2064 
164-2163 
165-2237 
166-2306 
169-240S 
1 7 1 -2460 
173-2S03 
1 79-261 6 
180-2666 
182-2764 
1 87-3075 
186-3161 
189-3234 
192-3312 
194-336S 
196-3435 
201-3515 
220-3717 
22 1 -3773 

18-0 

18-0 

64-0 

41-0 



43-0 
43-0 



43-0 
43-0 
43-0 
43-0 
43-0 
43-0 
43-0 



119- 
130- 
132 

136 

148 

150- 

154 

155- 

159 

16 1 

1 64 

1 65- 

166- 

169 

171 - 

173 

179- 

180 

182 

167- 

188 

189- 

192- 

195- 

19 3 

20 1 
220 
221 < 



53S 

1061 
1 145 

1 175 
1376 
1477 
1613 
1701 
201 6 
2074 
21 67 
2240 
231 1 
2412 
2461 
250S 
2621 

2 667 
2767 
3116 
31 64 
3237 
331 6 
3371 
3443 
351 6 
3742 
4004 



83- 
121 ■ 
130- 
132 
136 
148- 
150- 
154- 
156- 
159- 
16 1- 
164- 
165- 
1 68 ■ 
169- 
171 ■ 



181 

182 

1 87 

188- 

189 

192 

195 

197 

201 

220 

221 



172 

71 1 

1064 

1 147 

1 176 

1405 

1500 

1614 

1715 

2023 

2105 

2175 

2244 

2314 

2413 

2462 

2544 

2626 

2700 

2774 

3 117 

3171 

3240 

3317 

3374 

3457 

3520 

3743 

4007 



95- 
12 1- 

130- 
1 32- 

136- 
1 48- 
150- 
154- 
155- 
159- 

16 1- 
164- 
165- 
167- 
169- 

17 1- 
176- 
179- 
161 ■ 
182- 
1S7- 

tss- 

1 89- 
132- 
135- 
IS! 
201 • 
220- 
221 - 



31 1 
737 
1067 

1 150 
1203 
1411 
1506 
1620 
1716 
2025 
2106 
2200 
22S3 

2 34 3 
2417 
2463 
2S46 
2630 
2702 
2776 
312 1 
3202 
3241 
3321 
3375 
3464 
3523 
3744 
40 13 



36 
122- 
130 
132 
137- 
14S- 
150- 
154- 
156- 
159- 
1 62- 
1 64- 
1 65- 
1 68- 
1 69- 
171 ■ 
176- 
179- 
181 - 
182 
1 87- 
188 
189- 
193 
195- 
1 99 ■ 
203- 
220- 
221 ■ 



31 6 

755 

1070 

1151 

12 15 

1414 

15 10 

1621 

1721 

2032 

2112 

2204 

2255 

2344 

2422 

2464 

2547 

2632 

2704 

3005 

3 123 

3204 

3242 

3325 

3376 

3474 

3544 

3746 

4014 



96 
123 
130 
132 
14 1 
148 
150 
154 
156 
159 
1 62 
1 64 
1 65 
1 68 
171 
172 
177 
1S0 
181 
182 
1 87 
189 
1 90 
193 
195 
199 
206 
220 
22 1 



-321 
-767 

- 1077 
-1152 

- 1273 
-1416 
-1517 

- 1 631 

- 1723 
-2034 
-2117 
-2210 
-2260 
-2345 
-2425 
-2465 
-255 1 
-2634 
-2712 
-3010 
-3125 
-321 1 
-3247 
-3326 
-3377 
-3475 
-3556 

3751 
401 6 



98 
123- 
130- 
132 
1*1 ■ 
148- 
151 ■ 
154- 
156- 
1 60 
1 62- 
164- 
1 65- 
168- 
171- 
172- 
177- 
1SO 
181 - 
182- 
1 87- 
189- 
1 90- 
193- 
195- 
200 
209- 
221 ■ 
221 > 



327 

771 

1 100 

1 154 

1276 

1423 

1526 

1633 

1726 

203S 

2121 

2213 

2261 

2347 

2430 

2467 

2553 

2636 

2722 

3013 

31 27 

3212 

3257 

3331 

3400 

3500 

3571 

3752 

4017 



98- 
123- 
130- 
132- 
142- 
148- 
152- 
154- 
157- 
160- 
163- 
1 64- 
165- 
169- 
171 - 
172- 
177- 
160- 
181 - 
184- 
187- 
1 89 - 
190- 
193- 
195- 
200- 
217- 
221 - 
226- 



332 

772 
1 102 
1 156 
1321 
1428 
1543 

1 636 
1735 
2037 

21 34 

22 15 
2262 

2 352 
2431 
2470 
2564 
2640 
2726 
3014 
3131 
32 1 4 
3272 
3336 
3401 
3501 
3631 
3755 
7641 



SS- 344 
123-777 
130- 1 106 
132- 1 157 
142- 1326 
148- 1427 
153- 1546 
154-1651 
1S7- 1744 
1 60-2040 
1 63-21 36 
1 64- 2220 
165-2263 
169-2362 
171 -2432 
172-2471 
17S-2571 
180-2647 
181 -2733 
184-3021 
187-314 1 
189-3215 
192-3273 
193-3337 
196-341 1 
200-3506 
217-3645 
221 -3757 
227-7712 



lOS 
1 23 
131 
132 
142 
148 
153 
1S5 
157 
1 60 
1 63 
1 65 
1 65 
1 69 
171 
172 
178 
1 80 
181 
185 
187 
189 
192 
194 
1 96 
201 
218 
221 
228 



-406 

- lOOO 
-1116 
-1161 

- 1 327 
-1431 

- 1553 

- 1653 

- 1746 
-2043 
-2144 
-2223 
-2264 
-2364 
-2433 
-2473 
-257 3 
-2651 
-2740 
-3053 
-3143 
-3216 
-3275 
-3346 
-3417 
-3510 
-3652 
-3761 
-7742 



106- 
124- 
131 - 
136- 
142- 
149- 
153- 
1 55- 
157- 
1 60- 
1 63 - 
165- 
1 65- 

1 69 ■ 
17 1- 
172- 
176- 
ISO- 
182- 
185- 
187- 
189- 
192' 
194- 
196- 
201 - 

2 18- 
221 ■ 
228- 



4 17 108- 

1004 126- 

1121 131 ■ 

1166 136- 

1330 146- 

1445 149 - 

1574 153- 

1660 155- 

1747 157- 

2044 160- 

2 146 164- 
2225 165- 
2265 165- 
2372 169- 
2435 171- 
2474 173- 
2575 173- 
2652 ISO- 
2742 182- 
3054 185- 

3 144 188 
3220 189- 
3301 192- 
3351 194- 
3422 196- 
3S1 1 201 - 
3653 219- 
3762 221- 
7744 228- 



431 109- 

1034 126 

1122 131 ■ 

1170 136- 

1347 146- 

14SO 149 

1577 153- 

1661 155 

1757 157- 

204S 160- 

2 1 50 164- 

2230 165 

2266 I 66 

2373 169- 

2442 171 ■ 

2475 173- 

2S03 179- 

2653 ISO- 

2757 182- 

3061 186 

3147 188 

3226 189- 

3302 192 

3353 194 

3 4 2 5 19 6- 

35 12 20 1 

3677 219- 

3763 221 

7747 228 



4SO 

1035 

1 127 

1171 

1354 

1460 

1 600 

1 667 

1773 

2047 

21 57 

2234 

2272 

2401 

2445 

2476 

2607 

2662 

2760 

307 1 

31 53 

3227 

3304 

3354 

3427 

3513 

3 70 3 

37S6 

77S3 



1 1 3-477 
126- 1036 
131-1131 
136- 1 172 
146- 1372 
150- 1473 
154- 1 610 
155-1 675 
158- 1775 
1 60-2053 
1 64-21 St 
16S-2235 
166-2276 
1 69-2403 
171 -2455 
173-2502 
17 9-2614 
180-2664 
182-2762 
186-307 2 
1 88-3 1 60 
189-3230 
192-3306 
194-3357 
196-3431 
201-3514 
219-37 15 
22 1 - 3770 
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BOCST 

BOSNF 

BECC 

BECER 

BERON 

BERMAX 

BFRO 

BFSV 

BFULL 

BGOOD 

BGRUP 

BIBAD 

BIBER 

BICSR 

BICSRE 

BIDTYP 

BIEAOR 

BIECSR 

BIGPRO 

BIGPRI 

BIGPR2 

BIGPR3 

BI IDES 

BI IMSK 

BIPSDE 

BIPSFC 

BIPSRC 

BIRDCM 

BIRTRV 

BISAOR 

BITOO 



BIT02 
BIT03 
BIT04 

SITOS 

BIT06 

BITOT 

BIT08 

BIT09 

BI T 10 
BIT1 I 



64-0 
64-0 



167-2341 

162-2781 193-3327 193-3340 



148-1430 165-2247 



19 4-3363 



64-0 

64 -0 

64-0 

13-0 

41 -O 

41 -O 

43-0 

41 -O 

41 -O 

41 -0 

41 -0 

41 -O 

41 -O 

41 -O 

41 -O 

41 -O 

41 -0 

41 -0 

41-0 

40-0 

S1 -O 

41 -0 

18-0 

S9-0 
122-740 
1S7- 1747 
206-3560 

18-0 

70-0 

18-0 

1 8 -O 

18-0 

70-0 

18-0 

70-0 

18-0 

62-0 

18-0 

63-0 

18-0 

73-0 

18-0 

18-0 

18-0 

64-0 



123-773 

67-0 

122-761 194-3345 

154-1623 157-1763 163-2125 164-2164 165-2251 166-2275 

154-1622 164-2212 16B-2227 165-2242 166-2274 168-2350 

169-2360 169-2361 137-3120 186-3158 

163-2134 166-2312 166-2322 176-2543 179-2614 193-3330 



169-2376 171-2441 173-2500 179-2602 179-2631 1 82 - 277 1 1 9 4 - 334 
173-2501 181-2737 182-2763 182-2773 193-3333 193-3334 194-3352 
193-3341 



19-0 24-0 2S-0 30-0 36-0 39-0 

59-0 59-0 60-0 61-0 63-0 64-0 

130-1101 137-1214 142-1320 148-1374 154-1634 154-1634 

157-1747 157-1747 163-2125 163-2134 164-2173 166-2303 



45-0 53-0 58-0 58-0 58-0 58-0 58-0 

65-0 69-0 69-0 88-167 9 1-251 121-705 121-714 

154-1634 155-1662 1SS-1701 155-1701 155-1701 156-1707 156-1733 

166-2310 166-2312 174-2514 179-2602 179-2614 181-2735 182-2771 



24-0 



2S-0 



202-3 

19 



19 - 
152- 



69-0 

22-0 
533 202-3537 

39-0 

22-0 

21 -O 
544 



39-0 45-0 

58-0 58-0 

39-0 43-0 

25-0 30-0 



202-3532 202-3536 



53-0 

59-0 
59 -O 
39-0 



50- 
39- 
22- 



53- 
42- 
35- 



59-0 
58-0 
39-0 



58-0 

60-O 
81 -O 
49 -O 

39-0 

25-0 

39-0 

SO-O 

62-0 
59-0 
42-0 



53-0 

63-0 
62-0 
58-0 

53-0 

30-0 

43-0 

58-0 

62-0 
60-0 
45-0 



59-0 

64-0 
S4 -O 
58-0 

59-0 

39-0 

50-0 

59-0 

64-0 
62-0 
58-0 



59-0 

69-0 
69 -O 
59-0 

59-0 

49-0 

58-0 

62-0 

73-0 
62-0 
89-0 



60-0 



61 -0 



63-0 



64-0 



202-3532 202-3534 

202-3532 202-3535 

60-0 



60-0 
58-0 
58-0 
62-0 



73-0 
63-0 
60-0 



61 -0 


62 


O 


64-0 


61 -0 


62 





64-0 


58-0 


59 





61 -O 


59-0 


S 1 





62-0 


64-0 


73 





73-0 


64-0 
62-0 


152 

62 


1544 



62-0 



V 1 
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BIT12 
B I T 1 3 
BIT1 4 
BIT15 



BIT1 6 

8IT17 

BIT1S 

B I T 1 9 

BIT20 

BIT21 

BIT22 

BIT23 

BIT24 

BIT25 

BIT26 

BIT27 

BIT2S 

BIT29 

BIT30 

BIT31 

BIUCSR 

BIWRCM 

BIWSTA 

BLAST 

BLOCK 

BLRWR 

BLSTB 

BMAPDN 

BNXCOP 

B0ARD2 

BRANCH 

BRARS 

BRCTS 

BREG 

BRLV4 

BRLV4R 

BRLV4S 

BRLV5 

BRLV5R 

BRLV5S 

BRLV6 

BRLV6R 

BRLV6S 

BRLV7 

BRLV7R 

BRLV7S 

BROKE 



62 

18- 
62 
1 8 
59- 
88 
1 60- 
179 



39 • 
39 ■ 
39 ■ 
39 ■ 
39 ■ 
39- 
39- 
39- 
39- 
39- 
39- 
39 
39- 
39- 
41 • 
40- 
41 ■ 
64' 
19 
64 ■ 
64- 
64- 
64- 
73- 
217- 
64- 
64- 

1 a- 

43- 
43- 
43- 
43- 
43- 
43- 
43 
43 
43 
43' 



202 

2040 

2624 



19-0 
1 19-541 

19-0 

63-0 

19-0 

62-0 

19-0 

59-0 

88-212 
163-2144 
181 -2736 

42-0 

42-0 

42-0 

42-0 

42-0 

42-0 

42-0 

42-0 

42-0 

42-0 

42-0 

42-0 

42-0 

42-0 

42-0 

43-0 



22-0 
224-7400 

22-0 

84-0 

22-0 

64-0 

22-0 

60-0 

98-336 
195-2224 
182-2764 

43-0 

43-0 

42-0 

42-0 

42-0 

42-0 

42-0 

42-0 

42-0 

42-0 

42-0 

42-0 

42-0 

42-0 

43-0 

44-0 



35-0 

226-741 6 
35-0 

35-0 

64-0 

25-0 

61-0 
1 19-541 
165-2242 
194-3363 

43-0 

43-0 

43-0 

43-0 

43-0 

43-0 

43-0 

43-0 

43-0 

43-0 

43-0 

43-0 

43-0 

43-0 

44-0 

44-0 



39-0 
39-0 



42-0 
43-0 



56 





58 





59-0 


60-0 


61 





56 


•O 


58 





58-0 


59-0 


59 





42 


o 


43 





53-0 


58-0 


59 





65 


2256 


1 65 


2256 


195-3372 


196-3432 






39 


-0 


42 





43-0 


45-0 


45 


-0 


6 1 


-O 


62 





62-0 


63-0 


64 


-0 



62-0 
60-0 



62-0 
61 -0 



35-0 39-0 

98-336 165-2256 

35-0 35-0 39-0 42-0 43-0 45-0 45-0 45-0 53-0 

61-0 61-0 61-0 62-0 62-0 63-0 64-0 64-0 73-0 

131-1123 136-1171 136-1204 150-1501 150-1S07 151-1533 155-1674 155-1676 156-1724 1 

165-2254 165-2267 166-2316 167-2334 169-2402 171-2443 174-2515 175-2520 176-2540 I 

208-3566 224-7400 226-7416 



1 66 
1774 



44-0 
44-0 



165-2224 165-2242 165-2242 182-2764 182-3001 192-3274 194-3363 
167-2342 



O 
O 
3634 



169-2423 

80-40 
221 -3752 

165-2246 169-2404 
165-2245 165-2250 169-2404 194-3347 



< r 



k~X 





KOBDP 




DIGITAL 


EQUIPMENT 


CORP.. 2901 ASSEMBLER 


VERSION 


32 PAGE S 


5 




























CROSS REFERENCE 


TABLE (CREF 


/01-OS ) 














































BRTRV 


64-0 






















































BTCNT 


51 -0 


5 1 -0 


1 65 


2225 
















































BTROTH 


4S-0 






















































BUF 


16-0 


18-0 


1 3 





95 


314 


93 


-330 


98 


•331 


98 


-333 


1 1 3 


SOO 


1 1 3 


505 


1 19 


-536 


1 21 


•713 


121 


-721 


1 21 


-726 


123 


1O0 1 


f> 




130- 1065 


130- 1072 


1 30 


1 103 


13 1 


1 123 


132 


•1143 


132 


1 146 


137 


-1217 


142 


1331 


1 46 


1355 


1 48 


- 1373 


148 


1412 


148 


- 1424 


148 


- 1430 


149 


1452 


\ 


150-1 472 


150- 1474 


1 50 


1501 


150 


1507 


1 50 


■ 1520 


151 


1527 


153 


- 1554 


1 53 


1555 


153 


1561 


1 53 


- 1573 


153 


1S76 


154 


■1612 


1 54 


- 1622 


154 


1 837 


\~J 




154-1 643 


154- 1646 


1 54 


1 650 


155 


1671 


155 


■ 1676 


157 


17SO 


158 


- 1774 


159 


2012 


159 


2014 


1 59 


-2017 


159 


2031 


1 60 


-2046 


1 60 


-2054 


1 60 


2O60 




1 60-2070 


162-2111 


1 62 


2122 


1 63 


2125 


1 63 


-2133 


1 63 


2 140 


1 63 


-2 147 


1 64 


2151 


1 64 


2160 


1 64 


-2162 


1 64 


21 65 


1 64 


•2171 


1 64 


•2173 


1 64 


2202 






164-2206 


164-2212 


1 64 


221 6 


1 64 


2221 


1 65 


2224 


165 


2250 


1 66 


-2273 


1 56 


2304 


1 66 


2307 


1 66 


•2310 


1 66 


2321 


1 66 


■2322 


1 68 


■2346 


168 


2350 






169-2361 


169-2423 


171 


2451 


173 


2504 


1 73 


2506 


176 


2542 


176 


•2543 


1 77 


2552 


177 


2561 


178 


2568 


178 


2572 


1 73 


2574 


179 


-2602 


179 


2613 






179-2620 


179-2627 


179 


2631 


180 


2633 


180 


2637 


130 


2644 


1 80 


■2650 


180 


2657 


180 


2663 


180 


•2665 


181 


2674 


1 81 


2675 


181 


•2677 


1 31 


2701 






141 -2703 


181-2710 


1 8 1 


2714 


181 


2720 


181 


2724 


18 1 


2730 


181 


-2737 


182 


2751 


182 


2755 


182 


2761 


182 


2763 


182 


2765 


182 


-2770 


1 82 


2771 






162-3006 


1 82-30 1 1 


1 84 


3024 


I 34 


3025 


185 


3027 


185 


3031 


185 


■3033 


135 


3035 


1 85 


3037 


185 


•3041 


135 


3043 


135 


■3045 


185 


-3056 


1 37 


3120 






16 6-3156 


188-3203 


1 88 


3205 


1 89 


3231 


190 


3250 


192 


3274 


192 


-3322 


193 


3330 


193 


3333 


193 


•3334 


193 


3341 


194 


3352 


195 


•3367 


1 96 


34 15 






196-3420 


196-3423 


196 


3426 


1 96 


3430 


1 96 


3433 


196 


3437 


196 


■3445 


197 


3460 


1 99 


3471 


199 


3476 


201 


3517 


201 


3522 


201 


-3525 


203 


3541 






203-3547 


212-3602 


212 


3603 


212 


3604 


212 


3605 


212 


3606 


212 


•3 607 


212 


3610 


212 


3611 


212 


3612 


213 


3614 


213 


3615 


213 


-361 6 


213 


361 7 






213-3620 


213-3621 


213 


3622 


214 


3623 


214 


3624 


214 


3625 


217 


■3633 


217 


3644 


218 


3654 


218 


3660 


218 


3670 


218 


3673 


219 


-3700 


219 


3704 






220-3716 


220-3723 


220 


3724 


220 


3730 


220 


3731 


220 


3733 


220 


•3735 


220 


3736 


220 


3740 


220 


3747 


220 


3750 


221 


3760 


221 


-3771 


221 


4O03 






226-7643 


226-7644 


226 


7645 


226 


7646 


226 


7647 


226 


7650 


226 


•7671 


227 


7723 


228 


7765 


228 


776S 




















BUF . 56 


65-0 


65-0 




















































BUF . BC 


6S-0 


65-0 


65 



















































BUF . BP 


64-0 
166-3071 


64-0 
189-3227 


131 


1121 


1 64 


2204 


1 64 


2215 


1 69 


2406 


172 


-2473 


179 


2607 


179 


2611 


1 79 


2621 


ISO 


2643 


1 30 


2665 


180 


■2671 


182 


3013 




BUF. DL 


6S-0 


65-0 


85 



















































BUF. EC 


65-0 


65-0 




















































BUF . ED 


6S-0 


65-0 




















































BUF. CP 


65-0 


65-0 


176 


2544 
















































BUF. HH 


64-0 


S4-0 


1 30 


1064 


130 


1 102 


165 


2255 


169 


2417 


171 


2464 


135 


3054 


187 


3075 


187 


3131 


139 


3230 
















BUF. HI 


64-0 


64-0 


165 


2262 


171 


2462 


185 


3053 


1 88 


3164 


189 


3226 
































BUF. LL 


65-0 


65 -0 


65 


O 


65 















































BUF. NL 


64-0 
192-3273 


64-0 
193-3331 


164 
194 


2175 
3351 


1 64 


2200 


1 64 


2210 


165 


2223 


1 65 


2264 


166 


2272 


1 68 


2347 


173 


2476 


181 


2704 


181 


2712 


131 


2733 


182 


2762 




BUF . SD 


64-0 


64-0 


164 


2157 


1 65 


2234 


167 


2343 


169 


2362 


171 


2430 


172 


2467 


176 


2546 


179 


2626 


ISO 


2651 


180 


2666 


188 


31 60 


138 


3202 




BUF . ST 


64-0 


64-0 


123 


772 


148 


1427 


163 


2138 


165 


2230 


165 


•2244 


166 


231 1 


1 66 


2314 


1 63 


2345 


169 


2352 


1 69 


2403 


1 69 


2422 


172 


2474 






179-261 6 


182-2760 


1 82 


2774 


187 


3117 


188 


31S3 


193 


3326 


193 


•3337 


194 


3346 




























BUF . TA 


64-0 


64-0 


130 


1070 


1 63 


2134 


163 


2144 


179 


2614 


179 


2632 


192 


3301 


192 


3306 


193 


3325 




















BUF . U 1 


65-0 


6S-0 




















































BUF . U2 


65-0 


65-0 


65 



















































BUF . UA 


64-0 


65-0 




















































BUF . US 


65-0 


65-0 


65 



















































BUFBEG 


65-0 


65-0 




















































BUF6N0 


65-0 


65-0 




















































BUFLMT 


45-0 






















































BUFPOO 


49-0 


49-0 




















































BUFPOI 


49-0 


49-0 




















































BUFP02 


49-0 


49-0 




















































BUFP03 


49-0 


49-0 




















































BUFP04 


49-0 


49-0 




















































BUFP05 


49-0 


49-0 




















































BUFPOB 


49 -0 


49-0 




















































BUFP07 


49 -0 


49-0 




















































BUFP08 


49-0 


49-0 




















































BUFPOB 


49-0 


49-0 


















































g^j 


BUFP10 


49 -0 


49-0 


















































v> 
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CROSS REFERENCE 


TABLE (CREF VO1-08 ) 














































BUFP1 1 


49-0 


49-0 




















































BUFP 12 


49-0 


49 -0 




















































BUFP1 3 


49 -O 


49-0 




















































BUFP14 


49 -O 


49-0 




















































BUFP1B 


50-O 


50-0 




















































BUFP 1 6 


50-0 


50-0 




















































8UFP1 7 


50-0 


50-0 




















































BUFP 1 S 


50-0 


50-0 




















































SUFP1 9 


50-0 


SO-0 




















































BUFP20 


50-0 


50-0 




















































BUFP21 


50-0 


50-0 




















































8UFP22 


50-0 


50-0 




















































8UFP23 


50-0 


50-0 




















































BUFP24 


50-0 


SO-0 




















































BUFP25 


50-0 


50-0 




















































BUFP26 


50-0 


50-0 




















































BUFP27 


SO-O 


50-0 




















































BUFP2S 


51 -O 


51 -0 




















































BUFP29 


51 -O 


51 -0 




















































BUFP30 


51 -0 


51 -0 




















































BUFP3 1 


51 -O 


51 -0 




















































BUFP32 


51 -O 


51 -0 


















































Q 
< 


BUFP33 


51 -0 


51 -0 


















































SUFP34 


51 -0 


51 -0 


















































BUFP3S 


51-0 


51-0 


















































3 


BUFP36 


51 -0 


51-0 


















































a 


BUFP37 


51 -0 


51 -0 


















































ii 


8UFP38 


51 -0 


51 -0 


















































s 

O 

u. 


BUFP39 


51 -0 


51 -0 


















































BUFP40 


51 -0 


5 1 -0 


















































BUFP41 


5 1-0 


51 -0 


















































BUFP42 


5 1 -0 


51 -O 


















































BUFP43 


51-0 


51 -0 


















































<n 


SUFP44 


51 -0 


51 -0 


















































o 


BUFP45 


51 -0 


51-0 


S 1 





51 













































BUFP46 


51-0 


51 -O 


















































-i 


BUFP47 
BUFP4S 
BUFP49 
BUFP50 
BUFPS 1 
BUFP52 
BUFPTR 
BUFR1 . 
BUFR2 . 


51 -0 
51 -0 
51 -0 
5 1-0 
5 1 -0 
5 1-0 
49 -0 
65-0 
65-0 


51-0 
51 -O 
51 -O 
51 -0 
51 -0 
S2-0 
49-0 
65-0 


5 1 
51 

65 



O 




5 1 













































#™% 


CSTVPE 


1 -0 


1 -0 


8 





8 





8 





12 





12 





12 





13 





13 





13 


O 


1 4 





14 





15 





i 1 




15-0 


15-0 


15 





IS 





1 5 





1 8 


O 


18 


O 


18 





20 





2 1 





22 


O 


22 





22 





25 





%J? 




27-0 


29-0 


30 





30 





38 





45 


o 


45 





45 


o 


46 





46 





46 


O 


5 1 





51 





5 1 









51 -0 


59-0 


63 





64 





65 





65 





65 





65 





65 





67 





67 


O 


70 





71 





7 1 









74-0 


74-0 


74 





74 





74 





75 





76 





76 


3 


7B 


4 


79 


31 


80 


44 


83 


73 


33 


103 


S3 


104 






83-113 


83- 1 13 


S3 


1 14 


85 


142 


9 1 


251 


9 1 


251 


9 1 


253 


93 


266 


94 


302 


99 


353 


100 


362 


1 1 


373 


1 1 1 


467 


1 1 6 


52 1 






1 17-527 


119-541 


121 


701 


176 


2544 


185 


3055 


202 


3531 


224 


7 4 00 


224 


7404 


225 


741 6 


226 


741 8 


228 


7760 
















C . AONL 


153- 1603 


154-1 624 




















































C .ATTN 


154-1624 


154- 1 62S 


154 


1 630 


154 


1630 


155 


1 664 
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C . DCON 


155- 


1 685 


227 


7716 






C . OUPL 


152- 


1541 


227 


7731 






C .OUPX 


153- 


1 604 


154 


1627 






C . IMFP 


1 54 


1613 


227 


7701 






C . LOGA 


1S4 


1 634 


154 


1636 






C . LOGS 


149 


1463 


154 


1633 


157 


1753 


C . SEEK 


1 55 


1 673 


227 


7704 






c . suae 


1 53 


1 602 


155 


1 660 






C .SUBU 


154 


1 646 


228 


7742 






CCLASS 


45 













CCSRWO 


48 





48 









CCSRW1 


43 





48 





48 





CDONE 


12 













CDUPLA 


1S2 


1543 


153 


1565 






COUPLB 


153 


1550 










CDUPLC 


153 


1555 


153 


1562 






CDUPLD 


153 


15S1 


153 


1552 


153 


1563 


COUPLE 


153 


1545 


153 


1566 






CF . ATN 


50 





50 









CF .MSC 


49 





50 





154 


1634 


CF . THS 


49 





50 





1 54 


1 635 


CFLAGS 


50 













CHGFLG 


69 





147 


1367 






CHGMOO 


69 





227 


7675 


227 


7714 


CKSTO 


217 


3644 


217 


3646 


219 


3701 


CLIMIT 


49 





49 









CLK 


107 


425 


109 


447 


1 1 1 


455 


CLKOO 


1 1 1 


472 


1 14 


514 






CLKOt 


1 1 1 


464 


1 1 3 


505 






CLK02 


1 13 


S04 


1 13 


505 


1 14 


514 


CLK1 


1 06 


412 


1 1 1 


462 






CLK10 


1 1 1 


46 1 


1 13 


476 


1 13 


50 1 


CLK1S 


1 09 


442 


1 1 1 


460 


1 1 3 


502 


CLK32 


1 1 1 


456 










CLK6 


1 1 1 


457 










CLK64 


1 1 1 


455 










CLKP 


106 


41 1 


1 1 1 


-463 


1 1 1 


473 


CLRERR 


67 


165 










CLRTST 


91 


5 1 










CMDCOF 


47 





47 


-0 






CMOLEN 


47 





47 


-0 


48 





CMOLIM 


45 





52 


-o 






CMOO 


49 


•0 










CMOPOF 


47 


-0 


48 


-0 






CMOPTR 


47 


-0 


47 


-0 






CMODEL 


45 


•0 


45 


-0 


45 





CMPBUF 


5 1 


-0 


S 1 


-0 






CN . ERR 


1 9 


-0 


226 


-7640 






CNT . LN 


52 


-0 










CNTFLG 


49 


-0 


50 


-o 


50 


-0 


CNVTV1 


48 


-0 


48 


-0 






CNVTV2 


43 


-0 


48 


-0 






CNVTV3 


48 


-0 


48 


-0 






CNVTV4 


48 


-0 


48 


-0 







' w*^ 



1 1 1 -460 



w 
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CODVER 
COMPLT 
CON . ER 
CON . ST 
CONT 

CONT . F 

CONTCO 

C0PY4 

CPE 

CR 

CRDV 

CRI 



CRY 

CSEEKA 
CSERR 
CSR 

CTMOUT 

CVCLE 

CYLSTR 

D . ALBF 

D . ARTC 

.ATTN 

D . AVAL 

D . BFCA 

S BFCK 

CLCS 

CLRS 

CLUR 

CPUL 

DBNO 

DIAG 

DIVD 

DNSK 

DONE 

D0N2 

DTER 

OVDA 

DVDS 

OVDC 

DVDD 

DVDE 

DVOF 

DVDG 

E.C . 

ECKA 

ECKB 

ECKC 

ECKO 

ECKR 

ECKS 

ECRA 



46-0 

69-0 
228-7760 

50-0 

24-0 
1SO-2641 
143- 1333 

69-0 
1 -O 



24-0 

17-0 

84-114 
1 I 1 -465 

13-0 
151 - 1S33 

69-0 

14-0 

46-0 

36-0 

45-0 
1 69-2406 
180-2671 
1 26- 1053 
126- 1047 
123- 1002 
130- 1062 
137- 1207 
123-776 
1 66-2273 
1 30- 1 066 
188-3150 

82-53 
1 90-3257 
149-1467 
154- 1623 
155- 1703 
1 67-2341 
190-3261 
190-3262 
190-3262 
190-3263 
190-3267 
190-3265 
190-326 6 

1 -O 
156-1717 
149- 1452 
156- 1724 
156- 1733 
1 49- 1437 
14S- 1346 
156- 1704 



46-0 46-0 
156-1711 
228-7774 229-8000 



124- 1006 
180-2642 
145- 1344 
141 - 1305 
185-3047 

12-0 

18-0 
140- 1247 

76-4 

84- 1 15 
I 1 1 -466 

88- 174 
151 - 1535 
142- 1325 

99-35 1 



179-2610 
I 86-3064 
127- 1053 
128- 1054 
173-2476 
1 63-2123 
140- 1270 
148-1421 
I 66-2306 
130- 1 105 
139-3215 



125-1022 125-1024 140-1247 140-1253 140-1253 140-1257 140-1270 156-1720 163-2132 163-2141 164-2207 179-2612 

180-2654 180-2655 181-2732 188-3200 188-3201 196-3410 196-3446 

146- 1356 

142-1314 143- 1336 

12-0 
18-0 



83- 106 
I 00-354 



83-107 
108- 435 



79-34 80-41 80-46 82-53 82-60 83-67 83-73 83-101 83-102 

86-153 86-154 89-237 93-274 94-276 95-310 96-315 96-317 96-320 

111-467 111-470 114-511 114-512 117-525 117-527 

183-3155 189-3223 190-3232 190-3265 190-3267 208-3566 209-3571 218-3660 220-3740 

155- 1675 

121-735 124-1016 125-1031 156-1717 157-1766 202-3534 



1 82-3006 
188-3200 



173-2475 179-2600 

171-2424 185-3050 199-3454 

150-1504 154-1622 159-2011 160-2071 161-2102 165-2270 171-2451 

194-3355 

130-1110 174-2507 175-2522 175-2523 175-2525 175-2526 175-2531 182-2756 188-3176 195-3403 205-3554 

190-3254 



83- 1 10 
108-437 



150-1522 151-1527 151-1537 157-1771 159-2013 

1S9-2022 160-2042 161-2103 227-7707 

157- 1765 159-2015 

181 -2676 

190-3267 

190-3270 

1 90-3264 

190-3265 

190-3271 

190-3271 

190-3272 

156-1721 157-176S 

156-1705 158-1710 153-1713 156-1723 

156- 1730 

157- 1735 

150-1503 151-1540 156-1704 

148-1400 150-1523 151-1531 156-1714 

15 6-1711 
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.ECRB 
.EERR 
.END 
. ER 
. EROA 
. ERIA 
. ERCK 
. ERRO 
.ERR1 
.ERRO 
.GECC 
.GGRP 
. GMST 
. GPRE 
. GRPC 
. GSCB 
. GUNF 
. HCEO 
.HCEA 
.HCEC 
.HCEO 
.HCER 
. IOLA 
. IDLB 
. IDLC 
. IOLD 
. IDLE 

. IOLF 

. IOLG 

. IOLH 

. IDLI 

. IDLJ 

. IDLM 

. IDLN 

. INIT 

. INSO 

. INSt 

. INS2 

. INSV 

. IODA 

. IODS 

. IODC 

. IODO 

. IODN 
.IDEA 

. IOER 

. IOEX 

. IOPR 

. IOPW 

. LDHD 

. LOGF 

. LRER 



149 
1 67 

32 
228- 
158- 
123- 
149- 
157- 
122- 
123- 
119- 
171 - 
121 - 
173- 
1 63- 
159- 
147- 
1 69- 
1 69- 
1 69- 
169- 
183- 
121 - 
121 - 
121 - 
121 - 

84 - 
122- 
121 - 
121 - 
122- 
121 - 
121 - 
121 - 
122- 
121 - 
155- 
149- 
1 60- 
148- 
150- 
165- 
1 65- 
165- 
155- 
165- 
171 - 
1 67- 
132 
130 
163 
13 1 
131 
167 



1 440 
2340 
-55 
7770 
1774 
770 
1451 
1773 
767 
1002 
535 
2443 
725 
2477 
2137 
2032 
1360 
2357 
2371 
2402 
2400 
2143 
700 
707 
727 
717 
135 
760 
732 
723 
740 
734 
7 15 
714 
753 
721 
1 676 
1462 
2036 
1374 
1513 
2242 
2252 
2251 
2267 
2226 
2453 
2326 
I 144 
1063 
2132 
1 123 
1 136 
2342 



149- 1453 
1 67-2341 

82-61 
228-7774 
IS8-2O06 
123-774 
155- 1 673 
226-7661 
123-767 
193-3334 
182-2744 
176-2535 
153- 1566 
173-2502 
176-2537 
228-7737 
154- 1 652 
169-2361 
169-2376 
169-2415 
1 69-2422 
1 69-2352 
121 -702 
121-710 
121 -730 
121 -732 
121-701 
122-766 
121 -736 
121-731 
122-743 
121 -736 
122-747 
122-742 
122-755 
125- 1022 
158-2000 
149- 1464 
227-7723 
1 48- 1 401 
154- 1612 
1 65-2243 
1 69-2421 
1 65-2254 
1 66-2272 
165-2231 
171 -2455 
I 67-2332 
132- 1 153 
1 72-2467 
172-2465 
1 69 -2363 
154- 1645 
179-2624 



156-1712 
I 67-2343 

83-65 83-71 83-76 83-102 

228-7776 229-8000 

123-776 136-1 205 

155-1674 156-1706 156-1707 156-1715 



182-2745 182-2751 182-3002 

176-2544 176-2545 

154-1641 154-1646 111-2011 159-2013 160-2065 162-2110 166-2302 173-2500 209-3572 

179-2617 

159-2023 

169-240 1 

171 -2447 
179-2623 



121 -701 
126- 1037 



149 - 1465 
158-2001 
149-1466 

1 50- 1 472 
155-1 6S7 
1 65-2251 
1 69-2423 
1 65-2265 



121-702 121-716 121-720 121-724 121-727 121-735 122-741 122-744 122-746 122-750 122-757 
136-1200 166-2305 166-2312 169-2354 169-2407 171-2457 176-2543 179-2604 180-2672 192-3322 206-3565 



204-3551 

158-2003 158-2005 

150-1524 153-1607 154-1615 154-1616 154-1632 155-1662 155-1663 156-1712 156-1714 158-2007 160-203S 



155-1 672 155-1 672 

155-1672 158-2005 158-2006 158-2010 160-2036 160-2037 226-7653 226-7664 



168-2351 182-2775 



167-2337 
132- 1 154 
179-2612 

171 -2437 

157- 1756 
181 -2736 



169-2355 171-2424 

163-2125 166-2300 166-2303 166-2305 166-2310 166 



■2322 179-2602 



184-3020 185-3053 
160-2043 165-2252 



-3151 192-3303 



o 
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OS 
t 



. NCLK 
. NOBF 
. OFFD 
. OFFL 
OLRD 
. ONLN 
.OVER 
.PCMB 
. PCMO 
. RAMP 
. RAMX 
. RBLH 
. RCLR 
. RCTE 
. READ 
. RECC 
. RE01 
. REDA 
. REDB 
. REOC 
. REDE 
. REOF 
. REDG 
.REDH 
.RED I 
. REDJ 
.REOL 
.REDM 
.REDN 
. REOX 
. RLF1 
, RLF2 
. RNBF 
. RPLC 
. RRDE 
. RRDY 
. RRWE 
. RSAV 
.RSTR 
.RTDE 
.RV2A 
. RV4A 
. RV4B 
. RV8A 
.RVC2 
. RVC4 
. RVC6 
. RVC8 
. RVCA 
. RVCT 
. RVOX 
. RWRA 
. RWRE 
.SOIE 



156-1 720 

183-2124 

122-745 

154-1 625 

160-2071 

126- 1046 

164-2204 

126- 1041 

122-762 

228-776S 

121 -704 

1 65-2257 

137- 1212 

1 67-2340 

126- 1043 

182-2744 

179-2625 

123- 1003 

179-2613 

179-2614 

179-2621 

180-2652 

18 1 - 2 6 7 7 
18 1 -2674 
181 -2701 
181 -2737 
182-2767 
182-2775 
182-2764 
179-2606 
180-2637 
180-2663 
179-2611 
126- 1044 
163-2136 
105-406 
163-2131 
192-3276 

76-2 
164-2206 
192-3317 
165-2271 
193-3324 
194-3350 
192-3273 
193-3323 
193-3323 
194-3342 
132-1146 
122-765 

19 2-3321 
1 67-2323 
163-2145 
157- 1742 



157-17 6 6 157-1767 

166-2310 179-2601 

148-1412 157-1763 160-2045 

1 60- 205 1 160-2064 

227-77 1 1 

129- 1055 

167-2323 181-2732 

126- 1045 

I 26- 1034 

228-7775 229-8000 

159-241 1 171 -2450 

1 40- 1 27 1 

1 69-2405 

160-2072 179-2600 

1 82-2755 

179-2626 179-2632 

1 79 -2602 

182-2774 

179-2620 179-2632 

180-2633 

180-2667 181-2673 181-2673 

18 1- 2677 18 1 -2700 

1 8 1 -2675 1 8 1 -2700 

181 -2701 

182-2764 

182-2773 

182-3001 

182-2776 

198-3467 

180-2653 

180-2671 

18O-2640 180-2684 I80-267O 

130- 1061 

166-2314 167-2335 169-2356 179- 

1 17-525 

164-2212 167-2333 179-2607 

194-3342 194-3365 

76-3 84-134 
167-2327 181-2733 
193-3335 193-3341 
193-3335 
193-3337 
194-3353 
225-7643 
226-7644 226-7845 

226-7646 226-7647 226-7650 
132- 1151 
132- 1 142 

167-2330 167-2332 
167-2331 16 7-2 3,3 4 
157- 1770 
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SD IF 

SDIC 

SEEK 

SETA 

SETB 

SETS 

SGRP 

SLBA 

SLBN 

.SMOV 

. SMVX 

SRTC 

D .SSET 

STOP 

.STPA 

.SUCH 

. TIME 

D . TIML 

. TIMO 

.TIMR 

. TKEA 

D . TKER 

. TOER 

. TOPO 

. VECA 

D . VECB 

. VECP 

. VECT 

. WA I T 

.WDAT 

WOTB 

WOTC 

WDTD 

WHDA 

WHDB 

WHDC 

WHDR 

WRIT 

WRTB 

WRTC 

WRTE 

WRTF 

WRTC 

WRTI 

WRTJ 

WRTX 

WSAF 

D .WSGA 

D WSIG 

D . ZATT 

DATEND 

DATT 

DBAR 



157- 
1 50- 
122- 
1 66- 
182- 
13 1- 
1 63- 
189" 
171 - 
149- 
16 1- 
1 84- 
122- 
226- 
226- 
126- 
157- 
1 SO- 
1 67- 
136- 
1 67- 
1 30- 
187- 
126- 
1 36- 
136- 
1 23- 
122 
16 1- 
1 64 
178' 
178- 
1 78 
177- 
1 77 
1 77 
177 
1 26- 
1 63 
1 63 
1 63 
1 64 
1 64 
1 64 
1 65 
1 63 
1 63 
1 74 
130 
1 48 
65 
59 



1770 157-1770 
1514 157- 1771 
133- I 163 
166-2303 



157-1772 158-1777 



764 
2301 



228-7772 228-7773 228-7777 



2750 182-2753 182-3005 

1141 138-1206 166-2302 169-2414 194-3361 194-3363 194-3364 

2135 166-2313 176-2S3S 179-2615 

3210 139-3234 

2440 189-3233 

1456 149-1457 161-2105 192-3300 194-3344 

2 104 1 61 -2 107 

3014 185-3055 185-3056 196-3411 

754 148-1415 148-1422 154-1630 159-2013 

7642 228-7760 228-7761 22B-7762 228 - 77 63 228 - 7764 228-7771 

7416 226-7640 226-7642 

1051 134- 1 164 

1755 162-2112 

1501 162-2121 

2324 228-7766 

1167 150-1525 162-2110 171-2456 

2337 

1076 167-2336 169-2361 

2326 187-2326 167-2335 

1050 135-1 165 

1 1 67 136-1201 

1202 136-1204 136-1206 

126-1052 127-1053 128-1054 129-1057 129-1060 133-1163 134-1164 135-1165 



o 



775 
763 



136- 1 1 66 



136- 1 170 



2073 161-2073 227-7726 



2151 178-2570 178-2570 178-2571 

2572 178-2572 

2574 178-2574 178-2575 

2576 1 78-2576 

2552 177-2552 

2554 177-2554 177-2556 

2555 177-2555 

2550 177-2550 177-2551 196-3415 

1042 163-2123 193-3333 

2133 165-2230 

2134 163-2140 163-2144 
2141 163-2146 

2171 164-2176 

2175 164-2201 

2215 165-2223 

2224 165-2227 

2130 198-3470 

2127 175-2520 179-2605 

2515 174-2516 

1071 163-2130 164-2211 174-2513 174-2514 179-2606 186-3067 

1407 153-1605 161-2074 161-2074 227-7720 227-7734 228-7743 

O 65-0 66-0 

122-754 153-1561 16O-2060 161-2102 

105-406 106-417 108-431 109-450 113-477 113-503 



-340S 196-3450 



123-771 123-777 123-1000 126-1035 129-1055 130-1O77 132-1142 132-1146 132-1151 132-1153 136-1166 136-1170 136-1171 



123-767 
136- 1 172 
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DCERR 

DCLASS 

DCLK 

OCMASK 
DCN .ST 
OCN.TT 
OCRO 



OCRS 

DCRTST 

OOC 

000 

DER 



DERR 

DEVCL 

DFAIL 

OHANG 

01 

DIAG 

DINITA 

OINITB 

OINITC 

OISCON 

OISM 

DISN 

OL 1 144 

DL 1 1AD 

DM. BEG 

DMBEG 

DMBPC 

DMOBG 

DMDT 

DMNTRY 

DMODE 

DMOOT 

OMOVH 

DMOVL 

OMPC 

DMREGO 



136- 1 173 
1 50- 1500 
154- 1633 
157- 1744 
I 60-2044 
1 65-2237 
169-2413 
178-2575 
181 -2702 
196-3423 

69-0 

45-0 

14-0 
1 40- 125 1 

62-0 

69 -O 

69-0 

18-0 

86-153 
1 14-51 t 

18-0 

83-64 

22 -O 

22-0 

17-0 

83-72 
224-7412 

59-0 

45-0 

21 -0 

80-46 

73-0 

73-0 
1 25- 1024 
1 25-1025 
1 25- 1030 

69-0 

48-0 

48-0 
223-4020 
223-4020 

65-0 

19-0 

45-0 
2 16-3626 
223-4020 
121 -700 

19-0 
206-3563 

45 -0 

45-0 

45-0 
217-3632 

47-0 



136-1174 136- 1 175 

1 50- 1506 150-1510 

154-1651 155-1653 

157- 1746 157- 1757 

160-2045 160-2047 

165-2240 165-2253 

171 -2432 171 -2433 

179-2603 179-2627 

182-3005 182-3005 



136-1176 
IS 1 - 1826 
15S- 1660 
157- 1773 
1 60-2064 
165-2260 
171 -2435 



136- 

152 

155- 

158- 

181 



1203 
1543 
1661 
1775 
2074 



148- 1405 148-1411 

153-1551 153- 1574 

155-1 667 155-1 675 

15S-2004 159-2023 

1 62-21 12 182-21 17 



165-2265 

171 -2442 



179-2630 180-2633 

188-3171 188-3173 

196-3424 196-3451 209-3571 227-7702 227-7712 228-7742 

142-1320 149-1451 156-1705 156-1710 156-1722 156-1733 157-1741 200-3503 



1 65-2266 
171 -2445 
180-2637 
188-3203 



166-2276 
171 -2455 
180-2644 
188-3204 



148- 1423 148- 1426 

153- 1577 153- 1600 

155-1700 155-1701 

159-2025 159-2032 

1 62-2121 1 64-2160 

166-2306 168-2344 

171 -2460 171 -2461 

180-2652 180-2863 

188-3207 169-321 1 



148- 1431 
154-1610 
156- 1715 
159-2034 
1 64-21 61 
1 69-2364 
171 -2463 
180-2665 
189-3234 



149- 1433 149- 1454 

154- 161 1 154-1613 

156- 1721 166- 1723 

160-2035 160-2037 

164-2166 164-2167 



169 -2372 
173-2475 
1SO-2667 
189-3237 



169-2373 



149- 1460 
154- 1620 
156- 1726 
1 80-2O4O 
1 64-2206 
1 69-2401 



173-2502 178-2S73 
181-2700 181-2700 
189-3240 194-3357 



137-1226 137-1227 137-1230 137-1231 137-1232 137-1233 137-1234 137-1235 137-1236 137-1237 138-1240 138 
140-1252 140-1254 140-1281 140-1263 140-1264 181-2674 181-2675 184-3024 184-3025 



148-1410 
148- 1404 

18-0 

86-154 
114-512 

18-0 

9 I -251 
1 1 1 -466 
1 1 1 -465 

79-32 

83-77 
224-7413 
131 - 1 137 

21 -0 



125- 1026 
125- 1027 
12S- 1032 
148-1413 



148-1417 148-1420 148-1425 155-1566 



18-0 76-2 

91-252 93-274 

1 17-525 1 17-527 

18-0 91 -253 

1 1 1 -467 114-511 

1 1 I -470 

79-33 80-35 

83- 111 83-112 

224-7414 224-7415 



76-4 77-14 80- 46 

94-276 95-310 96-315 

124-1011 228-7770 228-7776 

121-703 124-1007 



82-53 
96-320 



82-60 
100-354 



83-67 
108-437 



83-101 
1 1 1 -465 



83- 106 

1 1 1 -466 



84- 1 15 
1 1 1 -467 



114-512 1 17-52S 



80-36 
84-132 



80-37 
36-152 



1 17-527 



80-40 
87- 165 



ISO- 1473 
154-1631 
157- 1735 
1 60-2043 
168-2235 
169-2412 
178-2S7S 
1(1 -2 TO 1- 
194-3366 



124 1 138- 1242 



84- 135 
1 1 1 -470 



80-42 

1 16-524 



80-43 80-44 30-47 82-56 32-62 83-68 
224-7404 224-7405 224-7406 224-7407 224-7410 224-7411 



136-1201 157-1765 158-1776 160-2066 165-2271 169-2377 169-2421 171-2444 193-3323 194-3343 194-3360 

79-34 80-41 
84-132 



65-0 65-0 217-3626 217-3627 221-3772 221-3773 221-4006 221-4007 

121-702 171-2426 206-3565 217-3632 221-4003 221-4003 221-4003 221-4003 

221-3772 221-4003 22 1 - 4004 22 1 - 4006 

216-3626 217-3630 223-4020 

21 6-3626 

121-701 164-2214 165-2232 169-2354 179-2624 181-2741 182-2777 187-3100 187-3140 183-3155 189-3213 

221 -40O4 



r 

189-3235 197-3456% ^f 



131-1122 171-2425 195-3371 195-3400 196-3417 196-3443 198-3464 200-3500 200-3506 201-3510 203-3544 228-7747 
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DMREG1 

DMREG2 

DMREG3 

DMREG4 

0MREG5 

0MREG6 

0MREG7 

OMSTR 

OMTEMP 

OOFFOA 

OOFFDB 

DPF 

DPROC 

DRAMPE 

DRAVL 

ORDUP 

DRDY 
DRINIT 
DROMPE 
DRPIC1 
ORPLCA 
ORPLCB 
ORPLCC 
ORPLCO 
ORPLCX 
DRV . AT 
DRV . AV 
DRV CI 
DRV .C2 
DRV . C3 
DRV . C4 
DRV . DB 
DRV DO 
DRV .DE 
DRV .OF 
DRV . OR 
DRV .EL 
DRV . FO 
DRV . OA 
DRV . PE 
DRV . PS 
DRV. RE 
DRV . RR 
DRV . RU 
DRV . S 1 
DRV S2 
DRV .S3 
ORV .S4 
DRV .S7 
DRV SN 



228-7753 

47-0 

47-0 

47-0 

47-0 

47-0 

47-0 

47-0 

4S-0 

49-0 
160-2053 
1 60-2056 

14-0 
188-3157 

12-0 

83-67 

S9-0 
157- 1756 

59-0 
1 60-2050 

25-0 

21 -0 

32-60 
131-1132 
130- 1067 
130- 1 107 
130- 1 107 
131-1117 
130- 1 105 

63-0 

62-0 

62-0 

62-0 

62-0 

62-0 

62-0 

62-0 

62-0 

62-0 

61-0 

6 1-0 

62-0 

6 1-0 

62-0 

6 1-0 

62-0 

61 -O 

61 -O 

62-0 

62-0 

62-0 

62-0 

62-0 

62-0 



47-0 195-3401 
47-0 124-1004 
47-0 173-2505 
47-0 163-2147 
47-0 130- 1061 
47-0 
47-0 

217-3626 
49-0 

160-2063 

160-2057 160-2061 
82-56 82-62 

19S-3377 



197-3457 199-3474 200-3501 

163-2146 163-2147 180-2647 

185-3061 

172-2465 173-2503 177-2553 

131-1127 171-2431 195-3377 



130-2653 196-3435 206-3556 228-7744 



177-2553 
196-3431 



87-162 IOO-354 1 1 1 -473 



153-1571 153-1572 171-2431 



95-304 
121-714 
157- 1760 
121-716 
1 60-2055 

99-353 

21 -O 

93-266 
131-1141 
130- 1075 
130- 1111 
130- 1112 
13 1-1127 
131-1115 

63-0 

63-0 
1S3- 1604 



121-716 143- 1406 

157- 1762 158- 1777 

148- 1407 148- 1417 

160-2057 160-2065 

100-364 137- 1214 



148-1415 
1 60-2056 
ISO- 1512 
1 60-2067 
156- 1707 



148-1421 150-1504 150-1511 153-1552 153-1556 153-1566 153-1570 153-1572 154-1650 

160-2065 160-2067 

153-1552 153-1560 153-1561 153-1566 153-1570 153-1571 153-1603 157-1756 157-1762 

174-2514 175-2520 181-2735 



159-2033 226-7671 

159-2033 226-7671 227-7723 



147- 1364 147- 1365 



155- 
62- 
149 • 
149- 
147- 
143- 



1670 158-2001 

226-7657 

1461 

145 1 

1355 

1403 



147- 
153- 



I 366 
1S02 



155- 1665 



150- 147 1 
122-740 



ISO- 

155 



1472 
16 62 



155-1 665 1 55- 1 666 



62-0 

147-1364 
155-1662 



1 47- 1365 
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DRV .SR 


61 


-0 


158 


20OO 


DRV .SU 


61 


-0 


63 





DRV . U 1 


6 1 


-o 


S 1 





DRV . U2 


61 





61 


O 


DRV . U3 


61 


-0 


61 





DRV .U4 


61 





61 





DRV , UM 


63 





153 


1550 


DRV .W1 


62 


o 






DRV.W2 


62 





147 


1363 


DRV W3 


62 


o 


147 


1363 


DRV .W4 


62 


-0 


147 


1363 


DRV .WE 


62 





62 





DRVCLR 


69 


-0 


148 


1401 


DRVOL 


59 





121 


714 




158 


- 1777 


1 60 


2065 


DSOIEA 


157 


1 740 


157 


1742 


DSDIEB 


157 


176 1 


157 


1763 


DSDIEC 


1S7 


1747 


157 


1753 


DSER 


14 





99 


350 


DSK . LN 


52 


-0 






DSLEDS 


82 


57 


86 


151 


DSR 


14 





99 


352 


OSTSH 


45 









DSTSL 


45 









DTEMP1 


SO 





50 





OTIMEA 


162 


2113 


1 62 


2122 


OTMP 


17 









OTSTBL 


224 


7404 






DUP . LN 


52 









OUPVC 


45 









DXFC 


19 





121 


70O 


ECC 


1 S 





1 10 


454 


ECC9 . 1 


48 


o 


43 





ECC9 . 2 


48 





43 





ECC9 . 3 


48 





48 





ECCMSK 


73 









ECCRD 


108 


430 


103 


432 


ECHOCD 


69 





203 


3542 


ECOUNT 


49 





49 





ECSUMH 


73 









ECSUML 


73 









EDSEED 


45 









EF.8BR 


59 









EF.8BU 


59 









EF . LOG 


59 









ELEV 


61 









ELOC 


48 









ELPM 


48 





48 





ELPN 


48 









ELPO 


48 





48 





eLPP 


48 





48 





ENCACH 


65 





65 


o 


END . F 


143 


1337 


145 


1345 


ENOCD 


69 





69 






147-t360 147-1385 147-1370 154-1652 155-1654 
1 54- 1 61 2 



155-1 654 

153- 1576 154- 1 612 



121-716 121-717 148-1417 148-1422 ISO -1512 153-1552 153-1556 1B3-156S 153-1571 153-1601 154-1647 157-1780 

1 57- 1 744 157-1 745 

116-523 121-716 122-750 137-1212 155-1673 161-2100 164-2206 181-2733 196-3447 202-3536 202-3537 

100-360 202-3535 



206-3561 206-3S62 

113-S05 181-2736 182-3002 
48-0 
48-0 



48-0 
48-0 



141 - 1305 142-13 15 



142- 1322 142- 1324 
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ER.BCA 
ER. BPI 
ER. OMX 
ER. HTO 
ER. INT 
ER . IWR 
ER MER 
ER MRR 
ER.MST 
ER .NIM 
ER . PRD 
ER . PWR 
ER. RAP 
ER. ROP 
ER. RP2 
ER. RRO 
ER. RTO 
E R . RWR 
ER.SAP 
ER.SOP 
ER .SRP 
ER . STP 
ER. TMO 
ER. VCI 
ER .WP2 
ERECOV 
ERR 
ERROO 
ERR01 
ERR02 
ERR03 
ERR04 
ERROS 
ERR06 
ERR07 
ERRB1A 

ERRB1E 
ERRB2 
ERRB2E 
ERRB2H 

ERRB2I 
ERRBIT 
ERREG 
ERRINI 



13-0 
126-1040 
142- 1320 
15S- 1662 
158-1774 
1 65-22S6 
177-2553 
190-3255 

67-0 

67-0 

67-0 

67-0 

67-0 

67-0 



47-0 
126- 1040 
148- 1374 
155- 1666 
160-2036 
165-2267 
178-2566 
192-3305 



48-0 
126- 1040 
148- 1375 
155-1 672 
160-2O40 
166-2303 
179-2602 
194-3363 



49-0 
126- 1040 
148- 1417 
155- 1 674 
161 -2074 
166-2310 
179-2614 



59-0 
126- 1O40 
149- 1445 
155- 1676 
1 63-2125 
I 66-2312 
179-2624 



65-0 67-0 

126- 1040 1 26 - 1053 

149- 14SO 149-1451 

ISB- I701 15S- 1 701 

153-2134 163-2141 

166-2315 167-2326 

180-2643 180-2665 



76-5 
130- 1101 
1 50- 1502 
156- 1705 



78-22 
13 6-1171 
161 - 1533 
156- 1707 



163-2144 163-2147 
167-2334 169-2402 
161-2735 181-2736 



196-3446 203-3566 221-4003 221-4003 221-4003 221-40O3 



90-243 90-247 121-714 122-740 122-767 

136-1204 137-1214 140-1253 141-1305 14 1-1305 

153-1607 154-1630 154-1632 154-1634 154-1634 

156-1724 155-1733 157-1747 1S7-1747 157-1770 

164-2173 164-2207 165-2224 165-2242 1 65 - 2254U»~"V 

171-2443 174-2514 174-2S1S 176-2520 176-2540* § 

182-2764 182-2771 184-3021 187-3141 189-32lfl I 

223-4020 225-7643 228-7760 228-7760 22 3 - 77 601 L, ^T 



67-0 



67-0 
67-0 
67-0 
67-0 
67-0 
67-0 
67-0 
67-0 
67-0 
67-0 
67-0 
69-0 
35-0 
38-0 
38-0 
38-0 
28-0 
38-0 
38-0 
38-0 
38-0 
79-31 
88-207 
79-32 
80-35 
80-35 
80-36 
107-427 
80-37 
73-0 
37-0 
60-0 



80-241 
93-257 



90-240 90-244 228-7775 228-7776 
228-7767 228-7770 
67-0 



93-272 167-2324 



227-7705 
38-0 
76-3 
79-32 
80-35 
80-36 
80-37 



38-0 

88-165 
88-2 10 
90-242 
80-36 
87- 1 62 
99-345 
108-431 



88-167 
88-212 
90-243 
80-37 
87-163 
99-346 
108-433 



88- 170 
88-213 

90-24S 
80-40 
9 1 -256 
99-347 
108-435 



88- 171 

S9-23S 
90-247 
84-133 
95-307 
99-350 
1 1 1 -463 



88-172 
39-237 
92-265 

96-321 
99-351 

1 1 1 -466 



98-331 
99-352 

116-517 



98-334 
101 -372 
1 16-520 



104-400 
1 16-522 



104-402 
1 1 6-523 



104-403 
1 17-525 



105-404 106-414 106-424 



80-42 
157-1734 158-2002 



-:. 



(f ~~\ 
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ERRINP 


60 





ERRIP 


59 





ERRRTC 


4S 


o 


ERRSET 


79 


34 


ERRVEC 


60 





ETST1 


1 2 





EVAL 


48 





FAILUR 


48 





FAIRCT 


61 





FCT.MO 


45 





FCT .VI 


45 





FCT . V2 


45 





FDCLK 


22 


o 


FDIAG 


61 





FETCH 


2 17 


36 




221 


40 


FETCH2 


217 


36 


FETCH3 


217 


36 


FLAG 


35 





FLOAT 


18 





FM.BAD 


58 





FM. CNT 


58 





FM.OSK 


58 





FM.SOI 


58 





FORCE 


43 





FORICD 


69 





FORSCO 


69 





FPE 


24 





FRERR 


69 





FRMCD 


45 





FSEEK 


EO 





FSTST 


83 


74 


FTEST 


12 





GENSYN 


104 


37 


GETCRV 


217 


36 


GETECO 


1 19 


53 


GETECC 


108 


43 


GETRB 


219 


37 


GETRBX 


217 


36 


GETSTA 


69 


O 


GO 


36 


O 


GORD 


IS 


o 


GOWR 


15 





GPRO 


43 





GPR1 


43 





GPR2 


43 





GPR3 


43 





GSEL 


59 





GTCCHR 


69 





GTCRSP 


69 





GTE 


13 


-0 


GTUCHR 


69 


-0 


GTURSP 


69 


-0 


H1 1C0D 


46 


-0 



136-1171 155-1676 156-1724 156-1725 1S8-1774 160-2040 

121-723 122-760 122-765 136-1202 136-1204 154-1647 165-2243 165-2257 194-3361 



98-326 223-7641 



31 213-3661 218-3672 218-3673 220-3723 220-3726 220-3731 220-3733 220-3734 220-3736 220-3740 220-3741 220-3747 221- 
10 

32 221-3763 221-4013 221-4014 221-4016 221-4017 



1 65-2252 171 -2436 

131-1136 149-1463 157-1753 157-1755 



195-3404 

131 - 1 120 196-3434 



ISO- 1474 155-1671 
84-114 



1 17-533 



5 106-410 109-441 

30 220-3725 

5 1 19-540 

4 1 19-537 

00 219-3702 219-3711 

42 219-3703 

226-7655 226-7667 227-7727 



150-1516 154-1617 155-1703 1S7-1764 

227-7735 

149- 1435 



226-7673 228-7740 
149- 1444 
4 6-0 46-0 





KDBDP 




DIGITAL EOUIPMENT 


CORP. , 2901 


ASSEMBLER 


VERSION 


32 PAGE S 


1 7 
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113-501 148-1371 187-3107 187-3111 187-3114 

1 24- 1020 1 30- 1 1 1 2 



88- 1 67 
1 88-3170 



2125 163-2134 164-2220 1S6-2303 11 



98-341 108-433 108-436 130-1113 155-1657 169-2354 



-210 121-710 130-1101 137-1214 137-1215 148-1374 155-1662 156-1705 1S6-1707 156-1733 
-2310 166-2312 174-2514 179-2602 179-2614 180-2637 180-2663 181-2735 182-3011 218-3663 




2566 



88-212 

179-2624 

83-74 



132-1160 136-1171 155-1674 157-1767 158-1774 160-2040 164-2213 165-2224 165-2242 165-2267 167-2334 171-2443 
181-2736 194-3363 196-3452 221-3776 221-4000 
88-173 88-177 88-200 98-342 108-431 217-3634 



13-0 
106-4 12 

13-0 
14-0 
13-0 

65-0 

49-0 

83-103 



13-0 
10 6-414 



1 26- 1036 1 59 -201 6 
S3- 104 85-142 85-144 



223-4020 



o 



65' 
93 
122- 
132 
142' 
153' 
156' 
160' 
1 66- 
177- 
136- 
138' 



1 47 

334 

753 

1 146 

1325 

1551 

1722 

2063 

2314 

255 1 

3073 

3172 



104-403 

78-23 

87-157 

98-340 

122-754 

132- 1 154 

143- 1335 

15 3-1565 

157- 1740 

160-2067 

167-2324 

177-2556 

186-3074 

139-3233 



1 1 1 -472 

78-27 
88-171 
99-347 
122-760 
136- 1200 
t46- 1352 
153- 1576 
157- 1742 
161-2073 
1 69-2355 
17 7-2563 
187-3101 
189-3236 



140- 1250 
81-52 
38-203 

10S-404 
122-763 
136- 1202 
148-1 404 
153-1 603 
1 57- 174S 
1 61 -2101 
1 69-2405 
1 78-257 1 
187-3105 
190-3271 



181 -2673 
82-55 
39-235 

106-424 
122-784 
136- 1205 
148- 1407 
153- 1 604 
157- 1752 
163-2136 
1 69-241 1 
17S-2S75 
187-3106 
193-3324 



184-3023 

82-61 

89-236 
107-427 
122-765 
137- 1223 
148-1410 14 
153- I60S 
157- 1755 
163-2143 
169-2421 
179-2601 
187-3115 18 
194-3361 



1 22 
1 30 



15 



1 6 



3-65 83-71 83-76 83-102 83-110 84-114 

0-243 90-247 91-256 93-270 93-273 94-276 

8-435 113-503 121-700 121-702 121-717 121-723 

3-774 124-1013 126-1026 125-1032 126-1037 128-1042 

0-1265 141-1274 141-1301 14 1-1302 1 4 1 - 1 304 141-1306 142 

-1437 149-1453 150-1516 150-1517 150-1522 150-1523 151 

4-1624 154-1643 155-1656 155-1657 155-1663 155-1666 155 

7-1761 157-1762 158-1777 158-2000 158-2007 I59-2O20 159 

4-2215 16S-2230 165-2233 165-2243 165-2246 165-2257 166 

1-2427 171-2435 171-2447 171-2450 174-2511 174-2516 176 

9-2816 179-2623 179-2625 181-2700 181-2720 182-2755 182 

7-3124 187-3130 187-3134 187-3135 187-3136 187-3137 133 

5-3373 196-3414 196-3433 199-3475 200-3505 201-3S20 201 



132 

307 

74 1 

1076 

1316 

1531 

1671 

2030 

2275 

2527 

3 00 7 

3147 

3523 



84- 133 
9 8-331 
122-751 
132- 1 144 
142- 1323 
153- 1545 
156- 1720 
160-2057 
166-2300 
175-2532 
1 84-3017 
183-3156 
203-3543 
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203-3546 206-3560 
220-3730 220-3735 



206-3S63 206-3564 217 
220-3746 221-3754 221 



3635 
3755 



217- 
221 - 



3637 218-3647 218-3656 218-3862 219-3706 
3756 221-3757 221-3765 221-4005 221-4011 



219' 
221 ' 



3715 220-3721 220-3722 22 
4012 221-4016 226-7640 



OBCLR 


220 


3738 










OBSET 


220 


3731 










OBTST 


220 


3724 


220 


3726 






OCLK 


105 


405 


1 14 


506 


1 14 


507 


OCLKOO 


104 


377 


1 14 


513 






0CLK1 


100 


360 


104 


40 1 


1 14 


510 


0CLK48 


99 


353 


100 


356 


1 14 


507 


OCLKRS 


100 


355 


1 14 


506 


1 1 6 


515 


OCOMP 


220 


3725 










OOOP 


22 





82 


53 


82 


60 


OOTAF 


45 





221 


4003 


221 


4003 


ODTCA 


45 













OOTCY 


45 





221 


4003 






OFFMSK 


45 













OFFSET 


45 













OFFTRK 


60 













OJCC 


221 


3756 


221 


3764 






OLOAO 


220 


3723 










ONLINE 


69 





148 


1470 






ONLREC 


45 













ONLY 


1 1 4 


5 14 


1 1 4 


5 1 4 


1 15 


514 


OP ABO 


53 













OP. ACC 


53 





126 


1040 






OP. ACP 


58 





154 


1 626 






OP. ATT 


53 













OP , AVA 


58 





155 


1663 






OP. AVL 


53 





126 


1046 






OP CCO 


53 













OP. CMP 


63 





126 


1040 






OP . DAP 


53 





126 


1047 


156 


1717 


OP . OUP 


58 





154 


1624 


154 


1627 


OP .END 


58 













OP ERS 


53 





126 


1040 






OP FLU 


53 













OP GCS 


53 













OP .GST 


53 





126 


10S1 






OP . GUS 


53 













OP . MRD 


53 


-o 










OP .MWR 


53 


-0 










OP. ONL 


53 


-0 


126 


1045 






OP. RD 


53 


-0 


126 


1040 






OP. RPL 


53 


-0 


128 


1040 






OP sec 


53 


-0 










OP. sue 


53 


-0 


128 


1050 






OP.WR 


53 


-0 


128 


1040 






OPCOD 


46 


-0 










OPCODE 


49 


-0 


49 









OPDCO 


21 7 


-3645 


220 


37 1 6 






0PDCD1 


218 


-3650 


218 


3651 


220 


3717 


0PDCD2 


220 


-3720 


220 


3743 






OPM 


22 


-0 


83 


101 


84 


135 


OPNFLG 


223 


-4020 











o 



86-317 228-7770 228-7776 



115-514 1 18-535 1 18-535 



I 
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0PXO1 


220 


3730 










0PX10 


220 


3722 


220 


3724 






0PX1 1 


220 


3727 


220 


3735 






OPXXO 


220 


3722 










0PXX1 


220 


3721 


220 


3727 






OSUBT 


220 


3735 


220 


3737 






OTADD 


220 


3730 


220 


3732 






OVER 


14 





1 1 1 


466 


1 1 6 


520 


OW 


44 













OWN 


35 













OXFC 


221 


3765 


221 


3772 






OXFCO 


221 


3775 


221 


4003 






0XFCI7 


217 


3633 


221 


3776 






P 


52 





52 





52 







52 





52 





52 







54 





54 





54 







54 





54 





54 







55 





55 





55 







55 





55 


o 


S7 







57 





57 





57 





P . BCNO 


54 


-0 


54 









P .BCN1 


54 













P . 8UFO 


54 





54 





54 


o 


P . BUF1 


54 





54 





54 





P . 6UF2 


54 


-0 


54 





169 


3241 


P . BUF3 


54 





54 





189 


3242 


P . BUF4 


54 


-0 


54 





54 





P . BUF5 


54 


-0 


54 










52-0 
52-0 
54-0 
54-0 
55-0 
57-0 
57-0 



52-0 
52-0 
54-0 

54-0 
55-0 
57-0 



52-0 
52-0 
54-0 
54-0 
S5-0 
57-0 



S2-0 
S2-0 
54-0 
54-0 
55-0 
57-0 



52-0 
52-0 
54-0 
54-0 
55-0 
57-0 



52-0 


52 





52-0 


S2-0 


52-0 


53-0 


53 





54-0 


54-0 


54-0 


54-0 


54 





54-0 


S4-0 


54-0 


55-0 


55 





55-0 


55-0 


55-0 


5S-0 


55 





55-0 


SS-O 


55-0 


57-0 


57 





57-0 


57-0 


57-0 



P 


BCNO 


54 


P 


BCN1 


54 


P 


BUFO 


54 


P 


BUF1 


54 


P 


6UF2 


54 


P 


BUF3 


54 


P 


BUF4 


54 


P 


BUF5 


54 


P 


BUFH 


54 


P 


BUFL 


54 


P 


CMSO 


55 


P 


CMS1 


55 


P 


CNTO 


55 


P 


CNT1 


55 


P 


CNT2 


55 


P 


CNT3 


55 


P 


CNTF 


54 


P 


CONS 


54 


P 


CRFO 


53 


P 


CRF1 


53 


P 


CSVR 


55 


P 


CTMO 


55 


P 


CVL 


55 


P 


CYLS 


54 


P 


ELGO 


54 


P 


ELG1 


54 


P 


FBBO 


55 


P 


FBB1 


55 


P 


FLGS 


55 


P 


GRP 


55 


P 


HSTO 


54 


P 


HST1 


54 


P 


HTMO 


54 


P 


LBNO 


54 



55-0 
55-0 

55-0 



53-0 
62-0 



54-0 
55-0 



v„ 
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CROSS 
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P . LBN 1 


54-0 




















































P . LCKA 


166-2320 


208-3566 


208-3567 
















































P . LINK 


53-0 


S3-0 


















































P . LOCK 


132- 1 142 


153- 1553 


159-2016 


1 60 


-2053 


1 62 


-2116 


1 66 


-2272 


208 


-3567 






























_Mflnn_ 


P.MED1 


S5-0 


55-0 
















































ri 


P.MED2 


55-0 


















































I 1 


P .MLUN 


55-0 


















































*w/ 


P MOD 


54-0 


62-0 


130- 1 100 


148 


- 1372 


1 48 


-1416 


1 54 


-1614 




































P. OPCO 


54-0 


62-0 


126- 1034 


156 


-1716 












































P .RBNO 


54-0 


54-0 


















































P .RBN1 


54 -0 




















































P . RBNS 


55-0 




















































P .RCTC 


55-0 




















































P .RCTS 


55-0 




















































P RFNO 


54-0 


54-0 


















































P.RFN1 


54-0 




















































P.RGIO 


54-0 


54-0 


















































P.RGI 1 


I4.-.0 




















































P. RGOO 


S4-0 


54-0 


















































P. RG01 


54-0 




















































P . RS03 


54-0 


62-0 


















































P. RS06 


54-0 




















































P . RSOS 


54-0 




















































P . RS 1 6 


54-0 




















































P. RS17 


54-0 




















































P . RS19 


S5-0 




















































P .SHST 


55-0 




















































P .SHUN 


54-0 




















































P .STS 


55-0 




















































P . TRCK 


5S-0 




















































P.UNFL 


54-0 




















































P .UNIT 


54-0 


62-0 


















































P . UNSO 


55-0 


55-0 


















































P . UNS 1 


5S-0 




















































P .UNTO 


SB-O 


55-0 


















































P .UNTI 


SS-0 


55-0 


















































P.UNT2 


SS-O 


55-0 


















































P .UNT3 


S5-0 




















































P . USVR 


55-0 




















































P . VCID 


53-0 


1 57- 1747 


















































P. VRSN 


54-0 




















































P . VSEO 


SS-O 


55-0 


















































P . VSE1 


SS-O 




















































PA8P.T 


S3-0 




















































PACTV 


S3-0 




















































PAGESZ 


46-0 




















































PAR 


18-0 


18-0 


18-0 


90 


242 


90 


-246 


132 


1 1 62 


136 


- 1 177 


221 


-4002 




























PARTST 


90-240 




















































PCREL 


219-3677 


219-3704 


















































PKIP 


59-0 


121-714 


1 22-756 


155 


1 677 


1 63 


-2125 


1 64 


2173 


166 


-2303 


1 66 


-2310 


179 


-2 602 


132 


-277 1 


227 


-7707 
















PKTOOI 


52-0 


52-0 


















































PKT002 


52-0 


52-0 


















































PKT003 


52-0 


52-0 
















































f\ 


PKT004 


52-0 


52-0 
















































u 
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CORP., 2901 ASSEMBLER 


VERSION 


32 PAGE S 


26 
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TABLE ( CREF VOI -08 ) 














































PKT005 


52-0 


52-0 


















































PKT006 


52-0 


52-0 


















































PKT007 


52-0 


52-0 


















































PKTOOS 


52-0 


52-0 


















































PKTOOS 


S2-0 


52-0 


















































PKTOIO 


52-0 


52-0 


















































PKTOI 1 


52-0 


S2-0 


















































PKT012 


52-0 


52-0 


















































PKT013 


52-0 


52-0 


















































PKT014 


52-0 


5 2-0 


















































PKT015 


52-0 


52-0 


















































PKTOI 6 


52-0 


52-0 


















































PKT017 


52-0 


52-0 


















































PKT018 


52-0 


52-0 


















































PKT019 


52-0 


52-0 


















































PKT020 


52-0 


52-0 


154- 1 634 


155 


1 70 1 


157 


1747 








































PKTBUF 


52-0 


52-0 


















































PKTEND 


52-0 


65-0 


















































PLOCK 


19-0 
208-3566 


130- 1063 
208-3570 


132- 1 I5S 


153 


1562 


154 


1 644 


159 


2021 


160 


-2061 


1 62 


2120 


1 63 


2126 


1 64 


21 74 


1 66 


2305 


1 S6 


2312 


179 


2604 


132 


2772 




POLL 


12-0 


12-0 


13-0 
















































PONER 


53-0 


157- 1751 
















































a 
< 


PROY 


14-0 


1 1 1 -463 


1 1 e-5 1 7 














































PSTACK 


78-30 


81-52 
















































PSTAT 


53-0 


















































3 


PTELEN 


46-0 


















































a 





17-0 


8 8-170 


88- 173 


88 


1 74 


88 


175 


38 


1 76 


38 


1 77 


38 


200 


88 


201 


88 


207 


88 


212 


38 


213 


89 


235 






ii 


. STAT 


46-0 


















































s 

O 

u. 


OB 


73-0 


















































ODADM 


1 -0 


217-3626 
















































OREVB 


1-0 


















































OUESAV 


49-0 


49 -0 
















































OW 


44-0 


















































C/5 


R.GCCH 


148-1433 


227-773S 
















































O 


R.GSTA 


149- 1445 


149-1445 


226-7656 


226 


7670 


227 


7730 






































to 


R.GSTB 


149- 1450 


14 9-1452 
















































-1 


R. GUCH 
R. GXCH 
R. LRSP 


149- 1443 
149-1436 
ISO- 1476 


226-7674 
149- 1444 
226-7663 


228-774 1 
226-7672 


227 


7713 












































R.RESP 


150-1502 


ISO- 1502 


226-7660 


226 


7666 


227 


7676 


227 


7700 


227 


7706 


227 


7715 


227 


7717 


227 


7722 


227 


7725 


227 


7733 












R. RSPA 


150- 1503 




















































R. SEEK 


15 1-1536 


227-7703 


















































R. TOPO 


149-1 445 


226-7652 
















































^•Jh. 


RO 


82-54 
8 9-214 


82-54 
89-2 15 


87- 156 
89-234 


87 

89 


157 
236 


88 

98 


1 66 
324 


S3 
98 


1 67 
330 


88 
98 


171 
337 


88 
104 


172 

376 


38 


201 


88 


202 


88 


204 


88 


206 


88 


210 


88 


2 1 1 


r> 


RI 


88- 171 
91 -262 


88-172 
98-331 


88- 175 
98-333 


88 

98 


203 
337 


88 

98 


205 
340 


89 
98 


2 1 5 
343 


89 


218 


9 1 


25 1 


9 1 


252 


9 1 


255 


9 1 


25 6 


91 


257 


91 


260 


9 1 


26 1 


luJf 


RIO 


17-0 


17-0 


89-224 


89 


225 


98 


325 


98 


342 


93 


344 


106 


412 


106 


417 
























RI t 


17-0 


84-134 


84- 13S 


85 


146 


85 


147 


85 


150 


89 


225 


83 


226 


90 


240 


90 


241 


90 


244 


90 


245 


93 


2 67 


93 


272 






95-306 


104-374 


104-375 


106 


407 


106 


410 


106 


413 


106 


415 


108 


416 


106 


420 


106 


421 


107 


426 


107 


427 


103 


434 


109 


442 






109-445 


109-451 


1 10-453 


1 13 


476 


1 13 


502 


1 13 


504 


1 19 


540 


121 


706 


121 


713 


121 


714 


121 


715 


121 


717 


121 


721 


121 


723 






1 21 -724 


121 -728 


122-758 


1 22 


757 


122 


760 


122 


761 


1 22 


762 


1 22 


763 


122 


764 


1 22 


765 


123 


772 


123 


773 


123 


775 


123 


lOOl 






123- 1003 


124-1012 


124-1013 


124 


1014 


126 


1052 


127 


1053 


128 


1054 


129 


1057 


129 


1060 


130 


1065 


130 


1066 


130 


107 1 


130 


1075 


130 


1 105 






130- 1110 


1 30- 1113 


131-1136 


132 


1 143 


133 


1 1 63 


1 34 


1 164 


135 


1 1 65 


136 


1 204 


137 


1207 


137 


1211 


137 


1212 


137 


1212 


137 


1213 


137 


1214 
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137- 
142- 
149- 
151 - 
154- 
156- 
1 59- 
1 63- 
1 64- 
1 65- 
1 69- 
174- 
177- 
1 80- 
1 82- 
1 36- 
187- 
190- 
1 92- 
1 96- 
197- 
205- 
227- 
228- 

17- 
109- 
122- 
1 26- 
1 37- 
1 37- 
1 40- 
141- 
1 46- 
1 49- 
153- 
156- 
157- 
16 1- 
1 64- 
1 69 - 
1 74- 
1 73- 
1 82- 
I 85- 
1 88- 
19 2- 
196- 
212- 
227- 

1 7 • 
109- 
1 17- 
13 1- 
147- 



1 223 

1325 

146 1 

1540 

1 643 

1732 

2033 

2125 

2177 

2252 

2357 

2510 

2562 

2661 

2750 

3070 

3133 

3243 

331 1 

3436 

3462 

3555 

772 6 

7765 



446 

740 

1051 

1226 

1235 

1251 

1311 

1355 

1454 

1567 

1716 

1770 

2100 

2205 

2366 

2516 

2570 

2753 

3036 

3154 

3303 

3421 

3612 

7727 

O 

442 

532 

1 132 

1367 



1 37- 
142- 
150- 

153- 
154- 
157- 
1 60- 
1 63- 
1 64- 
1 65- 
1 69- 
174- 
1 78- 
181 - 
1 82- 
186- 
1 87- 
190- 
193- 
196- 
200- 
206- 
227- 
228- 
1 7- 
111- 
122- 
129- 
137- 
137- 
140- 
142- 
146- 
149- 
153- 
156- 
158- 
16 1- 
I 65- 

1 69 - 
175- 
ITS- 
IS!" 
185- 
188- 
192- 
196- 

2 12- 
227- 

78- 
109- 
122- 
13 1- 



1224 

1331 
1501 
1564 

1 645 
1737 
2036 

2 130 
2201 
2261 
2375 
251 1 
2565 
2673 
275 1 
3073 
3142 
3245 
3323 
3436 
3503 
3560 
7726 
7767 
O 

4E4 
742 
1056 
1227 
1236 
1252 
1314 
1356 
14 55 
187$ 
1717 
2000 
2103 
2236 
2367 
2531 
2576 
2755 
3040 
3163 
3305 
3434 
3613 
7730 
27 
447 
754 
1141 
14 14 



1 37- 1 225 
144- 1342 
150- 1503 
153- 1567 
154-1 647 
157- 1741 
180-2041 
163-2143 
164-2203 
165-2263 
169-2404 
174-2512 
178-2S70 
181 -2705 
182-2752 
186-3073 
187-3146 
1 90-325 1 
193-3327 
196-3440 
201 -3521 
210-3574 
228-7756 
228-7774 

89-226 
1 13-500 
122-747 
130- 1072 
137- 1227 
137- 1236 
140- 1254 
142-1315 
147- 1362 
149- 14S7 
153- 1602 
1S6- 1720 
159-2027 
161-2106 
165-2251 
1 69 -2370 
175-2533 
179-2617 
182-2773 
185-3040 
186-3166 
192-3314 
199-3476 
213-3615 
227-7735 

78-30 
1 1 1 -456 
123-774 
136-1174 
148-14 15 



1 40- 
145- 
150- 
1 53- 
154- 
1S7- 
1 60- 
163- 
1 64 
1 65- 
1 69- 
174- 
179- 
I S 1 ■ 
1 82 
186- 
188- 
1 90- 
1 93 
19 6- 
201 
210- 
228 
228 
39 
113 
122 
1 30 
1 37 
1 37 
1 40 
1 42 
1 47 
149 
154 
156 
1 60 
1 6 1 
1 65 
1 69 
1 76 

1 79 
182 
185 
189 
192 
201 
226 

2 28 
89 

1 1 1 
123 
1 36 
I 48 



1244 

1346 

1507 

1570 

1650 

1755 

2050 

2146 

2203 

2270 

2423 

25 14 

2601 

2707 

2756 

3074 

3151 

325 1 

3330 

3440 

3524 

3575 

7757 

7774 

227 

501 

750 

1 104 

1230 

1237 

1256 

1322 

1363 

1470 

1621 

1724 

204 1 

2106 

2270 

2374 

2536 

2620 

2775 

3042 

3217 

3315 

351 1 

7651 

7737 

227 

456 

776 

1202 

1421 



140 

1 46 
ISO 
153 

155 
157 
I 60 
1 64 
I 64 
I 66 
171 
1 74 
1 79 
1 31 
1 82 
I 87 
183 
190 
193 
196 
201 
210 
228 
228 

93 
1 17 
1 22 
1 30 
137 
137 
140 
143 
147 
150 
1 54 
1 56 
1 60 
1 62 
1 65 
1 69 
176 
179 
184 
185 
139 
193 
201 
226 
228 

89 
1 1 I 
124 
1 36 
1 43 



1246 

1357 

1511 

1571 

1657 

1760 

2053 

2150 

2207 

2277 

2427 

2515 

2602 

271 1 

2770 

3076 

3152 

3252 

3333 

3442 

352B 

3577 

7760 

7775 

270 

526 

752 

1112 

1230 

1 237 

1261 

1332 

1364 

1471 

1 62 1 

1725 

2042 

2115 

2271 

2377 

2537 

263 1 

3015 

3044 

3223 

3332 

3512 

7652 

7740 

230 

457 

1007 

1206 

1422 



140- 
148- 
150- 
153- 
155- 
115- 
160- 
164- 
1 64- 



1 253 
1372 
1512 
1572 
1 671 
1776 
2063 
2151 
221 1 
1 66-2301 
171 -2434 
174-2517 
179-2606 
181-2713 
182-2771 
187-3077 
188-3157 
190-3253 
193-3334 
196-3442 
202-3531 
2 1 1 -3 BOO 
228-7760 

93-271 
1 17-530 
122-753 
131 - 1 120 
137-1231 
138-1 240 
140- 1262 
143- 1333 
147- 1365 
ISO- 1472 
154-1 622 
156- 1730 
1 60-2054 
162-2116 
16B-2275 
169-2402 
176-2540 
181-2714 
184-3016 
185-3044 
189-3224 
194-3347 
201 -3S13 
226-7655 



1 40- 1 255 
148-1 373 
150- 1513 
153- 1573 
155-1 672 
158- 1777 
1 60-2O66 
1 64-2152 
164-221 1 
166-2303 
171 -2437 
175-2521 
179-2623 
181-2715 
184-302O 
187-3101 
138-3172 
190-3255 
193-3340 
196-3444 
202-3532 
21 1 -3601 
228-7761 



140- 
148- 
1 50- 
113- 
155- 
158- 
160- 
1 64- 
1 61- 
1 66- 
171 • 
171- 
180- 
181 ■ 
IBS 
187- 
1 83- 
190- 
193 
196 
202 
212- 
228 



1 260 
1400 
1515 
1 80 1 
1 673 
2005 
2070 
2154 
2231 
2304 
2443 
2523 
2642 
2723 
3051 
3102 
3172 
3256 
3341 
3444 
3533 
3603 
7761 



1 40- 
148- 
ISO- 

153- 
111' 
III' 

16 1- 

164- 
165- 
166- 

17 1- 
175- 
180- 
181 ■ 
185- 
187- 
188- 
190- 
194- 
196 
202 
213 
228 



1 267 
1 406 
1516 
I 603 
1676 
20 10 
2073 
2154 
2241 
2307 
2446 
2526 
2643 
2725 
3051 
3107 
3174 
3261 
3343 
3446 
3534 
3614 
7762 



273 
533 

1030 
1 130 
1231 
1240 
1263 
1336 
136S 
1 474 
1 623 
1731 
1 60-2055 
1 63-2137 
1 66-2304 
1 69-2420 
176-2541 
181-2716 
184-3017 
185-3046 
139-3231 
194-3352 
201 -3514 
225-7656 



93- 
1 17- 
125- 
131 - 

137- 
138- 
140- 
143- 
147- 
150- 
1 54- 
156- 



94-303 
1 17-534 
126- 1040 
131-1 137 
137- 1232 
138-1241 
140- 1264 
143- 1337 
148- 1371 
150- 1475 
154- 1624 
156- 1733 
160-2056 
163-2140 
166-2310 
1 69-2421 
176-2542 
1S1 -2717 
184-3022 
135-3047 
189-3241 
194-3355 
201 -3515 
226-7662 



101 -373 
121-712 
126- 1041 
131 - 1 140 
137- 1232 
138-1241 
141 - 1274 
143- 1340 
148- 1374 
ISO- 1505 
1S4- 1626 
157- 1734 
160-2057 
1 64-21 62 
I 66-2315 
1 71 -2444 
176-2543 
181 -2720 
184-3023 
185-3052 
169-3242 
194-3363 
203-3541 
226-7667 



140-1 272 
148-1 407 
1 50- 1 523 
153-1 607 
156- 1704 
159-2012 
1 62-21 1 1 
164-2156 
165-2242 
166-2310 
1 71 -2447 
176-2547 
180-264S 
18 1 -2727 
185-3060 
187-31 I 1 
188-3174 
190-3262 
194-3360 
196-3450 
202-3535 
221 -4000 
228-7762 

104-377 
121-722 
126- 1042 
132- 1 146 
137- 1233 
138- 1242 
141 - 1277 
144- 1341 
143-1401 
151 - 1527 
154- 1527 
157- 1736 
1 60-2060 
164-2165 
168-231 6 
172-2470 
176-2545 
181 -2721 
185-3030 
185-3052 
190-3261 
194-3364 
203-3542 
226-7670 



14 1- 
148- 
151 ■ 
114- 
116- 
159 ■ 
1 62- 
164- 
165- 
1 67- 
171 ■ 
177- 
1 80- 
13 1' 
185- 
187- 
188- 
190 
195 
196 
202 
226 
228 



1301 
1417 
1S31 
1634 
170B 
20 14 
2113 
2156 
2245 
2324 
2453 
2550 
2646 
2731 
3062 
3112 
317S 
3267 
3403 
3450 
3536 
7653 
7763 



142- 

149- 

151 • 

154- 

156- 

159- 

162- 

1 64- 

165 

169- 

171 ' 

177- 

180- 

181 ■ 

IBS 

187- 

189- 

190 

196- 

196 

202 

226 

228 



1312 
1436 
1132 
1635 
17 to 
2015 
2 114 
21 64 
2246 
2353 
2454 
25S3 
2655 
2736 
3062 
3114 
3222 
32B7 
340S 
3453 
3537 
7661 
7763 



104-377 
121 -724 
126- 1045 
132- 1 153 
137- 1233 
138- 1242 
141-1 300 
145- 1343 
148- 1403 
151 - 1530 
155- 1 656 
157- 1752 
160-2065 
164-2171 
166-2317 
173-2SOO 
177-2550 
181 -2734 
185-3030 
185-3057 
190-3262 
1 94-3366 
203-3547 
226-7673 



106-4 11 
121 -726 
126- 1046 
136- 1200 
137- 1234 
138- 1243 
141-1 304 
145-1 344 
148- 1413 
152- 1544 
155-1 6B3 
157-1754 
160-2067 
164-2172 
166-2321 
173-2504 
177-2SS7 
181 -2735 
185-3032 
185-3063 
190-3270 
195-3404 
206-3557 
227-7705 



1 42 
1 49 
1 5 1 
154 
156 
159 
1 62 
I 64 
1 65 
1 69 
1 72 
177 
130 
I 32 
1 36 
187 
189 
190 
196 
197 
203 
226 
228 

106 
1 21 
126 
1 36 
137 
1 40 
141 
146 
149 
153 
155 
157 
1 60 
1 64 
1 66 
1 73 
177 
182 
185 
187 
192 
196 
210 
227 



93-266 93-273 94-300 94-301 104-375 105-405 106-410 lOB 

111-460 111-461 111-462 111-463 111-471 114-506 114-507 114 

124-1010 124-1011 125-1023 12S-102S 125-1027 125-1031 130-1111 131 

142-1321 142-1321 143-1333 143-1334 143-1335 143-1337 144-1341 145 

149-1433 149-1434 149-1443 149-1446 149-1451 149-1463 150-1504 153 



1313 
1437 
1133 
1637 
1712 
2024 
2122 
2173 
2247 
2315 
2472 
25S5 
2656 
2746 
3065 
31 20 
3232 
3270 
3424 
3460 
3546 
7664 
7764 

41 1 

73 2 

1047 

1201 

1234 

1246 

1307 

1350 

1440 

1547 

1677 

1765 

2070 

2173 

2322 

2S06 

2560 

274S 

3034 

3104 

3277 

341S 

3573 

7707 

423 
510 
1 122 

1343 
1547 



5 6-172 2^---v 
S9-203M 1 
E 3 - 2 1 2« I; 
e4 - 2t7 K^ 



142- 1320 

149-1441 

151 - 1534 

154- 1642 

156- 1722j 

1 

1 

1 

1 65-2250 

1 69-2356 

174-2507 

177-2561 

180-2660 

1 82-2747 

186-3067 

187-3132 

189-3232 

192-3310 

196-3432 

197-3461 

205-3554 

227-7724 

228-7764 

109-443 
121 -733 
126- 1050 
137- 1226 
137- 1235 
140- 12SO 
141-1310 
146- 1351 
149- 14S2 
153- 1566 
156- 1711 
157- 1766 
1 61 -2077 
164-2205 
189-2365 
174-2S13 
177-2560 
182-2747 
185-3034 
187-3145 
192-3300 
196-341 6 
212-3604 
227-771 6 

107-425 
114-513 
131 - 1 123 
146-1351 
153- 1S50 
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R15 
R1 6 



Q 
< 

D 

a 

ii 
s 

cc 
o 

u. 
V) 

o 



I 54 

1 56 

1 59 

1 65 

1 77 

1 87 

1 89 

21 2 

227 
17 

1 19 

1 42 

1 54 

1 64 

1 69 

1 31 

1 36 

1 90 

201 
17 
17 

108- 

131 - 

146- 

150- 

1 61- 

1 67- 

17 1- 

18 1- 
187- 
189- 
192- 
227- 

37- 
109- 
124- 
147- 
149- 
1 63- 
1 65- 
17 1- 
179- 
181 • 
187- 
193- 
196- 
212- 
227- 

88- 
212- 

17- 



-16 14 

-1714 

-201 2 

-2243 

-2563 

-3124 

-3222 

-3605 

-7715 

-O 

-536 

-1317 

- 1 646 
-2213 
-2410 

2724 
3064 
3254 
3523 

-O 

-0 

-433 

-1134 

- 1347 
-1517 
-2104 
-2330 
-2427 
-2675 
-3132 
-3214 
-3322 
-7724 
-O 

444 

lOOS 

1360 

1442 

2136 

2264 

2462 

2632 

2712 

3117 

3331 

3413 

351 1 

7716 

151 

3602 



R5 
R6 



154-1615 
156- 1727 
1 59-2014 
1 65-22S7 
178-2573 
188-3150 
190-3263 
213-3616 
227-7717 

89-230 
121 -736 
149-1 447 
155-1 655 
1 65-2224 
171 -2437 
181 -2730 
187-3103 
190-3256 
212-3606 

17-0 

89-232 
109-441 
131 - 1 13S 
146- 1352 
152- 1542 
1 61 -2107 
1 67-2331 
172-2466 
181 -2677 
187-3134 
189-3215 
194-3342 
228-7745 

76-0 
1 1 1 -472 
124-1011 
147- 1362 
150- 1521 
163-2144 
166-2272 
171 -2464 
180-2636 
181 -2716 
187-3131 
193-3337 
196-3414 
213-3S22 
227-7723 

86- 153 

76-5 
1 7-0 
89-221 

89-222 



154 

157- 

1 59 

166- 

181 

188- 

190- 

226- 

227- 

89 
122 
149 
156 
1 65 
171 
182 
187 
190 
21 3 

89 

39 
1 13 
132 
146 
153 
1 63 
1 67 
173 
181 
187 
189 
195 
228 

76 
1 1 1 
130 
147 
152 
164 
1 66 
1 72 
130 
131 
188 
194 
196 
221 
227 

86 

89- 



1616 

1747 

2022 

2303 

2722 

3112 

3263 

7660 

7722 

231 

743 

1453 

1727 

2227 

2440 

2745 

3105 

3266 

3617 

231 

233 

505 

1 144 
1354 
15S7 

2 127 
233S 
2501 
2706 
3135 
3216 
3367 
7746 
2 

473 
1064 
1370 
1541 
2155 
231 I 
2467 
2640 
2737 
3153 
3346 
3420 
3756 
7731 
154 



154- 
1S7- 
1 60- 
1 69 - 
182- 
188- 
1 90- 
226- 
227- 
99- 
124- 
150- 
1 57- 
1 65- 
171 - 
182- 
187- 
190- 
221 • 
89 - 
99 ■ 
119- 
132- 
1 46- 
153- 
163- 
167- 
175- 
181 ■ 
187- 
189- 
195- 

78- 
1 1 1 ■ 
1 30- 
143 
153- 
1 64- 
166- 
172- 
180- 
182- 
188- 
194- 
196- 
221 
227 

36- 



1617 

1750 

207 1 

2360 

2742 

31S4 

3264 

7663 

7725 

346 

1015 

1502 

1745 

2256 

2443 

2751 

3106 

3266 

4003 

232 

350 

536 

1 1 60 

1354 

1575 

2127 

2336 

2522 

2733 

3136 

3220 

3370 

22 

474 

1070 

1371 

1546 

2157 

2314 

2473 

2643 

2743 

3 160 

3351 

3422 

4013 

7732 

1 55 



154- 
157- 

16 1- 
1 69- 
182- 
138- 
190- 
226- 
227- 
100- 
124- 
15 1- 
157- 
166 

17 1- 
182- 
187- 
190- 
221 ' 

99- 
100- 
119- 
132- 
147- 
153- 
1 63- 
167- 
175- 
182 
187 
189 
196 



1630 154 

1751 157 

2075 161 

2361 169 

2764 182 

3161 188 

3264 192 

7666 226 
7733 

361 100 

1016 124 

153B 153 

1761 159 

2273 166 

2450 171 

2755 132 

3110 137 

3271 190 

4003 226 

345 99 

355 100 

537 121 

1162 132 

1361 148 

1604 155 

2141 163 

2340 167 

2525 175 

2760 182 

3141 187 

3221 189 

3437 196 



- 1640 154-1 645 155- 

■1753 157-1756 157- 

-2076 161-2101 161 

■2375 169-2376 169 

■2767 182-2776 184 

■31 62 188-3163 188 

'3310 192-3313 192- 

■7672 227-7675 227 



16S4 155-1655 155-1656 1SS-1702 155-1703 156-1705 156-1713 

1762 157-1763 157-1764 158-1774 158-2002 158-2003 158-2006 

2101 161-2102 164-2153 164-2155 164-2210 1 64 - 22 1 5 1 65 - 2233 

2414 169-2416 171-2436 171-2441 173-2477 177-2154 177-2556 

3024 184-3025 185-3027 185-3033 185-3037 185-3043 187-3122 

3165 183-3166 183-3167 188-3170 188-3170 188-3177 183-3177 

3315 194-3345 194-3356 194-3361 196-3426 203-3143 203-3545 

767B 227-7700 227-7703 227-7704 227-7706 227-7713 227-7714 



78-23 
1 12-475 
130- 1 102 
148- 1374 
153- 1551 
164-2175 
167-2343 
172-2474 
180-2645 
182-2754 
188-3164 
194-3362 
196-3422 
221 -401 6 

89 -216 



78- 
116- 
13 1- 

148- 
153- 
164- 
168- 
173- 
180- 
1 82- 
188' 
195 
196 
223 



362 

1017 

1112 

2017 

2274 

2451 

2775 

3113 

3271 

7674 

346 

356 

715 

1 162 

1375 

1662 

2147 

2341 

2530 

2762 

3 143 

3225 

3441 

24 
515 

1121 
1377 
1553 
2200 
2345 
2476 
2651 
2761 
3202 
3372 
■3425 
4020 



100-363 

124- 1020 

153- 1 5S4 

159-2020 

167-2326 

171 -2452 

182-3000 

187-3122 

192-3277 

227-7736 

99-3S2 
100-357 
121-716 
141 - 1274 
148- 1376 
155- 1 670 
164- 2 ISO 
167-2342 
178-2574 
182-3001 
187-3144 
190-3244 
19S-34SS 

78-25 
121 -703 
131-1 124 
148- 1402 
153- 1517 
1 64-2202 
1 68-2347 
17S-2B44 
130-2664 
182-2763 
189-3226 
191-3374 
196-3421 
226-7643 

91 -213 



100 
124 
153 
1 60 
1 67- 
1 75- 
1 82 
187 
194 
228 
99 
100- 
121 
1 4 1 
148- 
157- 
164' 
1 68- 
179 
182 
IBS 
190 
199 

78 
121 
141 
148 
153 
164 
I 69 
176 
180- 
1 82 
189 
195 
196- 
226- 



364 

1021 

1555 

2052 

2332 

2520 

3000 

3124 

3344 

7741 

313 

361 

720 

1 275 

1402 

1740 

2153 

2346 

2605 

3006 

3147 

3246 

3471 

26 

704 

1303 

1404 

1564 

2204 

2352 

2546 

2665 

2765 

3227 

3374 

3427 

7644 



101-367 101-370 101-371 104-4OO 104-401 104-40 

130-1076 130-1101 130-1103 136-1177 141-1302 141-1302 

153-1556 153-1560 153-1561 153-1605 153-160S 154-1612 

160-2062 160-2062 16 1-2105 161-2105 1 63 - 2 1 33 1 64 - 2 1 66 

167-2333 167-2337 163-2346 168-2350 169-2366 169-2374 

175-2524 175-2527 175-2132 171-2134 177-2111 179-2613 

85-3031 181-3041 185-3045 

89-3210 189-3224 190-3250 



182-3002 
187-3126 



182-3004 185-3031 
187-3130 188-3156 



196-3430 201-3516 201-3116 201-3120 201-3120 201-3123 



200- 

100- 

126- 

141 - 

148 

117- 

1 64- 

1 68 

179 ■ 

182- 

188- 

190 

199 



3477 

365 

1034 

1304 

1416 

1742 

2221 

2381 
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1 65- 
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1420 
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2223 

2403 
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3433 
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169- 
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212- 
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148- 
155- 
1 6S- 
1 69 - 
179 ■ 
180 
185- 
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195- 
196- 
226 



3517 

41 4 

1 106 

1306 

1440 

2001 

2244 

2353 

2652 

3064 

31 65 

3265 

36 10 

224 

725 

1316 

1425 

1 665 

2230 

2406 

2614 

2671 

3053 

3301 

3376 

3445 

7647 



212-3607 
107-427 



131 - 

142- 
149- 
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1444 
159-2026 
167-2323 
169-2400 
180-2657 
187-3103 
I8S-320S 
192-3274 
2 13-362 1 

10S-422 

121 -730 

145- 1344 

148-1427 

155-1666 

165-2234 

169-2417 

179-2616 

181 -2704 

1S5-30S4 

192-3306 

195-3376 

196-3452 

226-7650 

93-326 



213-3620 

108-430 

131-1126 

142- 1324 

149- 1456 

159-2030 

1 67-2325 

169-2405 

180-2660 

187-3128 

188-3206 

192-3276 
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159 
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181 
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432 108-433 
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1430 148- 1432 
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2422 171-2430 
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3325 193-3325 
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3525 210-357J 

7665 226-767 
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17-0 
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218 
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218 


-3671 
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221 -4015 


















































RC1 


40-0 




















































RCLR 


73-0 


76-7 


100-361 
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109-451 
138-1241 
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2222 
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2312 
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2320 
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2354 
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2407 
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2624 
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2625 
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2670 


181 
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182 
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3650 
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3651 


219 


3876 


219 


3701 


219 


3702 


219 


3702 
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3703 




219-3704 


2 1 9 - 3705 


2 19-3706 


219- 


3707 
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3710 


219 


3710 


219 
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219- 


3712 
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3715 
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3713 


220 


3723 


220 


3725 


220 


3723 


220 
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220-3737 
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3746 
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3750 
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221 
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357 


104- 
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1022 
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156- 


1720 
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1 63 
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2612 
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188- 
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18-0 


99- 
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1213 


137- 


1214 


1 40 
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131- 


1S33 


153- 
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1673 
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1S7- 1761 
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133- 


2137 
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2143 


166- 
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167 


2333 
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174- 


2510 


174- 


25 11 


174 


2512 


174- 


251 3 


1 74 


25 16 


17S 


2523 






175-2524 


175-2526 


175-2527 


175- 


2532 
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2534 


176- 


2540 
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2617 


179- 


2623 
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2734 


181 


2735 
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3015 


184 


3016 
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196-3413 


196-3414 
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25-0 


















































m 1 
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15-0 
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15-0 
















































RVACTW 


60-0 




















































RVC8NH 


49 -0 


49 -O 


192-3305 
















































RVCBNL 


48-0 


49-0 


192-3304 
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S 1 





5 1 





192" 


327S 


RVCFLG 


5 1 





5 1 





132- 


1 ISO 


RVCIND 


50 





50 









RVCRTV 


50 





50 









RVCSAV 


48 





48 





192- 


3300 


RVCSOI 


51 





51 





132- 


1 145 


RVCT 


59 





122 


750 


122- 


764 


RVCTA 


49 


o 


49 





192- 


3302 


RVCVEC 


5 1 





51 









RVECOP 


5 1 





51 





132- 


1 147 


RVECUP 


5 1 





5 1 





194 


3354 


RVWRIT 


60 













RWM 


1 S 













RWRDV 


25 





99 


352 


100- 


363 


S . ADRH 


54 













S ADRL 


54 





54 









S .CFL1 


147 


1367 


227 


7677 


227 


7721 


S .CL1 1 


1S9 


2015 


189 


3217 


190 


3256 


S .CLRS 


99 


316 


96 


317 


130 


1067 


S . CMOD 


147 


1360 


227 


7675 


227 


7714 


S . CYLH 


54 





54 









S . CYLL 


54 





54 





192 


3276 


S . OCLR 


148 


1401 


226 


7657 






S . 0CN1 


1 48 


1403 


227 


7732 






S DCN2 


1 43 


1414 


227 


7724 






S DCN3 


1 48 


1411 


155 


1 666 






S .DCNE 


1 48 


1404 


1 43 


1410 


148 


1413 


S . EREC 


148 


1426 


227 


7 706 






S . GRUP 


54 





54 









S . GUCH 


1 49 


1441 


226 


7673 


228 


7740 


S . INIT 


1 49 


1 465 


226 


7654 






S . LBNH 


54 





1 65 


2261 






S . LBNL 


54 





1 65 


2263 






S . L01 1 


1 21 


737 


123 


771 


123 


772 




1 50 


1510 


1 54 


1 633 


1S5 


1 661 




1 65 


22S3 


1 65 


•2260 


155 


2266 




186 


•3072 


187 


•3075 


1 87 


3117 


S . LD12 


1 29 


- 1055 


132 


-1145 


136 


1 173 




1 56 


- 1723 


1 60 


-2037 


1 60 


2040 




1 39 


•321 1 


1 39 


-32 16 


1 89 


3234 


S . LD13 


1 23 


-767 


1 26 


- 1035 


1 26 


1036 




1 61 


-2105 


1 69 


-2352 


1 30 


2651 


S . L D 1 4 


1 36 


- 1 170 


136 


-1171 


1 54 


1 610 




185 


-3054 


133 


-3153 


190 


3243 


S . LD15 


201 


-3512 


212 


-3607 






S . LD1 6 


1 22 


-755 


130 


- 1077 


132 


• 1 152 




1 92 


-3321 


201 


-35t3 


212 


3610 


S . LD17 


1 23 


-777 


124 


- 1004 


132 


-1151 




1 93 


-3336 


195 


-3371 


195 


3377 


S . LDCC 


2 1 2 


-3606 


220 


-3742 


220 


3744 


S . LDCY 


212 


-3607 










S . LDDB 


1 31 


-1121 


1 31 


-1127 


1 65 


-2234 


S . LDPC 


2 1 2 


-3604 


221 


-3761 


221 


-4007 


S . L0R2 


95 


-313 


212 


-3602 







132-1152 132-1157 192-3321 



194-3344 
194-3353 
136-1204 165-2254 165-2267 



132-1156 192-3317 
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194-3342 194-3366 



148-1420 143-1425 



123-1000 130 

155- 1667 155 

1 66-2276 1 66 
187-3131 

142-1326 146 

165-2235 169 

192-3301 193 

130- 1 106 131 

180-2666 185 

156- 1726 165 

190-3245 195 



1064 130- 1 100 

1675 155-1700 

2306 169-2373 

168-3171 190-3254 

1347 150-1473 

2364 169-2372 

3325 194-3346 

1131 132- 1 157 

3053 188-3160 

2255 165-2262 

3376 200-3501 



136-1172 136-1203 142-1327 148-1405 149-1460 150-1476 150-1500 150-1506 

157-1757 158-1775 159-2023 159-2032 160-2047 162-2112 165-2240 165-2244 

169-2401 169-2403 169-2422 171-2433 171-2446 1 7 1 - 24 60 1 76 - 254 6 179-2603 

193-3326 193-3331 193-3337 194-33S7 201-3515 209-3571 212-3603 

152-1543 153-1574 153-1577 154-1620 154-1621 155-1654 156-1715 156-1721 

169-2417 172-2467 172-2470 173-2502 176-2544 179-2630 182-2757 187-3144 

194-3351 194-3365 201-3510 206-3556 212-3604 

153-1546 154-1613 154-1614 155-16S3 157-1744 157-1746 157-1773 151-2074 

188-3161 168-3164 195-3375 20O-350O 212-3605 

165-2264 166-2311 168-2345 168-2347 171-2442 171-2461 171-2463 182-2776 

201-3511 212-3606 



132-1156 136-1175 153-1600 155-1660 159-202S 172-2465 173-2476 189-3220 190-3272 192-3273 192-3317 



136-1176 148-1416 148-1426 
198-3464 199-3474 201-3514 



148-1427 148-1431 168-2344 171-2432 171-2435 173-2475 182-2760 182-2762 
212-3611 221 -3752 



167-2343 169-2362 171-2430 171-2431 172-2473 186-3071 189-3227 195-3374 212-3607 



v y 
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LL 12 

LRSP 

ML 12 

ONLN 

OPFL 

RCAL 

ROTL 

RR17 

RUNN 

S01 1 

SECI 

SECS 

SEEK 

SND3 

SRM 

ST1 1 

ST12 



S .ST13 
S.ST14 
S .ST15 
S . S T 1 6 
S . ST17 
S .STCC 
S STDB 
S STPC 
S . SWAB 
S .TRAK 
SAREG 
SAVADR 
SAVBUF 
SAVCNT 
SAVEDC 
SAVR7 
SAVUAR 
SC .AOL 
SC . BAD 
SC .CNT 
SC.DCL 
SC.DDE 
SC.DIS 
SC .DSY 
SC DUP 
SC . EC1 
SC . EC2 
S C . E C 3 
SC . EC4 
SC . EC5 
SC . EC6 
SC . EC7 
SC.ECS 
SC.ECC 
SC.EDC 
SC.FER 



126- 1034 
150- 1475 
212-3613 
149- 1467 

54-0 
150-1471 
1 62-21 15 
142- 1312 
150- 1504 
121 -703 

54-0 

54-0 
ISO- 1510 
147- 1366 
106-423 
131-1116 
148- 1376 
192-3316 
148- 1375 
130- 1 103 
213-3620 
132-1147 
142-132 1 
213-3617 
130- 1061 
213-361S 
146- 1350 

54-0 

41 -O 

51-0 

5 1 -O 

51 -O 

51 -0 

50-0 

5t -0 

56-0 

56-0 

57-0 

S6-0 

57-0 

56-0 

58-0 

56-0 

56-0 

56-0 

56-0 

56-0 

56-0 

56-0 

56-0 

56-0 

56-0 

57-0 

56-0 



156-1716 187-3141 139-3214 195-3401 212-3612 
150-1506 226-7662 



226-7665 



227-7712 
182-2746 
149-1441 
226-7671 
153- 1563 

54-0 

S4-0 
227-7702 
148-1371 
107-426 
136-1 166 
149- 1445 
200-3506 
158-2004 
156- 1727 
221 -4003 
141 - 1277 
164-2213 



182-2752 210-3574 210-3575 
210-3577 



1 60-2052 21 1 -3600 

130-1106 192-3276 194-3342 



148- 1375 
1 17-531 
142- 1331 
154-1631 

2 13-3615 
161 -2106 



150-1477 159-2034 160-2043 171-2455 186-3073 188-3172 189-3226 192-3312 213-3614 226-7641 
155-1656 157-1735 160-2041 162-2117 165-2237 172-2471 176-2547 181-2740 189-3212 192-3302 192- 



189-3237 189-3241 192-3304 213-3616 
159-2020 165-2261 165-2263 171-2462 171-2464 182-3O0O 189-3240 189-3242 192-3305 213-3617 



1 60-2044 
169-2412 



172-2466 182-3013 190-3257 192-3275 192-3320 213-3621 
171-2425 195-3400 213-3622 



160-2035 213-3620 

221 -3773 

146-1355 147-1364 148-1372 173-2504 192-3315 210-3575 



51 -O 
51 -O 



167-2325 

1 49- 1 462 157-1 740 
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169-2400 169-2405 169-241S 

157- 1743 

131 - 1 133 167-2330 



167-233S 
167-233S 
131 - 1 134 167-2331 



SO . RS 
SO . RST 
SDCLK 
SOI . 1 



SOI . 2T 

SOI . 3 

SOI . 4 
SOI .AT 
SOI . BH 
SOI . BL 
SOI . CH 
SOI . CL 
SOI . CP 
SOI . CW 
SOI . OB 
SOI . OL 
SDI . DP 
SOI . EO 
SOI . El 



12-0 

76-0 
104-377 
104-377 
137- 1234 
164-2154 
177-2550 
1 8 1 -2701 
164-3025 
1 96-3420 
1 1 6-5 1 S 
106-407 
106-415 

65-0 

63-0 

60-0 

65-0 

65-0 
65-0 
62-0 
61 -O 
61 -0 
60-0 
60-0 
60-0 
63-0 
SO-O 
227-7736 



100-355 
121 -725 
104-403 



101 -372 1 16-522 
130-IO73 137-1213 
106-41 1 111 -473 



124-102O 130-1114 140-1271 228-7774 

140-1266 163-2140 1E5-2233 179-2620 185-3052 196-3407 

117-532 121-731 137-1217 137-1226 137-1227 137-1230 137-1231 



137-1235 137-1236 137-1237 



1 12-475 

138- 1240 138-1241 



140-1252 140-1254 140-1256 140-1261 



137- 1232 
140- 1253 



138- 1242 140- 1251 

164-2156 164-2160 164-2162 164-2164 164-2166 164-2170 164-2172 164-2174 164-2176 164-2177 164-2201 164-2203 

177-2552 177-2554 177-2555 177-2557 177-2560 178-2570 178-2572 178-2574 178-2576 181-2673 181-2674 181-2675 

181-2703 181-2705 181-2707 181-2711 181-2713 181-2715 181-2717 181-2721 181-2723 181-272S 1 8 1 - 2727 1 8 1 - 273 1 

185-3027 185-3031 185-3033 185-3035 185-3037 185-3041 1 85 - 3043 1 85 - 3045 185-3056 185-3057 185-3060 185-3062 

196-3421 198-3423 196-3424 196-3426 196-3430 196-3432 1 9 6 - 3434 1 9 6 - 343 6 196-3440 195-3442 195-3444 



116-5 14 
106-4 1 8 



106-420 



106-422 109-443 109-445 113-501 

154-1634 155-1701 157-1747 211-3600 211-3601 

187-3141 189-3214 

150-1517 154-1631 160-2043 

154-1634 155-1701 157-1747 

154-1634 155-1701 157-1747 

152-1541 154-1634 155-1701 157-1747 227-7731 

62-0 62-0 62-0 62-0 62-0 62-0 



154-1634 155-1701 157-1747 



188-3204 

136-1176 159-2034 188-3206 

154-1620 164-2213 168-2344 171-2432 173-2475 182-2764 



63-0 
60-0 
60-0 



1 73-2502 

1 36- 1 1 70 155-1 675 

123-767 148-1431 



155-1701 156-1723 157-1735 157-1773 158-2004 160-2037 I65-22S5 I71-244S 



KDBOP DIGITAL EQUIPMENT CORP 

CROSS REFERENCE TABLE (CREF V01-08 ) 



2901 ASSEMBLER VERSION 32 PAGE S-34 



^•W^' 



SDI 
SDI 
SDI 
SDI 
SDI 
SDI 
SOI 
SDI 
SDI 
SDI 
SDI 
SDI 
SDI 
SDI 
SDI 
SDI 
SDI 
SDI 
SDI 
SDI 
SDI 
SDI 
SDI 
SDI 
SOI 
SDI 
SDI 
SDI 
SDI 
SOI 
SDI 
SDI 
SDI 
SDI 
SDI 
SDI 
SDI 
SDI 
SDI 
SDI 
SDI 
SDI 

SDI 
SOI 
SDI 
SDI 
SDI 
SDI 
SDI 
SDI 
SDI 
SDI 
SDI 



61 -O 
6 1 -O 
60-0 
63-0 
63-0 
63-0 
60-0 
63-0 
63-0 
61 -O 
61 -O 
6 1 -O 
63-0 
63-0 
63-0 
52-0 
61 -O 
63-0 
63-0 
60-0 
60-0 
62-0 
6 3 -O 
62-0 
60-0 
6 1-0 
6 1 -O 
61 -O 
60-0 
6 1 -O 
63-0 
63-0 
61 -0 
62-0 
62-0 
62-0 
62-0 
62-0 
63-0 
59-0 
60-0 
59 -O 
165-226 
60-0 
60-0 
63-0 
61 -O 
60-0 
6 1-0 
60-0 
61 -0 
63-0 
60-0 
6 1-0 



150-1 500 

61 -O 

61 -O 

63-0 

63-0 

63-0 

60-0 

63-0 

63-0 

61 -O 

61 -O 

61 -O 

63-0 

63-0 
226-7674 

51-0 
63-0 
63-0 
60-0 
60-0 



150- 1506 

81-0 

123-1000 150-1473 155-1667 166-2306 

187-3143 189-3215 

151-1526 1 76-2547 

149-1443 226-7674 228-7741 



189-2373 
169-2372 
228-774 I 



17 I -2433 



169-2413 182-2742 182-2776 
126- 1035 1S7- 1744 



63-0 

62-0 
60-0 

61 -O 
6 1 -O 
60-0 
61-0 
63-0 
63-0 
62-0 
62-0 
149-1457 



63-0 132-1151 169-2412 

122-755 130-1077 136-1172 154-1613 154-1633 155-1700 

171-2463 189-3240 

1 71 -246 1 189 -3237 

1 65-2237 188-3171 

159-2023 169-2364 187-3144 188-3161 189-3220 

121-737 136-1173 149-1460 193-1S77 155-1661 161-2074 227-7712 

136-1175 149-1457 153-1600 155-1660 



56-1715 157-1746 165-2260 171-2460 189-3234 194-336! 



63-0 
59-0 
60-0 
59 -O 
166-2276 
60-0 
60-0 
63-0 
61 -O 
60-0 
61 -O 
60-0 
61-0 
63-0 
SO-O 
81-0 



160-2035 

154-1611 155-1653 159-2032 164-2161 165-2235 172-2470 181-2722 189-3211 

121-711 132-1142 136-1203 148-1405 150-ISIO 153-1553 157-1757 158-1775 160-2047 160-2053 164-2167 165-2253 

169-2401 171-2442 179-2630 182-2767 194-3357 209-3571 

136-1166 136-1171 156-1726 160-2040 171-2455 

129-1055 160-2044 

188-3147 189 -321 6 

61 -O 

156- 1721 162-2117 

61-0 61-0 148-1411 148-1423 149-1434 162-2112 

123-771 123-777 148-1426 165-2240 171-2435 179-2603 

148-1414 159-2025 160-2064 

149-1455 152-1543 153-1546 153-1574 154-1610 160-2045 228-7742 
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SDI . V 1 


63 





63 









SDI . V2 


S3 





63 









SDI XH 


SO 





60 









SDI .XL 


so 





60 









SOI XR 


61 













SOIB. L 


64 





64 





65 





SDIBEG 


65 





65 





65 





SDICL1 


99 


3S0 


100 


361 


100 


365 


SDICL2 


99 


3S1 










SDICLK 


99 


345 


100 


362 


100 


363 


SDIRTY 


69 





157 


1752 


157 


1754 


SDIS 


06 





121 


704 


124 


1005 


SOITMO 


69 





226 


7665 






SDITO 


46 













SDITST 


83 


lOI 


S3 


106 


100 


354 


SDPF 


1 6 





87 


1 62 


109 


443 


SORO 


10s 


430 


1 14 


514 






SORRDY 


1 16 


522 


1 17 


530 






SOTIMO 


69 













SDWRT 


104 


374 










SEC 


25 





99 


353 


101 


367 


SECC 


16 





104 


376 


106 


41 1 


SECCT 


1 6 





104 


401 


106 


417 


SECSZ 


46 





65 





131 


1 125 


SECTR 


14 













SEEK 


69 





122 


761 


122 


763 


SEEKGS 


150 


1517 


1S1 


IS26 






SEEKL 


69 





150 


1521 






SEKPRV 


46 





48 









SEKSAV 


48 


o 










SE001 


78 


30 


81 


52 






SEQSRR 


76 


3 


76 


4 


76 


S 


SEOTST 


78 


22 


78 


22 






SEOUEN 


46 













SERIAL 


22 





9 1 


254 


9 1 


257 


SES 


42 


o 










SETCRY 


217 


'3630 


218 


•3660 


220 


3734 


SEX2SK 


48 


•0 










SF 


73 


-0 










SFERR 


70 





1 4 1 


■1301 






SFT20 


89 


-214 


89 


■236 






SGRPCD 


69 


-0 


151 


- 1530 


1 76 


2536 


SIMTST 


1 


•0 


83 


- 103 






SLAT 


59 


-0 


1 21 


-720 


121 


•721 


SM 


73 


■0 










SNGLOP 


217 


■3635 


218 


-3647 






SRM 


1 6 


-0 


104 


-402 


1 1 7 


-531 


SRSGEN 


1 6 


■0 


t 1 6 


-520 


182 


■3002 


SSE 


1 6 


•o 


104 


-375 


106 


-4 10 


SST 


42 


-0 










ST .ABO 


55 


-0 










ST . AVL 


55 


-0 










ST . CMD 


55 


-0 










ST .CMP 


55 


-0 











121-710 153-1565 160-2063 



o 



101 -370 



130-1062 153-1545 153-1555 195-3373 198-3465 227-7721 



130-1066 130-1110 131-1124 175-2S21 182-2756 185-3063 188-3176 195-3403 196-3452 205-3554 
109-442 178-2572 180-2652 180-2687 
109-446 164-2152 181-2701 196-3416 



154-1616 



1SS-1702 157-1763 168-2277 



119-541 224-74O0 226-7416 



122-757 131-1140 150-1515 154-1630 154-1642 154-1643 

140-1246 184-3017 

109-441 121-726 137-1216 140-1250 164-2151 178-2567 181-2673 184-3020 185-3055 196-3415 



\.-^ 
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ST .CNT 
ST. OAT 
ST . DRV 
ST.HST 
ST .MFE 
S T . MS K 
ST . OFL 
ST .SHF 



ST .SUC 

ST .WPR 

STARSP 

START 

STCACH 

STOALN 

STEP 

STEP1 

STEP2 

STEP3 

STEP4 

STEST 

STOP 

STOPCM 

STOPEN 

STORB 

STORCC 

STORE 

ST0RT1 

STRT. F 

STRTCO 

STS 

SUPF 

SUSP 

SWAB 

SWM 

SY 

SYO 

SY6 

SYNC 

SYNCH 

SYNCL 

T3 

T4 

T5 



55-0 
56-0 
55-0 
5S-0 
55-0 
55-0 
55-0 
55-0 
56-0 
56-0 
55-0 
55-0 
69-0 
114-514 
65-0 
46-0 
77- 1 1 
35-0 
35-0 
35-0 
35-0 



167-2323 

169-2400 169-2405 169-2415 

129-1056 131-1135 149-1462 157-1740 157-1742 1! 

129- 1056 



7-1743 167-2325 167-2327 167-2331 167-2335 167-2336 



56-0 


56-0 


56-0 


56-0 


57-0 


57-0 



56-0 


56-0 


56 


56-0 


S6-0 


56 


57-0 


57-0 


57 



56-0 
57-0 



S6-0 
S7-0 



56-0 
56-0 



226-76S6 226-7670 227-7730 

114-514 114-514 114-514 115-514 118-535 118-535 
65-0 

77-15 

38-0 79-33 80-40 



T7 

T9 

TEMP 

TEMPI 

TEMP2 

TEMP3 



220-3747 

218-3653 218-3665 218-3673 

219-3714 220-3744 

213-3621 219-3712 221-3762 221-3767 

143-1332 144-1341 145-1343 146-1351 

69-0 141 - 1300 143- 1332 

42-0 

15-0 15-0 15-0 

59-0 122-761 123-776 131-1130 155-1702 157-1765 160-2071 162-2111 165-2251 166-2275 169-2377 171-2444 173-2500 

194-3355 194-3364 

218-3662 218-3665 

16-0 121-724 130-1072 137-1212 163-2133 163-2143 163-2147 179-2613 179-2623 182-2765 185-3051 198-3406 

48-0 48-0 48-0 

48-0 

48-0 48-0 

50-0 50-0 137-1218 177-25S1 178-2571 184-3014 196-3411 

46-0 117-534 

46-0 117-533 

82-54 82-56 224-7407 

82-60 82-62 224-7410 , 

83-64 83-66 224-7411 ! 

83-67 83-72 224-7412 

83-75 83-77 224-7413 

83- 101 83-112 224-7415 

51-0 51-0 

48-0 48-0 

48-0 48-0 

48-0 48-0 



194-3345 



KDBDP DIGITAL EQUIPMENT CORP., 2901 ASSEMBLER VERSION 32 PAGE S-37 

CROSS REFERENCE TABLE (CREP V01-OS ) 



TEST 


12 


-O 


85- 143 










TESTBL 


1 2 1 


•703 


224-7404 










THEN 


1 14 


•514 


1 14-514 


1 15 


514 






TMOUT 


93 


-271 


94-276 


94 


303 






TMR . BS 


50 





50-0 










TMR.MC 


50 





50-0 


150 


1477 






TOPOL 


59 





226-7651 










TOPRSP 


99 





226-7652 










TPOIO 


10S 


41 1 


114-5 14 










TP01 1 


109 


417 


114-514 


1 14 


514 






TP0I2 


1 09 


442 


115-514 










TP013 


109 


451 


115-514 










TP014 


108 


432 


1 18-535 










TP01S 


1 18 


535 


1 18-535 


1 1 9 


536 






TPOI 6 


108 


432 


1 18-535 










TP017 


1 13 


503 


114-514 










TSBRPE 


92 


264 


93-266 










TSCRPE 


77 


13 


92-264 










TSTCNT 


17 





76-7 


79 


31 


80 


43 


TSTHNG 


77 


1 4 


77-14 


77 


1 6 


77 


1 7 


TSTRTN 


84 


1 16 


84-117 


84 


120 


84 


121 


TSTXL 


84 


127 


85- 142 










USK 


21 















UBAR 


17 


O 


95-304 


95 


31 1 


95 


312 


UBURST 


49 


o 


49 -0 










UCRO 


IS 


o 


18-0 


IS 









UCRS 


18 





18-0 


IS 









UCSREN 


43 















UDA1 


73 















UOO 


IS 


o 


1 8-0 


1 8 


o 






UOOI 


17 





7S-3 


76 


10 


77 


12 


UOS 


IS 





18-0 


18 









UER 


1 7 





80-44 


83 


74 


84 


122 


UP. 578 


S3 















UF.CMR 


S3 





63-0 










UP . CMW 


S3 





63-0 










UP.MSK 


S3 















UF .RMV 


S3 















UP.RPL 


S3 















UF .WPH 


63 





147-1361 


159 


2026 


159 


2030 


UF .WPS 


63 





147-1361 










UMP 


13 















UMPN 


12 





7S-5 


76 


6 






UN . BUF 


65 


o 


65-0 


228 


7737 






UNC . RM 


63 





159-2024 










UNC ,SS 


61 















UNERR 


70 





156-1712 


157 


1737 






UNITF 


46 















UNLOCK 


121 


726 


153- 1573 


154 


1 643 


154 


1650 


UNSUCC 


69 















UP . XFC 


228 


7760 


226-7760 


228 


7760 






UPF 


13 















UPROC 


13 















UO.CNT 


53 
















81-51 
78-22 
84-124 



91 -257 1 1 6-524 



159-2014 160-2070 162-2111 179-2631 208-3570 
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URETRY 
UTEMP1 
UTMP 
UWMCI 

V . ATT2 
V .ATTN 
V . AVAL 
V . CM0 1 

V . D C L R 

V DCON 

V . DRVC 
V .ERRO 

V . ERR1 
V .ERRC 
V .ERSK 

V . GCHR 
V . GCR1 
V . GCR2 

V . GSTA 

V . INIT 

V . NULL 
OLRD 
ONAV 
ONLN 
RVC3 
RVC5 
RVC8 
SEEK 
SKON 
STAT 
SUCH 
TOPO 

V. 2ATT 

VAX . PG 

VAXINT 

VAXO 

VC . CMO 

VC .DMM 

VC . LOG 

VC RSP 

VECT 

VECTAB 

WAIT 

WCI 

WD 

WMCI 

WRAP 

WRC 

WRFST 

WRITCO 

WRITE 

WRNXT 

WRRDX1 

WRRDXR 



226 

127 

128 

227' 

226 

153- 

132 

171 

1 23' 

158 

158 

153 

155 

155' 

126 

156 

227 

227 

129 

129' 

22 6 

226 

132- 

133 

150 

153 

I 34 

135 

227 

50' 

21 

48' 

52 

52 

52' 

52 

59 

226' 



15' 

69- 
40- 



7661 

1053 

1054 

7675 

7S53 

I S07 

1 144 

2453 

775 

2003 

2003 

I 607 

1 657 

1 657 

1052 

1731 

7710 

771 1 

1060 

1057 

7644 

7 6 45 

1 1 60 

I 163 

1513 

1607 

1 1 64 

1 165 

7734 





O 
7S43 



123-1001 166-2307 171-2434 



227-7712 
226-7655 
227-7721 

226-7857 

154-1632 227-7732 

226-7643 

226-7655 

227-7705 

158-2010 226-7661 226-7661 

I5S-2010 226-7664 

227-7735 

228-7737 

228-7742 

227-7727 

171-2454 226-7654 

227-7710 



227-7724 
227-771 1 



226-764S 
ISO- 1513 
226-7SS5 
153- 1S07 
227-771 4 
226-765 1 



226-7664 227-7702 227-7704 



154-1 S32 227-7731 



122-761 122-762 123-776 136-1206 160-2071 162-2111 
SS- 153 87- 156 



104-400 184-3022 
69-0 69-0 193-3333 
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WRSND 

WRT 

X .SSDI 

X .SSDS 

X . SSDT 

X . SSOX 

X .SSTA 

XSNCOO 

X8NSTR 

XCMP 

XF . REP 

XF04A 

XF1 1A 

XF1 1B 

XF1 1C 

XF1 ID 

XFC01 

XFC02 

XFC03 

XFC04 

XFC05 

XFC06 

XFC06A 

XFC07 

XFCOS 

XFC08A 

XFCOSB 

XFC09 

XFC10 

XFC1 1 

XFC12 

XFC1A 

XFC1ER 

XFCSA 

XPCS8 

XFCFIN 

XFCMAX 

XFCPAS 

XFCRET 

XFCRTA 

XFCRW 

XFCSST 

XFCTAB 

XFCUPR 

XRWRER 

XSSTAA 

ZFLG 

2R0 



15- 
24- 
124 
1 24- 
1 21 
1 21 
124 
46 
46' 
59 
131 
199 
206 
206 
206 
206 
1 95 
1 93 
198 
199 
200 
201 
201 
202 
203 
203 
203 
204 
205 
206 
207 
1 96 
196 
200 
200 
221 
221 
221 
197 
221 
1 98 
I 65 
203 
221 
228 
196 
124 
223 
13 
84- 
119 
1 23 
131 
1 48 



1004 
1007 
71 1 
706 
100 6 



1 1 26 

3472 

3561 

3582 

3580 

3565 

3367 

3463 

3463 

3471 

3477 

3510 

3516 

3530 

3541 

3S44 

3545 

35SO 

3553 

3556 

3566 

3407 

3445 

3500 

3504 

3776 

377S 

3777 

3460 

4005 

3463 

2233 

3543 

4001 

7756 

3406 

1016 

4020 

O 

127 

537 

775 

1 132 

1 420 



184- 
199- 
124- 
124- 
124 
1 24' 
1 65 

122 

195 

199' 

221 

206 

206 



3021 196-3410 

3471 200-3477 202-3530 203-3541 204-3550 205-3553 

1012 

1006 125-1030 188-3202 188-3203 

1005 124-1007 

1012 124-1013 124-1015 125-1022 125-1024 188-3200 188-3201 

2256 



Km^ 



761 

3405 

3474 

400O 

3563 

3554 



131-1130 157-1765 161-2103 166-2277 169-2377 171-2444 194-3355 



228-7744 



228- 
228- 
228- 
201 - 
228 - 
228- 
203- 
203- 
228- 
228- 
228- 

19 6- 
19 6- 
200- 
200- 
228- 
228- 
228- 
204- 
221 - 
228- 
171 ■ 
203- 
228- 
228- 
196- 
124- 

78- 

84- 

12 1- 

124- 
131 - 
149 • 



7747 
7750 
7751 
3526 
77S2 
7753 
3546 
3S47 
77S4 
7755 
77S6 228-7757 



3452 
3447 
3505 
3506 
7760 
7760 
7760 
3552 
4010 
7745 
2427 
3547 
7744 
7760 
3451 
1020 

26 



197-3462 

228-7760 
228-7760 

221 -4006 

228-7746 

196-3454 197-3461 197-3462 199-3473 200-3507 201-3516 201-3520 201-3522 201-3523 201-3525 201-3527 202-3540 

205-3555 206-3564 

228-7756 228-7760 

228-7760 228-7760 

197-3461 

124-1021 



82-54 



82-57 



82- 60 



83-63 



83-64 



83-67 



83-70 



83-75 



83-100 



83-101 



83- 



130 84-134 85-140 88-172 88-202 88-204 91-260 91-262 95-313 98-327 111-464 113 

70S 121-715 121-721 121-724 121-727 121-732 121-734 122-744 122-757 122-761 122-762 122 

1014 124-1017 126-1036 126-1041 126-1043 126-1046 t26-1047 126-1050 126-1051 126-1052 129-1057 130 

1133 136-1201 137-1210 137-1213 137-1220 137-1221 137-1222 142-1315 145-1344 145-1345 146-1354 147 

1450 149-1462 150-1472 150-1512 150-1513 151-1533 153-1552 1S3-1S55 153-1557 153-1561 153-1570 153 



1 1 3 
477 
766 



84- 123 
114-511 
123-770 
1075 130- 1 107 
1362 148-1401 
1602 153-1607 
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154-1615 154-1616 154-1640 156-1704 156-1712 156-1714 158-2001 158-2002 158-2003 158-2006 160-2051 

161-2104 162-2114 163-2124 163-2131 163-2141 164-2212 166-2316 169-2356 169-2357 169-2360 169-2361 169-2366 169-2371 

169-2407 171-24S3 174-2510 174-2513 175-2522 175-2523 175-2524 175-2525 175-2526 17S-2S30 175-2531 176-2540 179-2604 

179-2611 179-2821 180-2634 180-2640 180-2664 182-2742 182-2774 182-3000 182-3012 184-3016 185-3030 185-3032 

185-3040 185-3042 185-3044 185-3046 186-3066 186-3070 187-3077 187-3110 187-3112 187-3122 187-3126 187-3143 



160-2056 161-2076 161-2077 
169-2375 
1 79 -2607 
185-3036 
188-3175 



185-3034 
183-31 73 



188-3204 189-3222 190-32S1 190-3266 193-3335 194-3344 194-3350 196-3406 196-3413 196-3451 197-3457 198-3467 200-3504 201-3516 
201-3522 201-3525 201-3526 203-3545 210-3573 210-3S76 217-3633 217-3636 217-3641 217-3645 218-3650 218-3653 219-3677 219-3714 
220-3720 220-3724 221-3775 221-4013 221-4015 
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._2 HC-.« 
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m'. 
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DC 
O 



CM 

I 
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:: x : 
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■x^:-: 


:-:-:;■ 


_l 






U_ 


'■•:■:• 




s 


:■'■:■:■' 


xx; 


IT 


. :;;■■::■": 




o 

li. 


'St 


■x- 


in 


Xx x 


■:'■:■- 


u 


.Ixx 


':':';■ 


I/) 






_J 


:':■:■■'■■ 


: ix 




: : X : x : 


xx 
:x 




.;.'. 






■xi;;":. 


t!: 



ex;.-- :"xx 



cl 



,■;•: -,-:■ k' 
X ,. ... 



MM 



II 



LAYOUT 

P1320 



■■ ;;■;•:> : . : : : x : : .: : : 



®Mi®m& 



TIME QUEUED 



OVERLAY 

CONDENSED 






:':■. ■ ■■ :■:.:: . 

::■■■■■. ..'.:. .: 

X- ::XX:XX : ;: : XX\.. X X-: 



mmmmm 



PAPER TYPE 

3 HOLE 



TIME PRINTED 

7-SEP-88 08:02 

FILE TYPE 

DEFAULT 



■-,: llxllll 



in 

CD 
Q 



Ixx'^xx-: 

; xf ■'■'.■'l' : 
:,.■;;; ; : ;xx. 






Islllllii 



COPIES 

0001 






I'-"::-;-:--::-:.:: 
X? X 










Vllllll-!: 



;;■:;.:. X .Xx 
!HxX;SS:;:4SSs 

■:-:;.v^:.:.:.:-:.:.:.:.vv 






: : : : : : : : : : : : ; : : : : : ; : : : : : ; : : : : 





PAGE 


008 . . . 


. . KOB MICROCO 




PAGE 


008. . . 


. . HARDWARE/SO 




PAGE 


015 . . . 


. . CONTROLLER 




PAGE 


071 . . . 


. . KOB U-PROC 


^^x 


PAGE 


140 . . . 


. . U. PROC IDLE 




\PAGE 


142... 


. . U . PROC IDLE 


1 


JPAGE 


146. . . 


. . UN I BUS/0- BU 


PAGE 


181 .. . 


. . SEEK OROERI 




PAGE 


no. . . 


. . MSCP AND OU 




PAGE 


223 . . . 


. . U . PROC BUFP 




PAGE 


224 . . . 


. . BUFFER CONT 




PAGE 


229 . . . 


. . U . PROC WRIT 




PAGE 


234 . . . 


. . U . PROC READ 




PAGE 


245. . . 


. . READ RECOVE 




PAGE 


250. . . 


. . I/O PARAMET 




PAGE 


253. . . 


. . EDC CALCULA 




PAGE 


261 . . . 


. . U.PROC XFC 




PAGE 


2S9 . . . 


. . U.PROC AND 




PAGE 


307 . . . 


. . OOA ECC COR 




PAGE 


320. . . 


. . U.PROC REVE 




PAGE 


329 . . . 


. . HARDWARE/SO 






01 -Sep- 1988 



From: SSOEVO : : TEDONE "Matt 0TN:522-2254 CX01-2/N26 

To: GWYNED : : GANESAN 

Subj : KDB U proc listing (BI stuff) 

DE 

FTWARE DEFINITIONS AND EOUATES 
RAM AND EOUATE DEFINITIONS 
DIAGNOSTICS 8 INITIALIZATION CODE 

LOOP, PORT ROUTINES, SEEK ORDERING 

LOOP 
S PORT ROUTINES 
NG ROUTINE 
P COMMAND ROUTINES 

ER ALLOCATE, READ, AND WRITE ROUTINES 
ROL BLOCK ALLOCATION ROUTINE 
E AND ERASE ROUTINE 
.COMPARE, ACCESS ROUTINE 
RY ROUTINE 

ER CALCULATION ROUTINE 
TION ROUTINE 
ROUTINES 

D.PROC SUBROUTINES 
RECTION ROUTINE 
CTORING PROCESS 
FTWARE VECTOR TABLES 



1 -SEP- 1988 17:36 
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CONDITIONAL ASSEMBLV EOUATES 

********************************* *. ****************** 
EOUATES FOR CONDITIONAL ASSEMBLY CODE 

**************************************************** 



000002 
OOOOOO 
00000 1 
000002 
OOOOOO 
OOOOOO 
OOOOOO 
000003 
OOOOO 1 
00000 1 
OOOOOO 



CSTYPS 


2 




$SUOA 


: 


$$KDA 


= 1 


$$KOB 


3 2 


LAB 







WRAP 







C0PY4 







D . E . C . 


3 




ODADM 


1 




OREVB 


1 




SIMTST 








CONTROLLER TYPE; 



UDA, 



1 



KOA , 



LAB LOOP ON TEST CONTINOUSLY = I. NOT FOR LAB USE : 

WRAP TEST : 1 (LAB MUST t 1), NO WRAP TEST = O 

O . NORMAL 2 COPY HEADER COMPARE. 1 = ALL 4 MUST MATCH 

,0 i NO DM IN KDA, I : OM IN KDA 

,0 = KDA PRIOR TO REV B, 1 = KDA REV B OR AFTER 

.0 : NORMAL CODE, I a ASSEMBLE SIMULATE TEST (KDB) 



o 
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PAGE 
UDA CONTROL MEMORY 

47 48 45 44 43 42 41 40 39 33 37 39 35 34 33 32 

H--- + H + --H + -- + --H 4 

(CRY! AO ! AP ! AS 1AS1CE! RB ! 
+ ---0 0-- + -- + --0 4 



31 30 29 29 27 28 25 24 23 22 21 20 19 18 17 18 
H 4- -H N 4 

! ! IOC ! RA/tBS) ! 



o 



LITERAL IF ABi 1 




IS 14 

- - - 4- - 4 

S ! EN ! 



13 12 11 lO 09 OS 



07 O 
H 

BRANCH A 



6 05 04 03 02 01 00 
-H 4 

DDRESS (BA) ! 



CRY 
AD 



AF: 
AF = 

ALU 



2 

3 

ALU 



BUS AB 

RB 

BD 

RA 
[BS] 
IOC !P 

IOC 

LIT 

BRANCH TEST 



1 > 
ALU 
B PO 
BUS 

A PO 
BUS 
IOC 
INPU 

8 SI 
3 BI 



0-2 

3-7 

DEST 

ALU 

ALU 

ALU 

ALU 

FUNC 

ADD 

SUB 

SOUR 

RA, 

RA. 

TO D 

RT R 

DEST 

RT R 

SOUR 

ENAB 

T OU 

T L I 

T LI 



CARRY 
HIGH 
INATI 
-> 
-> 
-> R 
-> R 
TION 
R4S 
S-R 
CE = R 

RB 

ATA B 
EGIST 
INATI 
EGIST 
CE 
LE 

TPUT 
TERAL 
TERAL 



INT 
BYTE 
ON 

OB 
B 

S, R 
B.OB 



ALU 
LITE 
(ALU 



RAL SELECT 

IB IF AB: 



1* 



«DB: DATA BUS* 



ALU -> OB 



ALU -> OB 



US; 
ER, 
ON 

ER 



4> ALU/2 -> RB, 0/2 
5= ALU/2 -> RB, ALU 
DB 6: ALUX2 -> RB, 0x2 
7: ALUX2 -> RB, ALU 
T HIGH BYTE LITERAL WITH AP: 
2: REVSUB R-S 4> R AND S 
3= R OR S 5* NOT R ANO S 7i 
•CHOOSE RA OR BS OR LITERAL AS SOURCE* 
2:0.0 4= 0, RA 8>0. 

3: O.RB 5: D.RA (RAiRB! 7= 0, 

0: BS SRC ON BUS, 1: ALU AS BUS SRC , ENB LITERAL 
ALSO A PORT IF AS: 5 OR 7 



-> 0, 
DB 
-> 0, 
-> DB 

3-7 AND CRY: 
6: R XOR S 
XNOR S 



!RA:RBI 



« [ AB: 0/1 1» 
« IF AB: 0» 
0: DISABLE 



CONTROL SELECT (SPECIAL OPERATION) 

TO 
TO 



LOW BYTE 
HIGH BYTE 



IF CRY: 
IF CRY: 1 



AND AF: 
AND AF: 



0-2 
3-7 



TEST SENSE: 0: JUMP IP TEST LOW (•). 1: JUMP IF TEST HIGH (4) 
TEST CONDITION SELECT , ELSE CONTINUE TO PC41 

ENABLE CONDITIONAL EXECUTE PER CE BIT 38 O: DISABLE, 1: ENABLE 
CONDITIONAL ALU EXECUTE ON TEST RESULT 

0= EXECUTE IF TEST FALSE (FAILS), 1. EXECUTE IF TEST TRUE(PASS) 
JUMP OPERATION 

0: JUMP 1 3 SA# OFFFH : JUMP TO SUBROUTINE 

1 3 BA: OFFFH : RETURN FROM SUBROUTINE 
PARITY BIT FOR OOD PARITY 
BRANCH ADDRESS 
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D 
< 

3 

a 

M 

2 
cc 
O 

LU 

w 
o 
to 



INSTRUCTION 
LABEL 
LABEL 



FORMAT 
ALUO 
ALUO 
ints 
ex t s 
dSt : 
bd : 
mod : 



TYPES; 

LABEL 
LABEL 
LABEL 
LABEL 
MNEMONICS; 
ALUOP: ADO 
COM 
MOVB 
SUB 
JUMPOP: JUMP 
CALL 
RETU 
TEST 
AZTEC 
INNER INSTR 



»#L 
ALU 
ALU 
ALU 

ALU 
ALU 



»\mod 
»\mod 
•ci 2 

'c: 

2901 

2901 

\F = 

\0: 

\L = 

\R = 
: 1 it 

10 
r : up 
INSTR 

> RA, 

> (BS 

> # L 
» ##L 



ints 

lext 

901 in 

ex 

i nt er 

ext er 

execut 

out put 

rotate 

rot at e 

era 1 

Her 8 

per 8 

UCTION 

RB, 

I , RB, 

IT.RB, 

IT.RB, 



The 
anoth 
ar e t 
bus o 
end o 
are c 
s i gna 
i nst r 
act i v 
act i v 



AD 

AD 

RN; 

( .♦ 

ONL 

UCTI 

igna 
er . 
est e 
per a 
f th 
hang 
1 UP 
uct i 



ADDC 
COMB 
MEG 
SUBC 

DRESS; 

DRESS; 

1 ALWA 

Y: 

ON TIM 

1 SEO 

All t 
d at t 
t i ons 
e i nst 
ed jus 
ROC H 



ANO 
DEC 
NEGB 
SHF 



rc\mod 
src ) 
t er na 1 
t er na 1 
na 1 de 
nal d 
e f als 

RA 

ALU 1 

ALU r 
our ce . 
bit 1 i 
bit 1 i 

FORMA 
BO G?I 
BD 010 
BO PIO 
BO PIG 

BIC 

OECB 

NOP 

SHFB 

JMP 

JSR 

RET 



dst 
dst 
sou 

SOU 

St i n 
st i n 



\mod , 
\mod , 



(Pi oc 
(Pi oc 



■/.JUMPOP test, address 
7.JUMPTEST address 



rce 
at i o 



eft 
ight 
Can 
t era 
t er a 



n RB 
at i on BO 
\T = 

\N = 
\L0 
\R0 
be 



execute on true test condition 

no write to ALU 
: shift Q left 

shift pi ght 
like ##LIT ex. <bit004bit04> 
1 with upper 8 bits : zero. 
1 with lower 8 bits : zero 
RCE MOOE OPERATION 
iSter RA OP RB-> RB 
a bus (BS)OP RB-> RB, BS->BD 
hi literal # LIT OP RB->RB,BD 
er literal ##LIT OP RB->RB,BO 



on . 



UPROC 
A s i mp 



YS); 
RTN 

INC 

CLK 

i mi n 

he b 

are 

r uct 

t a 

def 1 

PROC 

H i 

lift 



JMP I 
RELATIONSH 
L determin 
g is refer 
eg i ni ng of 
loaded i nt 
i on . The 
little pr i 
nes which 

: 1 (UP 

(UPROC L 

t ining 



sou 
; r eg 
; dat 
; 1o/ 
; upp 

BIS 

OECC 

OR 

TST 

J 

CALL 

RTN 

T- 

INT 



BIT 
INC 

ROT 

TSTB 
J- 
C 
R 



CMP 
MOV 
RSUB 
XNOR 



pro 
ROC 



the start of 
ad to this si 
e i nst r uct i on 
nternal or ex 
ERFACE OUTPUT 
to the the re 
cessor is act 
L : J means 
1 ] means the 
at i onsh ip is 



CLR 
INCB 
ROTB 
XOR 

C- 
R- 



one instruction from 
gna 1 . Branch conditions 

The results of ALU and 
ternal registers near the 

CONTROL (IOC) signals 
gister loads. The 
ive during the present 

the UNIBUS processor is 
DRIVE processor is 
shown below. 



SEO CLK L 
UPROC H 



INSTRUCTION 

REGISTER 

INSTRUCTION 



UNIBUS PROC 



ORIVE PROC 



UNIBUS PROC 



4-- LOAD REGISTERS 
---- CHANGE IOC'S 
TEST BRANCH CONDITION 
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CLOCK H -•••' -•■" '•■'• 

F/F 1 H --+5S+- 1 18-+ + ■ 



► + ++ ++ ++ ++ ++ ++ ++ ++ ++ ++ ++ ++ ++ ++ ++ ++ ++ + + 
! ! M ! '■ ! ! ! ! M 1 ! M ! ! ! ! ! ! M ■ ! ! ! ! j n i i i i i i 



4 + + + 



F/F 2 H --+ 
CLK ENB H +- 



- - + 
; (K.SDI CLOCK IN H) + - 



SEO CLK L -+ 



+ 58 + - 1 1 6 -+ + 



-+S8+- 1 1S-+ + •* 



-+58+- 1 1S-+ + - 
+--+ +--+ 



+ --17* + 

UPROC H - -+ +-- 174-- 



+ - - + 
- + + - 



l- + 



+ - - + 
- + + ■ 



-.-.+. + . . 



* + +- 
+ - - + 



..+....--..+.... 



SEO ADR H I/////U+1 I/////D+1 !/////U+2!/////D+2! /////U+3I/////D+3! 



PIPELINE --+- 
ADDRESS REG! 
PADR H --+■ 

PIPELINE --+- 

REG-CURRENT ! 
INSTRUCTION+- 



U+1 ! D+ 1 



....__-.+__„.__„„+____ 



U+2 ! 0+2 I U+3 



■-------+---- 



U+2 ! D+2 
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Common K.SDI, K.DISK, K.???, UOA Terminology 

1 . Prefix all clocks with CLK. all bus sources with RD, all bus 
destinations with LD. 

2. Have common page order ie ALU, CLOCKING, BRANCH, SEO, PAR, CROM etc 



; K. DISKs CLOCK IN H-+ 
iUDAs CLK ENB H +- 



CLK ENB1 H +- 



CLK ENB2 H 



CLK ENB3 H 



CLK ENB4 H 



CLK ENB5 H 



SEO CLK L -- 



+ 



----- + 



+ + 



+ 



DLY UPROC H 



PROCCLK L - + 



•-------••--+ 



LD CLK L 



CLK BDR H 



- + - + • 

! /! 
■ + - + - 
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RELATIVE TIME-3S -30 -2S -20 -IS -10 -S 



CLK BDR H 
P2- 17 



HO +1S +20 +25 
! < 10. S/21 .75 



-♦ <-- 57/58 --> 



SEOCLK L 
P3-2 



PROCCLK L 
P3-4 



BO DECODE 
P3-S 



CLK ENB L 
P3- 19 



<- - 57/58 - -> 
< - - 57/53 - -> 



S< 4 . 5/9 .0 



> ! 



1 9 . 75/34 

S< 16.75/38 



<- - 57/58 - -> + 

----- + 

> ! 
+ <-- 57/58 --> 



S< -S2/-31.S 



SOURCE DATA 
P3-8 RD BSO L- 



OATA BUS 



DEAOBAND L 
P3- 10 



///////////I 



>S 
>S 



! < 5 . 25/19 .5 

!< 4.25/29 
> ! ! < 10/21 .75 



SI II 1 1 1 1 1 II 1 1 1 1 1 1 1 1 1 1 1 1 1 1 II 1 1 1 III 



>S ! < 1 .75/5. 5 

> I ! < 10/21 . 75 



o 
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**2901 MICRO PROCESSOR TIME SHARED AS TWO PROCESSORS** 
INTERNAL BUS + * 

***** ******** 



•16 BIT IN 



* L 

-o u 

* 

* M 

* U 

* X 



***** 

* B « 

* U * 



! * S 
! * 

► - -r o 

* R 

* - - A V 



< 

a 

ii 

2 
cc 
O 

LL 

(0 

o 

V) 



* *** 

TES 

*SYN 

*REG* 
PAR 



T/*-- 
C** 



• - -+> - A * ! ********************* 
t- - - - D * ! * 

! i * * ! * *********** * ** * * 

I I ***** ! * * DAT A/ LITERAL B<- ■ 

! + + * * MUX * 

f -16 D Y CRY SELECTS A<-- 

* * HI/LO BYTE A<-- 
************* **************** 
-12 BIT ADDRESS-TEST SE L ECT - JUMP - - 

* 29 1 1 * * ***** 4Kx4S ***i 
USEQ * - - + * * * * * 

******* | * p * *C* *P 

+ * A *-12-* R *-48-* R 

*2911** ! * R * * * * 
DSEO * - -■+ * * * M * * 



t 6 

8-GND 



***** 



***** 



******* * * |_ G * * * ! ********** 
« UAR *--+->* ANTIL0G-12->+>* CONTROL*>-- 
K****** i **CONST* ****REG*** 

******* +->UNIBUS 

* UDR * > INFC 

******* 



•16 BIT BI DERECTIONAL EXTERNAL BUS--*-* 

******** ***** 4Kx 1 6 I 

-12->* UBAR *--+ * * * B * ! 

******** i * M * * U * ! 

+--* U *--->* F *<-->+ 



I ******** I 
+ - 1.2-- >■* DBAR * - - + 



* F * 

* E * 
**R** 



* * E C C * * ******** 
+->RSGEN>--+->ECCRSD*-16 
! ******* I *STATUS* 
+ 10 + 

i ******** ******** 
<->SERDES>+--<SERDES*<16 



+ > tO*BIT* 



+ > 1 6*BIT* 



i 



*********** 
->*RTCS/RTDS*-PORT->SDI X 4 

***REG***«* INFC 



-NRZ-DATA-+- - 1 •* 

-NR2 DATA 1 - + 



t r> 
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Q 
< 

D 

o 

II 

2 
cc 
O 
u. 

W 

o 



o 



PAGE ADDRESS 



A0R*6= WAS 

PATCH 

(OCT) (OCT) 



SHOULD 8E 



TYPE 
CHANGE 
PERM TEMP 



DESCRIPTION 



■*■ -- + - -+------.-+-- + -.._. + ..-.+ 

! ! ! < ! ! J 

+ + + + + ... - + ---- + 

! t i i iii 

+■ + + -- + + - - - - + - - - - + 

I t j I | i i 

+■ + + + -. + --_-+,_ -V- + 

I | j I III 

*...._.-.. + -...,,..- + -.. + . + ._. _ + ._._ + 

I I j I I l l 

■*■ --. + . -- + -- + +.._-+___.+ 

1 ! ! ! ! ! I 

■*■ - + - ..+_.....__+. +_.__+___.+ 

ji I i iii 

+ . + -.. +........+.... + .... + ....+ 

I I I I ill 

+ - + ..+... + . . . _ + _. ._ + ....+ 

! ! ! ■ ! ! . ! 

+ _...■_.■... + __■_....■_._ _:+ + .-.. +....+....+ 

! ! ! !■'"■'■ ! ! ! 

4......... + ........ + _-..._,. + ,.._...... + .... +.._.+ 

j I I I I j j 

+ .--.-..- + -.----.. + -.. ..... + _......... + .... + .... + 

!'■.'■■■'!" ! ! ! ! ! 

+--------+ _. + .. . + ... + _ _.. + .._ _ + 

! i \ ! ! ! ! 

+ _+__-_-...+.._ + .. +..._+__..+ 

I I j I j I j 

+■ -- + + + + - -■- -*- - - -4 

! ! ! < ! ! < 

4- + - + + +----+- + 

i i j i ill 

+■ + + -- - + ..+....+ .+ 

! * !"-■". < ! ! ! 

+■ + - + - - - - - -■-■■- .+ . + .... + .... + 

i i i i iii 

+■.....,.*.-■.--■-.-+.--------+■.--- ...___ + .... + . ...._ + i .. . _ + 

i ) j i j I j 

+ - + - -+ + + - - -:-+ - -.- -.+ 

I 1 j I I | | 

+ -------- + - + .. + .. + _... + ....+ 

! ! ! < ! ! i 

+■----.---- + -- + +--- + .... + ....+ 

! '. ! ! ! ■ I I 

+■- + - + - + + .... + ....+ 

! ! ! < ! :'.'■} ! 

*,......._ + ........ + .... . + i. ._...... + .. .. + ....* 
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USING 


THE 2901 


ALU AS A 


COMPARITOR 














* 








LOGICAL 


OPERATIONS 
















FUNCTION 


OPERATION 




TEST CONDITION 






RESULT 






RA = 





MOV 


RA.RB 


ZRO 


• TRUE 






RB 


: R/ 








RA # 





MOV 


RA.RB 


ZRO 


= FALSE 






' 








RA - 


RB 


XOR 


RA.RB 


ZRO 


= TRUE 






RB 


: RA 


XOR 


RB 


RA # 


RB 


XNOR 


RA, RB 


ZRO 


: FALSE 




RB 


: RA 


XNOR 


RB 








ARITHMETIC OPERATIONS - CARRY 


N OFF 








SAME 


SIGH 


XOR 


RA, RB\N 


NEG 


= TRUE 


- 


RA 


XOR 


RB 


- > 


BO 


P-P.N-N 


DIFF 


SIGN 


XOR 


RA, RB\N 


NEC 


= FALSE 
P-P.N-N 


P - N , N 


RA 

P 


XOR 


RB 


- > 


BD 


P-N, P-N 


RA < 


RB 


SUBC 


RA, RB 


CRY 


: TRUE 


TRUE 


RB 


-RA- 


1 -> 


RB 


BD 


(BORROW) 


RAX 


RB 


SUBC 


RA, RB 


CRY 


= FALSE 


TRUE) 






' 








RA > 


RB 


(RSUBC) 


RA, RB 


CRY 


: TRUE 


FALSE 


RA 


■RB- 


1 -> 


RB 


BD 


(BORROW) 


RAO 


RB 


(RSUBC) 


RA.RB 


CRY 


= FALSE 


TRUE 




















ARITHMETIC OPERATIONS - CARRV 


N ON 


















P-P.N-N 


P-N, N 


P 












RAO 


RB 


SUB 


RA.RB 


CRY 


• TRUE 


FALSE 


RB 


-RA 


-> 


RB 


BD 


(SORROW) 


RA > 


RB 


SUB 


RA.RB 


CRY 


= FALSE 


TRUE 














RA : 


RB 


SUB 


RA.RB 


ZRO 


: TRUE 


TRUE 


RB 


•RA 


- > 


RB 


BD 


(BORROW) 


RA * 


RB 


SUB 


RA.RB 


ZRO 


= FALSE 
P-P.N-N 


FALSE 
P-N. N 


P 












RA> = 


RB 


RSUB 


RA.RB 


CRY 


= TRUE 


FALSE 


RA 


-RB 


-> 


RB 


BO 


(BORROW) 


RA < 


RB 


RSUB 


RA.RB 


CRY 


: FALSE 


TRUE 














RAM 


RB 


CMP 


RA.RB 


CRY 


: TRUE 


FALSE 


RA 


-RB 


- > 




BD 


(SORROW) 


RA < 


RB 


CMP 


RA, RB 


CRY 


= FALSE 


TRUE 






' 








RA i 


RB 


RSUB 


RA, RB 


ZRO 


= TRUE 


TRUE 


RA 


-RB 


- > 


RB 


BD 


(BORROW) 


RA * 


RB 


RSUB 


RA, RB 


ZRO 


= FALSE 


FALSE 






' 









I 



NOTE: ADDITION CRY = TRUE MEANS ADO ONE TO NEXT HIGHER 16 BITS 

SUBTRACTION CRY = FALSE MEANS BORROW ONE FROM NEXT HIGHER 16 SITS 

RAs REGISTER A SOURCE RB: REGISTER B SOURCE , OEST I NAT I ON 
RB\N = REGISTER B SOURCE, NO LOAD 

P-P: POSITIVE MINUS POSITIVE P-N: POSITIVE MINUS NEGATIVE 

N-N: NEGATIVE MINUS NEGATIVE N-Ps NEGATIVE MINUS POSITIVE 

RA>: RB <::> RBO RA RA < RB Os> RB > RA 

COMPARITOR EXCEPTIONS; 

1. MAXIMUM POSITIVE NUMBER IS 32767 (HIGHER CHANGES THE SIGN BIT) 

2. DIFFERENT SIGNS IMPLIES AN EOUATE IS NOT POSSIBLE EXCEPT 
FOR ZERO SINCE IT HAS THE SAME VALUE POSITIVE OR NEGATIVE. 
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PROCESSOR RESTRICTIONS - SUMMARY 



PAR REGISTER - When loading the PAR register, ne i t her sour ce may be 
changed to allow the address to be stable to the very end of the cycle. 
2. Loading the PAR register must be unconditional to allow the pull-up 
resistors enough time to get above the threshold voltage. 



a 
< 

D 

a 

ii 

S 
rx 
O 

LL 

w 
o 
« 



. r\ 
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TEST CONDITIONS FOR "U" PROCESSOR 



THE TEST CONDITION EOUATES ARE OF THE FOLLOWING FORM: 
BIT4 POSITIVE TRUE CONDITION 0: FALSE, 1: 
BIT4 NEGATIVE TRUE CONDITION 1= FALSE, 0= 
BITO-3 TEST CONDITION SELECT (CR0M2S-31) 

DEFINITIONS ARE IN OCTAL UNLESS OTHERWISE SPECIFIED 



TRUE ICR0M1SI 
TRUE ICR0M15) 



BUS PROCESSOR NEGATIVE TRUE CONDITION DEFINITION 



000000 
000001 
000001 
0000O2 
000002 
000003 
OOO003 
000004 

ooooos 

00OO06 
OOOOOS 
000007 
000007 
OOOOIO 
O000 1 1 

00001 2 
0000 1 3 
OOOOt 4 

0000 1 3 
0000 IS 
OOOO 1 6 
0000 17 



UMPN 


= 


N2R0 


s 1 


NEO 


= 1 


NCRV 


= 2 


LESS 


= 2 


NMSB 


= 3 


NNEG 


: 3 


LSB 


: 4 


TEST 


= S 


NUPF 


= 6 


DPROC 


= 6 


ACLD 


= 7 


nppok 


= 7 


FTEST 


! 1 


STOP 


s 1 


CPE 


3 1 


ETST1 


! 1 


MERR 


* 1 


SCAN 


= 1 


POLL 


■ s 


CDONE 


! 1 


NBIBAO 


: 1 



; t emp 



xOA - JUMP NOT = CONTINUE 

ALU ■ NOT : 2ER0 (NOT EQUALS) 

ALU - SRC NOT s DST 

ALU - CARRY OUT FALSE 

ALU - SRC IS LESS THAN DST 

ALU • MSB =0 

ALU - COMPARITOR MSB = O.NOT NEGATIVE (POS OR 2ER0I 

ALU - LSB il 

XOA - EXT. TEST L (P3-3) ACTIVE, DO EXTRA TEST CODE 

XOA - FLAG RESET BY IOC OF U PROCESSOR IPRUPF 

XDA - SPLIT ; IPRUPF -> DPROC JUMP/UPROC CONTINUE (PC+1) 

XDA - AC POWER FAILING 

xDA - not power ok [qda compat ] 

XDA - FAST SELF TEST 

XOA - STOP COMMAND ISSUED • NO MORE SI COMMANDS 

XOA - CONTROL MEMORY PARITY ERROR 

XDA • EXTERNAL TEST I 

XDA - 81 C0MMAN0 ERROR ON MASTER PORT (OURING XFER1 

xOA - IP ACCESSED 

xDA - COMMAND DONE 

xOA - BI BAO L SIGNAL NOT ASSERTED LOW (TSAD H IS LOW) 



G 



KOBSO. MICROCODE. ,22-APR- 19 83 1 1 : 16:48.97 



KDBUP DIGITAL EOUIPMENT CORP., 2901 ASSEMBLER VERSION 32 

HARDWARE/SOFTWARE DEFINITIONS ANO EOUATES 



PAGE 013 



BUS PROCESSOR POSITIVE TRUE CONDITION DEFINITION 



000020 

00002 1 
00002 1 
000022 
O0O022 
0O0023 
000023 
O00024 
000025 
000026 
000O26 
000027 
00O027 
O0O030 
000030 
00003 1 
000032 
000033 
000034 
00003S 
00O03S 
O0OO36 
OOO037 



UMP 


: 20 


; JMP 


: 20 


ZRO 


> 21 


EO 


■■ 21 


CRY 


' 22 


GTE 


= 22 


MSB 


= 23 


NEG 


- 23 


NLSS 


« 24 


NTEST 


s 25 


UPF 


■■ 26 


UPROC 


: 26 


NACLO 


: 27 


ppok 


» 27 ; t emp 


NFTEST 


= 30 j 


STEST 


s NFTEST 


NSTOP 


= 31 ; 


NCPE 


■- 32 ; 


NETST1 


= 33 ; 


NMERR 


= 34 ; 


NSCAN 


- 35 ; 


NPOLL 


: NSCAN 


NCOONE 


» 36 ; 


BIBAO 


= 37 



XOA - JUMP UNCONDITIONAL 

ASSEMBLER DEFINED - JMP IS UNCONDITIONAL JUMP 

ALU - EOUALS 2ER0 

ALU - SRC = OST 

ALU - CARRY OUT TRUE 

ALU - SRC IS GREATER THAN OR SAME AS DST 

ALU - MSB = 1 

ALU • RESULT NEGATIVE MSB: 1 

ALU - LSB ■ O 

XOA - EXT. TEST L (P3-3) INACTIVE 

XOA - FLAG SET BY IOC OF BUS PROCESSOR (PSUPF 

(PSUPF •> UPROC JUMP / DPROC CONTINUE (PCfl) 

XDA - AC POWER NOT FAILING 

XDA • power ok [qda compat) 

XDA - SLOW SELF TEST 

XOA - STOP COMMAND NO ISSUED - MORE BI COMMANDS 

XOA - NO CONTROL MEMORY PARITY ERROR 

XOA - NOT EXTERNAL TEST 1 

XDA • NO BI COMMAND ERROR ON MASTER PORT {DURING XFER) 

xDA - NO IP ACCESS 

xDA - NOT COMMAND OONE 

XOA • BI BAD L IS ASSERTED LOW (TBAO H IS HIGH] 



c 
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TEST CONDITIONS FOR 



PROCESSOR (WHERE DIFFERENT ONLV! 



O0OOO6 
OOOOIO 
000010 
00001 1 
O0OO12 
000012 
0O0O13 
000014 
000015 
000016 
00001 S 
000017 



000026 
000030 
000030 
000031 
000032 
000032 
000033 
000034 
000035 
000036 
000036 
000037 



DRIVE PROCESSOR NEGATIVE TRUE CONDITION DEFINITION » 

XOA - PROCESSOR FLAG NOT SET (0>ROPF) 

sdi - serdes parallel data not ready 

SOI - SERDES PARALLEL DATA NOT READY 

SDI - CONTROL STATE NOT READY - RTCS NOT READY TO UPDATE (RELOAD) 

SDI - SECTOR PULSE 

serdes - ecc residue parallel data not ready ( qda compat] 

XOA - RAM PARITY ERROR 

NOT REAL TIME DRIVE STATE ERROR 

DRIVE STATE NOT REAOY - NEW RTDS 

sdi - no serdes over/under runs 

SDI - NO SERDES OVER/UNDER RUNS 

XOA - WORD RATE CLOCK LOW 



NOPF 


= 6 


ndclK 


■ 10 


NPROY 


■ 10 


NCSR 


« 1 1 


SECTR 


> 12 


nrrdy 


: 12 


RPE 


= 13 


NDSER 


J 14 


NDSR 


• IS 


mate 


< 16 


NOVER 


. 16 


NWRC 


s 17 



o 



NOT RECEIVED SINCE LAST WRITTEN TO RTCS 



DRIVE PROCESSOR POSITIVE TRUE CONOITION DEFINITION 



OPF 


: 26 


dclk 


: 30 


PROV 


: 30 


CSR 


= 31 


NSECTR 


= 32 


r rdy 


= 32 


NRPE 


= 33 


DSER 


< 34 


DSR 


» 35 


late 


• 36 


OVER 


> 36 


WRC 


t 37 



XDA - PROCESSOR FLAG SET (CSUPF) 

Sdi • serdes parallel data ready 

SDI - SERDES PARALLEL DATA READV 

SOI - CONTROL STATE REAOY - RTCS REAOY TO UPDATE (RELOAD) 

SDI - NO SECTOR PULSE 

serdes - ecc residue parallel data ready [qda compat) 

XDA - RAM PARITY ERROR 

SOI - REAL TIME DRIVE STATE ERROR ( PAR I T Y , PU LSE , OR DATA) 

DRIVE STATE READY - NEW RTDS RECEIVED SINCE LAST WRITTEN TO RTCS 

Sdi - serdes over/under run has occurred 

SDI - SERDES OVER/UNDER RUN HAS OCCURRED 

XOA - WORD RATE CLOCK HIGH 
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INPUT/OUTPUT CONTROL REGISTER 



EACH PROCESSOR (BUS OR DRIVE) HAS AN ADDRESSABLE LATCH 
WHICH IS USED FOR INPUT/OUTPUT CONTROLS. SOME BITS HAVE MULITPLE 
USES. EACH SIGNAL IS INDIVIDUALLY SET OR RESET IF ENABLED BY THE 
CURRENT MICROINSTRUCTION. 

BIT3 0< SIGNAL TO LOW LEVEL, 1: SIGNAL TO HIGH (CR0M23) 

BITO-2 IOC SELECT (CR0M2O-22) 



BUS PROCESSOR IOC S I GNAL EF I N I T I ONS 



OOOOOO 
0O0001 
000002 
000003 

000004 
000005 
0000O6 
000007 

000010 



000012 
O0O013 
000014 
O0OO1S 
000016 
000017 



SUPF 


= 


GORD 


= 1 


LNPAG 


: 2 


WRSND 


: 3 


; LOFF 


: 3 


RDFST 


= 4 


WRFST 


= 5 


LCOM 


: 6 


LADD 


= 7 


RUPF 


= 10 


;SCLR 


= 1 1 


;RCLR 


= 1 1 


iWRBYT 


= 12 


GOWR 


: 12 


RBCAI 


= 13 


RDNXT 


= 14 


WRNXT 


: 15 


LBWR 


: 1 6 


HAOD 


= 17 



XDA 
XDA 
XDA 
XDA 
XDA 
XDA 
XDA 
XDA 
XOA 

XDA 

XDA 
XDA 
XDA 
XDA 
XOA 
XDA 
XDA 
XDA 
XDA 



UTEST H SET 

GO_REAO 

LOAD NEXT PAGE ADDRESS LOWER 

WRITE SECOND BUFFER 

LOAD ADDRESS BUFFER OFFSET 

READ FIRST BUFFER 

WRITE FIRST BUFFER 

LOAD COMMAND 

LOAD COMAND ADDRESS LOWER 



UTEST H CLR 

CLEAR CROM PE 

CLEAR CROM PE 

WRITE BYTE ON NEXT OPERATION 



(defined in UDIAG UQAI 

(defined in UDIAG. UQA) [qda compat] 



GO WRITE 

RESET BCAI 

READ NEXT BUFFER 

WRITE NEXT BUFFER 

WRITE LAST BUFFER ANO GO_WRITE 

ADDRESS 



o 
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DRIVE PROCESSOR IOC SIGNAL DEFINITIONS 



CERTAIN SIGNALS MUST BE SEOUENCEO IN ORDER FOR THE HARDWARE TO WORK: 

WRITING DATA FIRST IFRCMD THEN IPSSE 

WRITING COMMANDS FIRST IPSCMD THEN IPSSE 

REAOING OATA FIRST IPRCMD THEN IPSSE 

READING COMMANDS FIRST IPRCMD THEN IPSSE 

OEFAULT FIRST IPSCMO THEN IPSSE 



000000 
00O00 1 

00OOO2 

000004 

ooooos 

000005 
000006 
O00OO7 

0000 10 

00001 1 

00001 2 

000O1 4 
000O15 
0000 15 

0000 1 6 

00001 7 



SDPF 

RRSGEN 

SCMD 

iSCLB 

RSE 

RRM 

SWM 

RECC 

RECCT 

ROPF 

SRSGEN 

RCMD 

;RCLR 

SSE 

SRM 

RWM 

SECC 

SECCT 



XDA - SET DRIVE PROCESSOR FLAG (TEST AS COMPLIMENT] 

SDI ■ RESET RSGEN CLOCK. THIS WILL ALLOW RSGEN CLOCKS TO OCCUR 

FOLLOWING A IPSRSGEN A (PRRSGEN WILL UPDATE RSGEN AND ECC REGISTERS 
SDI - SET SDI LEVEL 2 COMMAND 

SDI - SET SDI INFC I/O CLEAR (defined in OOIAG.UOA) 
SEROES - RESET SEROES ENABL E/ - RESET REG.CNT MRO.CE 
SERDES - RESET READ MODE SOIC.POM 

SERDES • SET WRITE MODE 
SERDES - RESET ECC ENABLE 
SEROES - RESET ECC TIME 

XDA - RESET D PROCESSOR FLAG (TEST AS COMPLIMENT) 

SOI - SET RSGEN CLOCK. THIS WILL FORCE RSGEN CLOCK TO BE LOW 

SOI - FOR ALL OTHER FUNCTIONS 

SDI - RESET SDI INFC I/O CLEAR (defined in OOIAG.UOA) 

SERDES - SET SEROES ENAB L E/ - RESET REG.CNT MRO.CE 

SEROES - SET REAO MODE 

SERDES • RESET WRITE MOOE 

SERDES • SET ECC ENABLE 

SEROES - SET ECC TIME 
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000OO4 
000004 
000005 
00O006 
0OOO07 
OOOOIO 
OOOO 1 1 

0000 12 
OOOOI 2 



OOOOI 5 

00001 5 

00001 6 



2901 INTERNAL REGISTER SUMMARV 



These are registers which are internal to the 290) bit slice chip. They 

consist of IS Dual Port RAM registers and 1 accumulator (Q) register. The IS 

RAM registers are configured for a 16 bit rotate while the register is a 16 
bit shi ft . 



MNEMONIC DESCRIPTION 

OCTAL ADDRESS 



UPROC OPROC 





: = 


BUS PROCESSOR 




: s RO 


BUS PROCESSOR 




: : R1 


BUS PROCESSOR 




: = R2 


BUS PROCESSOR 




: = R3 


BUS PROCESSOR 


RLL 


.' : R4 


RICHV LARY'S L 


CRI 


: : R4 


*** TEMP UNTIL 


UBAR 


: = R5 


BUS PROCESSOR 


IUAR 


: ' R6 


BUS ADDRESS RE 


UER 


: * R7 


UPROC ERROR RE 


UTMP 


:-• RIO 


UPROC TEMPORAR 


OER 


: = R1..1 


OPROC ERROR RE 




: = R1 1 


DRIVE PROCESSO 


DTMP 


: = R 1 2 


OPROC TEMPORAR 


RPC 


: = R12 


DM INTERPRETER 




: = R12 


DRIVE PROCESSO 


RIB 


: » R13 


DM INTERPRETER 




:.■ R13 


DRIVE PROCESSO 


RCC 


: : R14 


DM INTERPRETER 




: : R14 


DRIVE PROCESSO 


DBAR 


: = R1S 


ORIVE PROCESSO 


RCY 


: = R15 


DM INTERPRETER 


RT1 


: « R16 


DM INTERPRETER 




: s R16 


DRIVE PROCESSO 




: = R17 


DRIVE PROCESSO 



TIMER/COUNTER REGISTER R /W 
TEMPORARY REGISTER 
TEMPORARY REGISTER 
TEMPORARY REGISTER 
TEMPORARY REGISTER 
LOCK AND SYSTEM STATUS 
MATT'S CODE CHANGED 
BUFFER ADDRESS REG IMAGE 
EGISTER IMAGE 
AGISTER 
*Y REGISTER 
5GISTER 

3R TIMER/COUNTER REGISTER 
»Y REGISTER 

PC 
OR TEMPORARY REGISTER 

INSTRUCTION BUFFER 
OR TEMPORARY REGISTER 

ARITH/LOGICAL CONOITION CODE 
OR TEMPORARY REGISTER 
OR SUFFER ADDRESS REGISTER IMAGE 
LAST ARITH OP CARRY 
GENERAL PURPOSE TEMP 
DR TEMPORARY REGISTER 
3R TEMPORARY REGISTER 



R/W 


■ 


R/W 


- 


R/W 


- 


R/W 


- 


R/W 


R/W 


R/W 


. 


R/W 


- 


R/W 


- 


R/W 


- 


- 


R/W 


* 


R/W 


* 


R/W 


- 


R/W 


- 


R/W 


- 


R/W 


■ 


R/W 


- 


R/W 


• 


R/W 




R/W 


- 


R/W 


- 


R/W 


- 


R/W 


- 


R/W 



2901 INTERNAL REGISTER SUMMARY - DIAGNOSTICS 



oooooo 
j 000003 

i 0000 10 



; MNEMONIC DESCRIPTION 

; OCTAL ADDRESS 



TSTCNT 


= 


HANG 


: R3 


UOOI 


= RIO 



BUS PROCESSOR TIMER/COUNTER REGISTER 
BUS PROCESSOR TEMPORARY REGISTER 
BUS DATA REGISTER REGISTER IMAGE 



R/W 
R/W 
R/W 
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2901 EXTERNAL HARDWARE REGISTER SUMMARY 



; MNEMONIC 



DESCRIPTION 



OCTAL ADDRESS 



#1: On XOMI PC BOARD. 
#2: On xDA#2 PC BOARD. 



000000 
000002 
000002 
000003 
000004 

000014 
OOO0O4 
0O000 1 
0O0004 
000005 
000015 
OO0OO5 
00001S 
000005 

ooooos 
oooooe 

000007 
000007 

000010 



100000 
040000 
020000 
1OO0O 
OO40OO 
OO20O0 
0O1000 
000400 
000200 
OOOIOO 
000040 
0O0020 
OOOOIO 
000004 
000002 
000001 



NOPREG 

RTOS 

PAR 

BUF 

CR 

UCRS 

UCRD 

OCRS 

DCRD 

RTCS 

BCAIS 

BCAID 

UDS 

UDO 

BREG 

SD 

ECC 

BAR 



4 

5 

15 

5 

15 

5 

6 

s 

7 
7 



IKON EXISTANT) 

NO OPERATION REGISTER (NON EXISTANT) 

PIPELINE ADDRESS REGISTER 

RAM OATA BUFFER 

DPROC ■ CONTROL REGISTER SOURCE 

UPROC - CONTROL REGISTER DESTINATION 

UPROC - CONTROL REGISTER SOURCE 

UPROC - CONTROL REGISTER DESTINATION 

DPROC - CONTROL REGISTER SOURCE 

DPROC - CONTROL REGISTER DESTINATION 

OPROC - REAL TIMe CONTROLLER STATE 

UPROC - BCAI REGISTER SOURCE 

UPROC - BCAI REGISTER DESTINATION 

UPROC • BUS DATA REGISTER SOURCE [ qda compat] 

UPROC - BUS DATA REG I STER OEST I NAT I ON (qda compat] 

UPROC - BI REGISTER 

DPRDC - SEROES IS OATA REGISTER 

OPROC - RS GENERATOR REGISTER (RESIDUE) 

UPROC - BUFFER ADDRESS REGISTER 

OPROC - BUFFER AOORESS REGISTER 

NO BUS SOURCE REGISTER 3 BUS FLOAT 



UPROC 


DPROC 


WRITE 


WRITE 


(RO) 


READ 


WRITE#1 


WRITE #1 


R/W #2 


R/W #2 


- 


R/W #2 


WRITE01 




REAOfl 


(RD) 


WRITE#1 






REA0#2 




WRITE#2 


- 


WRT#2 


READ #1 


(RD) 


WRITEXM 


(RD) 


READ #1 


(RO) 


WRITE#1 


(RO) 


WRITE #1 


(RD) 


R/W #2 


(RD) 


REA0#2 


WRITE#2 


- 


- 


WRT #2 


READ 


READ 



o 



BIT DEFINITIONS 



BIT15 
BIT14 
BIT13 
BIT 12 
BIT1 1 
BIT 10 
BIT09 
BIT08 
BIT07 
BIT06 
BIT05 
BIT04 
BIT03 
BIT02 
BIT01 
BITOO 
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40000 

20000 

10000 

4000 

2000 

1000 

400 

200 

100 

40 

20 
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OOIOOO 

004000 
10000 
020000 
040000 
lOOOOO 



2901 INTERNAL REGISTER DEFINITIONS 



MNEMONIC ADDRESS 

RLL : = R4 

LOCK : = BITOO 

: = BIT01 

: = BIT02 

: = BIT03 

= BIT04 

s B IT05 

: : BITOS 

: = BIT07 



DESCRIPTION 

; RICHY LARY LOCK i STATUS REGISTER 



UPROC 
R/W 



DPROC 
R/W 



NDIAG 

CN.ERR 

OXFC 

DM6EG 

DMOOE 

PLOCK 

UER 
DER 



: = BIT08 

: = BIT09 

: . BITIO 

: ■ BIT1 1 

: i BIT12 

: ■ BIT13 

: = BIT14 

: ■ BIT 15 

: : R7 

: < R1 1 



BUFFER LOCK FLAG, O = 

BUFFER STACK POINTER 

BUFFER STACK POINTER 

BUFFER STACK POINTER 

BUFFER STACK POINTER 

BUFFER STACK POINTER 

BUFFER STACK POINTER 

BUFFER STACK POINTER 

BUFFER STACK POINTER 

O I FUNCTIONAL CODE, 

NOT USED 

O - NO ACTION, 1 

! NO ACTION, 1 

O : NO ACTION, 1 

O = NORMAL MOOE, 



LOCKED, 1 = FREE 



1 



XDA DIAGNOSTIC CODE RUNNING 



DPROC FATAL CONTROLLER ERROR (CODE 
UPROC XFC SERVICE REQUIRED 
START DM INTERPRETER (START ADDRESS 
s DIAGNOSTIC MACHINE MODE 



PROCESSOR LOCK FLAG, = LOCKED, 1 = FREE 



UPROC ERROR REGISTER 
DPROC ERROR REGISTER 



R/W 

THE ERROR DISPLAY IS BIT ENCODED TO CORRESPOND TO THE ERROR MESSAGE 
»»• SEE BUS I/O REGISTER DEFINITIONS **« 



.r 
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MNEMONIC ADDRESS 
NOPREG : : 00 



BITOO 
BIT01 
BIT02 
BIT03 



BIT04 


BITOS 


BIT06 


BIT07 


BIT08 


BIT09 


BIT10 


BITt 1 



BIT12 
BIT13 
BIT1 4 
BIT15 



2901 EXTERNAL REGISTER DEFINITIONS 

DESCRIPTION UPROC 

; NO OPERATION REGISTER (NON EXISTANT) R/W 
NON EXISTANT 



DPROC 
R/W 
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MNEMONIC ADDRESS 
: I a 



UCRS 
UCRD 



0O20QQ 
O0400O 



a 

o 

II 

5 
a. 
O 



DESCRIPTION 



UPROC CONTROL REGISTER SOURCE 
UPROC CONTROL REGISTER DESTINATION 



READ 
WRITE 



THIS REGISTER IS REAO/WRITE. IT IS OIFFERENT FROM XDA#2 CR REGISTER 
THAT THE LEO'S ARE ALWAYS ON. DIAGNOSTIC MODE HAS NO EFFECT ON ANY 
XDA*1 HARDWARE. 

IS! WORD COUNT BIT 



MSB WORD COUNT SIT 

RESERVED 
RESERVED 

•- ENABLE OPROC FAIL TEST. 1 : ENABLE UPROC FAIL TEST 
DIAGNOSTIC MODE L «THIS BIT DOES NOTHING TO THE HARDWARE xOA# 1 > 

1 s vax Kludge interrupt in progress [ uda compat ] 
NOT USED 

: ENABLE DPROC SEQUENCER. 1= FORCE OPROC TO FAIL TEST 

1 = DRIVE INIT IN PROGRESS (USED FOR SOFTWARE INIT) 





= BITOO 




= BITOI 




= BIT02 




J BIT03 




= BIT04 




: BITOS 


JSK 


: BITOS 


. OPM 


-. BITOT 


vax i nt 


= BITOS 




= BIT09 


JFAIL 


= BITIO 


ORINIT 


i BIT1 1 




* BIT12 




■ BITI3 




s BIT14 




: BIT1S 



LED I 

LED 2 

LEO 4 

LED 8 



= TURN LED ON. I : TURN LEO OFF 



o 



^ntr 
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HARDWARE/SOFTWARE DEFINITIONS AND EQUATES 

^MNEMONIC AODRESS 



DCRS 
DCRD 



000020 
0OOO40 
000100 

000200 

000400 

002000 

004000 

010000 
02OO0O 
O400O0 
100000 

170000 



DEC 
ODD 

LED1 
LED2 
LED4 
LED8 

LEDS 



DESCRIPTION 



DPROC CONTROL REGISTER SOURCE 
DPROC CONTROL REGISTER DESTINATION 



READ 
WRITE 



NOTE - 1. IN DIAGNOSTIC MODE THE D PROCESSOR SHOULD MOVE CRI 

TO CR AND WAIT FOR THE LEAST S I GN I F I CANT ( Some ) BIT TO COME 

ON BEFORE PROCEEDING. THIS WAV THE U PROCESSOR CAN ENABLE 

OR DISABLE RAM PARITY ERROR AND FLASH THE LIGHTS FOR 

BOTH BOARDS. LEAST SIGNIFICANT BIT > MEANS WAIT, : I 

MEANS CONTINUE. 

2. IN DIAGNOSTIC MOOE THERE IS A 1 BIT DELAY FROM DIAG DATA TO 

NRZ DATA IN AND A 21 BIT DELAY FROM LOADING RTCS TO VALID RTDS. 



b 



BITOO 
BIT01 
BIT02 

BIT03 



FDCLK 


: = BIT04 


SERIAL 


:» BITOS 


RAMPE 


:= BIT06 


OPM 


:= BITOT 



1 -. SELECT DRIVE PORT 1 

SELECT DRIVE PORT 2 

SELECT DRIVE PORT 3 

SELECT DRIVE PORT 4 

USE DIAGNOSTIC CLOCKaO.USE FAST CL0CK=1 

SERIAL PORT 

s INHIBIT RAM PARITY ERROR 



1 : 



BIT08 
BITOS 
BIT10 
BIT1 1 

BIT 12 
BIT13 
BIT14 
BIT 1 5 



DIAGNOSTIC MODE L 

ODD PARITY H BIT07: O 
UNUSEO HARDWARE BIT 
DIAGNOSTIC DRIVE CLOCK 
DIAGNOSTIC DRIVE DATA 



: ENABLE RAM PARITY ERROR 

ENABLE OUTPUT BITS 08-15, 

DISABLE OUTPUT BITS 08-15 

0= EVEN RAM PARITY, 1s 000 PARITY 



LEO 1 L, 

LEO 2 L 

LEO 4 L 

LED 3 L 



TURN LED ON, 1 " TURN LED OFF 



LED8+LED4+LED2+LED1 
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o 
< 

D 

a 

n 

s 

cc 
o 



CONTROLLER 



BIT 15 ! 
! P ! O 



RTDS 

BIT 1S ! 1 
! P ■ O < O 



SDI INTERCONNECT SIGNALS 



! WRITE/COMMAND DATA (WCO) 

! REAL TIME CONTROL LER STATE FRAME (RTCS!- 

!< READ/RESPONSE DATA ( RRO ) 

!< REAL TIME DRIVE STATE FRAME (RTDS)- 



PREAMBLE- 

O I O ! O ! C 



718 9 10 11112 13 14 1SI0 
-■-SYNC STATUS ♦ 

O ! 1 !RDY!WRT>R0 ! I N I ! RES 1 RES < PT Y ! O 1 



REAL TIME DRIVE STATE FRAME 

2 314 5 6 718 9 10 11112 1314 1510 
-PREAMBLE SYNC STATUS + 

0!0!0!0!0!0!1 I RD V ! ATN 1 R/W! SEC ! I DX { AV L ! PT V I O 



1. EVEN PARITY OVER COMPLETE FRAME 

2. DATA SENT LEAST SIGNIFICANT BIT FIRST 

3. IN DIAGNOSTIC MODE IT TAKES 21 CLOCKS FROM LOADING RTCS UNTIL RTDS IS VALID 

4. N/T= DESERIALIZER RECEIVES NON TRI-STATEO AND TRI-STATEO. 



co 
o 
co 



c 
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;MNEMONIC ADORESS 
;RTCS :• OS 



DESCRIPTION 

; REAL TIME CONTROLLER STATE 



OPROC 
WRITE 



G 



DO NOT CHANGE READ AND WRITE GATE IN THE SAME INSTRUCTION SINCE IT 

WOULD BE POSSIBLE FOR BOTH TO BE SENT ACTIVE. 
.EACH TIME THIS REGISTER IS LOAOEO. ONE FRAME WILL BE SENT REGARDLESS 

OF THE STATE OF THE 'CONT H' BIT. 
.BEFORE CHANGING PORTS, TURN OFP THE 'CONT H' BIT AND WAIT FOR ■ RTCS 

READY' OF THE 'RTDS' REGISTER TO INDICATE THE TRANSMISSION HAS COMPLETED. 



000001 
000002 
000004 
OOOOIO 

000020 
000040, 
000040 
OOOIOO 
000100 
000200 



CONT 
WRT 



CRDY 



INI 

rt0S05 

RTCS13 

rtOS06 

RTCS 14 

FPE 



BITOO 
BIT01 
BIT02 
BIT03 

BIT04 
bitOS 
BIT05 
bit06 
BITOS 
BITOT 

8IT0S 
BIT09 
BIT10 
BIT I 1 

: = BIT12 

: = BIT13 

: BIT 14 

: ■ BIT 15 



♦ CONT H 0: SEND ZERO'S , 1: SEND FRAME 

♦WRT GATE H 0= NO WRITE GATE , 1 = ENABLE WRITTING OF DATA 

+ RD GATE H O: NO READ DATA, I: SEND READ DATA 

+CON RCVR ROY H 0= NOT READY, 1= READY TO RECEIVE COMMAND/DATA 



; temp 
; t amp 



= NO INIT, 
0: DEFAULT 



INITIALIZE (RESET) DRIVE 



+ INIT H 

tunussd 1 

"UNUSED 1 

+unused O 

♦UNUSED O Os DEFAULT 

♦ FORCE PARITY ERROR H Os SEND (CORRECT) EVEN PARITY, 1: 

♦RESERVED 



♦RESERVED 



SEND ODD PARITY 
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MNEMONIC ADORESS 
RTDS : s 02 



DESCRIPTION 

; REAL TIME DRIVE STATE (NON EXISTANTI 



OPROC 
READ 



WHEN FIRST SELECTING A PORT, THE FIRST 'RTDS' FRAME MUST BE DISREGARDED. 
TO 00 THIS, SEND ONLY ONE 'RTCS' FRAME THEN WAIT FOR 'FRAME SENT' TO 
GO ACTIVE 



OOO0O1 
OOO0O2 



OO0O2O 
OO0040 
OOOIOO 
OOOIOO 



DRDY 


i BITOO 




♦ D RCVR ROY 


ATTN 


s BITOI 




♦ATTN H 




s BIT02 




'RESERVED 




s BIT03 




+ " 


SEC 


s BIT04 




♦SECTOR H 


IDX 


: BITOS 




♦INDEX H 


PtdS06 


s bitoe 


, t emp 




AVAIL 


s BIT06 




♦AVAILABLE 




s BIT07 




♦RESERVED 




s 8IT08 




+ » 




s 3IT09 




♦ ■• 




s BIT 10 




+ " 




s SIT 1 1 




+ " 




= BIT 12 




+ " 




t 8 IT 1 3 




+ '« 




= B IT 1 4 




♦ " 


RWRDY 


= 8IT 15 




+R/W RDY H 



O: DO NOT SEND, 
O: NO ERROR. 



0= NO SECTOR 
0: NO INDEX 



RECEIVER READY FOR COMMAND 



SECTOR PULSEIUSE 1-0 EDGE) 
INDEX PULSE (USE 1-0 EDGE) 



NOT AVAILABLE 1: DEVICE AVAILABLE FOR USE 



0= NOT R/W REAOY , 



READ/WRITE REAOY 
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MNEMONIC ADDRESS 



DESCRIPTION 



PROGRAM ADDRESS REGISTER 



WRITE WRITE 



A WRITE TO THIS REGISTER WILL CAUSE A JUMP TO AN ADDRESS 
BETWEEN FOOH AND FFF HEX I DEC IMAL . THE INSTRUCTION JUMPED TO MUST 
CONTAIN A JUMP INSTRUCTION TO PREVENT A FALL BACK TO THE 
INSTRUCTION AFTER THE PAR UPDATE. 

+ NOT IMPLEMENTED 



X 



) 



II +MEMORY ADDRESS 



09 
OS 



07 
06 
OS 
04 



03 
02 



II 


ALWAYS 


ONE 


to 


ALWAYS 


ONE 


09 


ALWAYS 


ONE 


08 


ALWAYS 


ONE 


07 


f 12S) 




06 


t 641 




OS 


( 32) 




04 


( IS) 




03 


1 3) 




02 


I 4) 




01 


( 2) 




00 


( 1 ) 
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MNEMONIC ADDRESS 
BUF : = 03 



DESCRIPTION 

; RAM DATA BUFFER 



UPROC 
R/W 



DPROC 

R/W 



DATA TO OR FROM INTERNAL REGISTERS MUST BE MOVED WITH A LOGICAL 
OPERATION . 



15 +BUFFER 


DATA IS 


32768) 


14 + 


14 


16384) 


13 ♦ 


13 


8196) 


12 ♦ 


12 


4096) 


11 + 


1 1 


2048) 


lO + 


lO 


1024 ) 


09 + 


09 


S12) 


OS + 


08 


25S) 


07 + 


07 


128) 


06 + 


06 


64) 


05 + 


OS 


32) 


04 + 


04 


16) 


03 + 


03 


3) 


02 + 


02 


4) 


01 + 


01 


21 


00 + 


00 


1 ) 



c 
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c 



UOS 
UDO 



: a 15 
: •- 05 



BUS ADDR/OATA REGISTER SOURCE 

BUS ADDR/DATA REGISTER DESTINATION 



UPROC DPROC 
READ (RD) 

WRITE (RD) 



SEE I/O REGISTER FOR FORMAT DURING INITIALIZATION 



DMA TRANSFERS ■ DMA REOUEST (PS DMA MUST BE MADE AT LEAST 

ONE INSTRUCTION BEFORE READING OR WRITING FROM THE BUS DATA REG. 

ONCE BUS MASTER HAS BEEN GRANTED, DMA REOUEST MAV BE DROPPED 0RDMA . 

THE FOLLOWING BIT DEFINITIONS APPLY TO THIS REGISTER BEING USEO AS A 
BUS ADDRESS REGISTER. 



15 


+ BUS ADDRESS 1 5 


32768) 


14 


* 


1 4 


16384) 


13 


+ 


1 3 


8198) 


1 2 


+ ' 


1 2 
1 1 


4096 ) 


1 1 


+ 


2048 ) 


1 


+ 


10 


1024) 


09 


+ 


09 


512) 


OS 


+ 


08 
07 


256) 


07 


+ 


128) 


06 


+ ' 


06 


64) 


05 


♦ ' 


05 


32) 


04 


+ 


04 
03 


16) 


03 


♦ ' 


8} 


02 


+ ' 


02 


4) 


01 


+ * 


1 


2) 


00 


+ 


00 


1 ) 
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THE FOLLOWING BIT DEFINITIONS APPLY TO THIS REGISTER BEING USED AS 
DATA REGISTER. 



US 


DATA 15 


32768 1 




1 4 


1 63S4) 




1 3 


8196) 




12 

1 1 


4095 ) 

2048 ) 




10 


1024 1 




09 


5121 




08 


2SEI 




07 


1281 




06 


54) 




OS 


321 




04 


IS) 




03 


81 




02 


4) 




01 


2) 




oo 


1 ) 
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000O1O 

000020 
O00O4O 
000100 
O0O200 



OS ; 

BITOO 
BIT01 
BIT02 
BIT03 



BI REGISTER FOR BI CONTROL 



UPROC 
WRITE 



B . LED 


: BIT04 


! . ODD 


■ BITOS 


J . LOOP 


a BIT06 


S . NRTY 


: BIT07 




= BITOS 




: BIT09 




: BITIO 




: BIT1 1 



BIT12 
BIT13 
BIT 14 
BIT15 



ABORT BI C0MMAN0:O, NOT ABORT:! 

NOT USED 

NOT USED 

NODE NOT BA0*O, NODE BAO s 1 

YELLOW LEO 0FF:O, YELLOW LED 0N:1 

BYTE BOUNDARIES IN BCAI; EVEN:0, 000:1 

BI BUS REQUEST; NORMAL M00E=O, LOOPBACK M0DE:1 

RETRY COMMAND; RETRY:0, NO RETRY:! 

NOT USEO 

NOT USED 

NOT USED 

NOT USED 

NOT USED 

NOT USED 

NOT USED 

NOT USEO 



%**,*r 
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a 
< 

a 

ii 

5 

cc 
O 
u. 

W 

o 

V) 



MNEMONIC 
SO : : 



ADDRESS 
06 



DESCRIPTION 

; SEROES 16 DATA REGISTER 



DPROC 
R/W 



• + HEADER + • 

!L8N!LBN!LBN!LBN!LBN!LBNi 



■SS 

DATA 

- ss- - - - 



- -SS" 
ECC 



SW1 


= SOFTWARE WORD 1 




SW2 


: SOFTWARE WORD 2 




EDC 


: ERROR DETECTION CODE 




ECC 


: ERROR CORRECTION CODE 




SYN 


: 232740, 26BCH, 9916 






15 


+SERDES DATA 15 


327SS ) 




14 


♦ ' 14 


1 S3S4 ) 




13 


* ' 13 


8196) 




1 2 


t ' '12 


4096) 




1 1 


+ ' ' 11 


2048 1 




10 


♦ ' '10 


1024 ) 




09 


+ ' '09 


512) 




08 


♦ 'OS 


256) 




07 


+ ' * 07 


128) 




06 


+ ' '06 


64) 




05 


♦ ' 'OS 


32) 




04 


* '04 


16) 




03 


♦ ' '03 


8) 




02 


+ '02 


4) 




0! 


+ ' '01 


2) 




00 


+ '00 


1 ) 
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MNEMONIC 

ECC : s 



ADDRESS 

07 

BIT1S 
BIT14 

BIT 13 
BIT12 



DESCRIPTION 

; RS GENERATOR REGISTER (RESIDUE) 

0= ECC ERROR, I: NO ECC ERROR 
+ BCC FEEDBACK ENABLE 
-WRITE ECC=NOT (ECC ENABLE AND 
-DATA OUT 



DPROC 
READ 



iCC INPUT ENABLE) 



= BIT1 1 


: BIT 10 


= BIT09 


: BIT08 


= BIT07 


= BITOB 


= BIT05 


= BIT04 


= BIT03 


: BIT02 


= BIT01 


: BITOO 



; +SERDES 


ENABLE 






; +DTEST 








;'.■+ RS GENERATOR 


09 


512) 


; + ' 




OB 


256 I 


; + ' 




07 


128) 


; + ' 




OS 


64) 


, + ' 




OS 


32) 


+ ' 




04 


16) 


+ 




03 


a) 


+ * 




02 


«) 


■*• ' 




01 


2) 


+ 




00 


1 ) 
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^MNEMONIC AODRESS 



;SAR 
; BAR 



: = 07 
: s 07 



DESCRIPT ION 



BUFFER ADDRESS REGISTER 
BUFFER ADDRESS REGISTER 



(BUS PROC) 
( DRI VE PROC ) 



UPROC 
WR ITE 



THE LOWER 4 BITS ARE INCREMENTED EVERY TIME THE DATA BUFFER IS WRITTEN 
INTO. THEY ARE NOT INCREMENTED WHEN THE DATA BUFFER IS READ. 



15 
14 
■ 3 
1 2 



10 
09 
OS 

07 
06 
05 
04 



NOT IMPLEMENTED 



BUFFER ADDRESS 



13 


SI92 I 


12 


4096 ) 


1 1 


204S) 


10 


1024 ) 


09 


SI2) 


OS 


256) 


07 


123 ) 


06 


64) 


05 


32) 


04 


16) 


03 


31 


02 


4) 


01 


2) 


00 


1 1 



6 
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BUS I/O REGISTERS 



REFERENCE "BUS DISK AOAPTER FUNCTIONAL SPEC I F I CAT I ON" SECT I ON 4.3.4.3 
TO SUMMARIZE THE BUS I/O REGISTER ADDRESSES ANO INTERRUPTS: 



XDAIP 
XDAIP 
XDAIP 
xOASA 
xOASA 
xOASA 
xOASA 



7XXXX0R. INITs UNDEFINED 

OR. RUN = POLL I/O SUFFER 
CONTROLLER INIT 
INITIALIZATION STATUS 
INITIALIZATION STATUS 
RESERVED 



OW . R / I = 
7XXXX2W.INIT* 
7XXXX2R. INIT: 
7XXXX2R. RUN 



MESSAGE RECEIVED 
ADAPTOR READV 
REQUEST VAX PURGE 



^a&T 



i 7XXXX2W.RUN = VAX PURGE COMPLETE (HOST RESPONSE) 

1. ANYTIME A xOA BUS I/O PAGE ADDRESS IS SELECTED, A SLAVE SYNC 
(SSYNC LI IS RETURNED. 

2. THE XOA HAS TWO (2) MODES OF OPERATION: 

1. INITIALIZATION MODE - THE XDA IS RUNNING DIAGNOSTICS AND 
GETTING INFORMATION TO SE USED IN RUN MODE. 

2. RUN MODE • THE xDA WILL ACCEPT AND EXECUTE DCP PACKETS. 

3. INFORMATION SENT OR RECEIVED FROM THE XDA I/O PAGE IS VALID ONLY 
WHEN IN THE SPECIFIED MODE. 

BUS HARDWARE USAGE 

+ + 

0N= 1112 3 4 5 6 7 3 9 10 1 
+A2 -A2 ! BUS ADORESS SWITCH < 

OFF: O ! 4 3 16 32 64 128 256 S12 1K 2K I 

WS W4 ♦--' + 
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XOASA INITIALIZATION REGISTER BIT DEFINITIONS 



XOA WRITE FORMAT 



XOASA 1W.INIT STEP 1-3 WRITE FORMAT 



♦ERROR CODE BIT 

♦ERROR CODE BIT 1 

♦ERROR COOE BIT 2 

♦ERROR CODE BIT 3 

♦ERROR COOE BIT 4 

♦ERROR COOE BIT 5 

♦ERROR COOE BIT 6 

♦ERROR CODE BIT 7 



004000 
10000 
02000O 
040000 
100000 

OO020O 
000200 
10O0OO 
040000 



STEP1 
STEP2 
STEP3 
STEP4 
ERR 

INTI 

IE 

OWN 

FLAG 



8IT00 


BIT01 


BIT02 


BIT03 


BIT04 


BITOS 


BIT06 


BIT07 


BIT 1 1 


BIT12 


BIT 13 


BIT 14 


BIT15 


BIT07 


BIT07 


BIT 15 


BIT 14 



INIT STEP I INDICATOR 
INIT STEP 2 INDICATOR 
INIT STEP 3 INDICATOR 
INIT STEP 4 INDICATOR 
♦INITIALIZATION ERROR FLAG 

INIT INTERRUPT ENABLE BIT (ECHOED TO HOST! 
INIT INTERRUPT ENABLE BIT (ECHOED TO HOST) 
O = HOST OWNS RING ENTRY, 1 ' XDA OWNS ENTRY 
= NO INTERRUPTS, 1 = INTERRUPT IF APPROPRIATE 



o 
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xDA READ FORMATS 



PAGE 036 



J 



STEP ! FORMAT 



XXXX 1R.INIT STEP 1 READ FORMAT 

BITS IS • : *LO ORDER 16 BITS OF CSR BASE ADDRESS 



* 


STEP 


2 FORMAT 


XXXX 


1/3R 


INIT STEP 2 READ FORMAT 


* 


STEP 


3 FORMAT 



1R.INIT STEP 3 READ FORMAT 



000265 
OOOS52 



BITS 15 - 1 
GO :« BITOO 



INSTR : = < 165 . *1 10. > / 1 00 . 
CYCLE : = <INSTR*2> 



; RESERVED 

; *G0 BIT (SET BV HOST TO PUT XDA ONLINE) 

;NSEC U- INSTRUCTION CYCLE TIME + DEVIATION 

;NSEC U- INSTRUCTION CYCLE TIME NOMINAL [PROCSI 
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LED CODE DEFINITION 



LED LED LEO LED 



NO ERROR (OR STUCK IN 
NOT USED 
INITIALIZATION STEP 2 
INITIALIZATION STEP 3 
INITIALIZATION STEP 4 
1 SECOND BLINK FOR BUSY 
NOT USED 
NOT USED 



DIAGNOSTIC IF ALWAYS OFF) 



NO BLINK FOR HANG 



ERROR COOES 



INITIALIZATION (ERR0R1/STEP 1 DIAGNOSTIC WRAP 

O O I ERROR: DIAGNOSTIC ERROR xDA #1 

O 10 ERROR: DIAGNOSTIC ERROR xOA »2 

1 1 ERROR: NOT USED 

1 O ERROR: ERROR VECTOR : ROM PARITY ERROR 
1 O 1 ERROR: ERROR VECTOR : RAM PARITY ERROR 

I 1 ERROR: ERROR VECTOR : ROM/RAM PARITY ERROR 

II 1 ERROR: SEQUENCER ERROR 

: : R17 

LE04 ON INDICATES THE XDA IS OPERATIONAL *** 

= LE04 ; BIC CODE FOR XDA OK LEO DISPLAY 

LEDI ON INDICATES THAT THE . PROC IS BUSY, OFF MEANS IT IS IDLE ««« 

'■ ' LEDI ; CODE FOR O.PROC BUSY LED DISPLAY 

LED2 ON INOICATES THAT THE U.PROC IS BUSY, OFF MEANS IT IS IDLE »»« 

■ LED2 ; CODE FOR U.PROC BUSY LEO OISPLAY 



c 
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PACE 038 



XDA ERROR CODES 



THE ERROR DISPLAY IS BIT ENCODED TO CORRESPOND TO THE ERROR MESSAGE 



BIT 
BIT 

BIT 
BIT 



< ERROR, 1 
ERROR STATUS 
ERROR STATUS 
ERROR STATUS 



NO ERROR 
BIT 



o 



104000 
0O004O 
OOOIOO 
000140 
000200 
000240 
000300 
000340 
00O340 



ERROO 
ERR01 
ERR02 
ERR03 
ERR04 
ERROS 
ERR06 
ERR07 
ERR07 



<ERR+STEP 1 > 

1 >32. 

2 *32 . 

3 «32 . 

4 *32 . 

5 *32. 

6 *32. 

7 *32 . 
7 «32 . 



SELF TEST ERROR COOES 

;ERROR IN STACK TEST 

;ERROR IN ALU OPERATIONAL TEST/CONTROL PROM PE/ALG8L0G PROM/CR TEST 
; ERROR IN RAM PE/RAM BUFFER TEST 
SDI/SERDES/ECC TEST 
in STEP 1 INIT ERROR 



; ERROR 
; ERROR 
;ERROR in NPR R/W TEST 



; ERROR 
i ERROR 
; ERROR 



in STEP 2,3, OR 4 INIT ERROR 

in BUS MEMORY TEST (MANUFACTURING ONLY) 

in BI TEST ERRORS 
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HI WORD BIT DEFINTIONS FOR BDA 



100000 
O400OO 
020000 
10000 

004000 
002000 

O0 100O 
000400 

0002QQ 
OOOIOO 
000040 
000020 

OOOOIO 
000004 
000002 
OOOO0 1 



BIT31 
BIT30 
BIT29 
BIT28 



BIT19 
BIT18 
BIT17 
BIT1 6 



BIT1S 
BIT14 
BIT13 
BIT12 



BIT03 
BIT02 

BIT01 
BITOO 



BIT IS OF HI WORO 

SIT II " 

B I T 1 3 

B I T 1 2 



8IT27 


BIT1 1 


BIT 


1 1 


BIT26 


BIT10 


BIT 


10 


BIT2S 


BIT09 


BIT 


09 


BIT24 


BITOS 


BIT 


08 


BIT23 


BIT07 


BIT 


07 


BIT22 


BIT06 


BIT 


06 


BIT21 


BIT05 


BIT 


05 


BIT20 


BIT04 


BIT 


04 



BIT 03 

BIT 02 

BIT 01 

BIT 00 



1 L *' 
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■v,^ 



00000 1 
*\ 00000 1 
■■■' D00002 
J00003 
000004 
000004 
OO0OO5 
000006 
000007 
OO0O1O 
OOOOI 1 



OO0O1 4 
0000 1 5 
OO0O1 6 



BOA COMMAND CODES EQUATES 



6IRDCM 


B 


1 


READ 


= 


1 


IRCI 


a 


2 


RC1 


3 


3 


SIWRCM 


= 


4 


WRITE 


3 


4 


WCI 


3 


5 


UWMCI 


a 


S 


WMCI 


3 


7 


INTR 


t 


AH08 


IDENT 


i 


AH09 


;Stopc 


t 


«HOA 


; SISTCM 


3 


AHOB 


INVAL 


3 


"HOC 


BOCST 


3 


AHOD 


IPINTR 


3 


*HOE 
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OOOOOO 
000004 
OOOOIO 

00001 4 
000020 



0OOO24 
000030 
000034 
000040 
000044 
OOOOSO 
0000S4 
OOOO60 
OOO1O0 
0OO360 
000364 
00037O 
000374 



O0O362 
0003S4 



IPREG 
SAREG 



BIIC GENERAL REGISTER OFFSET EOUATES 



BIOTVP 


s *H000 


BICSR 


s AH004 


BIBER 


3 AH008 


B EECSR 


= AHOOC 


Bl IDES 


' *H010 



OFFSET TO OEVICE REGISTER 

OFFSET TO CONTROL ANO STATUS REGISTER 

OFFSET TO 8US ERROR REGISTER 

OFFSET TO ERROR INTERRUPT CONTROL REGISTER 

OFFSET TO INTERRUPT DESTINATION REGISTER 



BIIC SPECIFIC OEVICE REGISTER OFFSET EOUATES 



BI IMSK 


s "H014 


; OFFSET 


TO 


BIPSOE 


s AH018 


; OFFSET 


TO 


BIPSRC 


s »H01C 


; OFFSET 


TO 


BISAOR 


3 »H020 


: OFFSET 


TO 


BIEAOR 


s "H024 


; OFFSET 


TO 


BCICSR 


s «H02S 


. OFFSET 


TO 


BIWSTA 


s «H02C 


; OFFSET 


TO 


BIPSFC 


s AH030 


; OFFSET 


TO 


BIUCSR 


-. "H040 


:OFFSET 


TO 


BIGPRO 


s AHOFO 


;OFFSET 


TO 


BIGPRI 


s AH0F4 


; OFFSET 


TO 


BIGPR2 


3 AH0F8 


; OFFSET 


TO 


BIGPR3 


3 AHOFC 


: OFFSET 


TO 



IPINTR MASK REGISTER 

FORCE IPINTR/STOP DESTINATION REGISTER 

IPINTR SOURCE REGISTER 

STARTING ADDRESS REGISTER 

ENDING ADDRESS REGISTER 

SCI CONTROL REGISTER 

WRITE STATUS REGISTER 

FORCE IPINTR/STOP COMMAND REGISTER 

USER INTERFACE INTERRUPT CONTROL REGISTER 

GENERAL PURPOSE REGISTER 

GENERAL PURPOSE REGISTER 1 

GENERAL PURPOSE REGISTER 2 

GENERAL PURPOSE REGISTER 3 



BIIC UOSSP REGISTER OFFSET EOUATES 



AH0F2 
AH0F4 



:OFFSET TO IP REGISTER (ODD WORO BOUNORV OF CPR O) 
OFFSET TO SA REGISTER [EVEN WORO BOUNDRV OF GPR 1] 
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* BIOTYP 



AHOOO ;BIIC DEVICE REGISTER 



100000 
O40000 
10000 
004000 
002000 

000017 



S ;DEVICE TYPE 

;*H004 iBIIC CONTROL AND STATUS REGISTER EOUATES 



V..* 



HES 
SES 

BROKE 

STS 

SST 



BIT 15 
BIT 14 
BIT12 
BIT1 1 
BIT 10 

17 



;HARD ERROR SUMMARY 
;SOFT ERROR SUMMARY 
;BROKE BIT 

;SELP-TEST STATUS BIT 
;START SELF-TEST BIT 

;NODE ID MASK 



040000 
020000 
O10000 
004000 
002000 
OO1000 
000400 
000200 
OOOIOO 
0O004O 
000020 
000010 
O00004 
000002 
00000 1 



» BIBER 



, AH008 ;BUS ERROR REGISTER 



NMR 

MTCE 
CTE 
MPE 
ISE 
TOF 
I VE 
CPE 
SPE 
RDS 
RTO 
STO 
BTO 
NEX 
. ICE 



BIT30 

BIT29 
BIT2S 
BIT27 
BIT26 
BIT2S 
BIT24 
SIT23 
B1T22 
BIT21 
BIT20 
B1T1 9 
BIT 1 8 
BIT17 
BIT1 6 



NO ACK TO MULTI -RESPONDER CMD RECV 

MASTER TRANSMIT CHECK ERROR 

CONTROL TRANSMIT ERROR 

MASTER PARITY ERROR 

INTERLOCK SEQUENCE ERROR 

TRANSMITTER DURING FAULT 

IDENT VECTOR ERROR 

COMMAND PARITY ERROR 

SLAVE PARITY ERROR 

READ DATA SUBSTITUTE 

RETRY TIMEOUT 

STALL TIMEOUT 

BUS TIMEOUT 

NON-EXISTENT ADDRESS 

ILLEGAL CONFIRMATION ERROR 



BISADR 
BIEADR 



; "H020 
; AM024 



^STARTING ADDRESS REGISTER 
LENDING ADDRESS REGISTER 



O20O0O 
010000 
004000 
002000 
001000 
000400 
000200 
0OO100 
OO0040 
OO0020 
O000 10 

KDBUP 



BA29 


: : BIT29 


BA2S 


: BIT28 


BA27 


: = BIT27 


8A26 


: = BIT2S 


BA2S 


: : BIT25 


BA24 


: : BIT24 


BA23 


= BIT23 


BA22 


: ■ BIT22 


BA21 


: i BIT21 


BA20 


: = BIT20 


BA19 


: = BIT19 



BUS 


ADDRESS 


29 


BUS 


ADDRESS 


28 


BUS 


AODRESS 


27 


BUS 


ADDRESS 


2B 


BUS 


ADDRESS 


25 


BUS 


ADDRESS 


24 


BUS 


ADDRESS 


23 


BUS 


ADDRESS 


22 


BUS 


ADDRESS 


21 


BUS 


ADDRESS 


20 


BUS 


AODRESS 


1 9 
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000004 
000002 

000001 



BA18 


:- B I T 1 8 


BA17 


: = BIT17 


BA1 6 


= BIT1S 



BUS AODRESS 18 
BUS ADDRESS 17 
BUS ADDRESS 16 

V : s BA16+BA17+BA18+BA19+BA20+BA21+SA22+BA23+BA24+BA25+BA26+BA27+BA28+BA2S 

* * 

* BCICSR ;»H02S ;BCI CONTROL REGISTER EQUATES • 



OOOO0 1 

020000 
000400 
000200 
000010 



FORCE 

ST0P6N 
UCSREN 
BICSREN 
RTOEVEN 



BIT1 6 

BIT 13 
BIT08 
BIT07 
BIT03 



; FORCE COMMAND 

;STOP ENABLE 
; USER CSR SPACE ENABLE 
;BIIC CSR SPACE ENABLE 
;RTO EV CODE ENABLE 



iooooo 

O40OOO 
020000 
10000 



« BIWSTA 



;WRITE STATUS REGISTER 



GPR3 
GPR2 
GPR1 
GPRO 



j BIT31 

: s BIT30 

:= BIT29 

: = BIT28 



;GENERAL PURPOSE REGISTER 3 STATUS BIT 

;GENERAL PURPOSE REGISTER 2 STATUS BIT 

;GENERAL PURPOSE REGISTER 1 STATUS BIT 

^GENERAL PURPOSE REGISTER STATUS BIT 



;FORCE IPINTR/STOP COMMANO REGISTER EQUATES 



BIT15+BIT14 ;STOP COMMAND 



OOOOOI 
000002 
000004 
O00O10 

000020 
000040 
OOOIOO 
O0O200 

000400 
OOIOOO 
0O2O0O 

004000 



* BIUCSR 



;USER INTERFACE INTERRUPT ' CONTROL REGISTER EQUATES 



BRLV4 
BRLV5 
BRLV6 
BRLV7 

BRLV4S 
BRL V5S 
BRLVSS 
BRLV7S 

BRLV4R 
BRLVSR 
BRLV6R 
BRL V7R 



BIT16 
BIT17 
BIT18 
BIT19 

BIT20 
BIT21 
BIT22 
BIT23 

BIT24 
BIT2S 
BIT26 
BIT27 



; FORCE BITS 16-19 



; INTRC BITS 20-23 



INTRC BITS 24-27 
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BI COMMAND CODES 



1 40000 
10000O 
04000O 

oooooo 

020000 



ow 


:= BIT31+BIT30 


ow 


: = BIT31 


LW 


:= BIT30 


WD 


: : 


IOACC 


: = BIT29 



.OCTAWORO DATA LENGTH 

;QUADWORO DATA LENGTH 

;LONGWORD DATA LENGTH 

;WORD DATA LENGTH (only works for BI registers) 

; 10 SPACE ACCESS 
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; IE121 ] 



EQUATES FOR MSCP.SOI.BIT AND BYTE MASKS 



o 



O0010O 
004000 
OOO04 1 
OO04OO 
000022 
000024 
1 7O00O 
000377 
O01O0O 
O00002 
O00012 
00001 1 
000010 
00001 3 

00000 7 

ooooos 

001000 
000105 
O000O4 
OOOOOO 
O000O2 
O0O0O3 

1 77400 
1 700OO 
OOIOOO 
1774O0 

0003S0 
000377 
0003 77 
000060 
000377 
007400 

oooioo 

0000 17 
100000 
000003 
077700 
000077 
100O0O 
126736 
000042 
OO0074 
000003 

ooooos 

O00004 
000777 

000020 

KDBUP 



ATTCOO 


: - 100 


BTROTH 


= BIT1 1 


BUFLMT 


= 33. 


CCLASS 


■■ 1 >25S . 


CMODEL 


= 18 . 


CMDLIM 


= 20. 


CVLSTR 


= 170000 


OEVCL 


= 377 


DCLASS 


= 1000 


DMBPC 


> 2 


DMODT 


! 10. 


DMOVH 


: 9 . 


DMOVL 


: 8 . 


DMSTR 


= 11. 


DSTSH 


s 7 


OSTSL 


! 6 


OUPVC 


= tooo 


EDSEED 


= 89 . 


ERRRTC 


« 4 


FCT.MD 


= 


FCT. V1 


* 2 


FCT . V2 


> FCT. V1+1 


FRMCD 


= 177400 


HDCOD 


= 170000 


HDRTMO 


= 512. 


HIBVT 


= 177400 


HINIB 


: 36Q 


LOBVT 


= 377 


HOSTF 


= LOBVT 


IOMSK 


= BO 


LBNMSK 


■ LOBVT 


LBNSTR 


= 7400 


LOGCOD 


s 100 


LONIB 


= 17 


MAPENB 


», 8IT15 


MAPMSK 


s BIT00*BIT01 


MAPMSH 


= 77700 


MAPMSC 


= 77 


MAPVAL 


= BIT15 


MD512 


= 126736 


MEMS2 


= 3 4 


MINUTE 


= 60. 


OOTAF 


= 3 


ODTCA 


= 5 


ODTCY 


= 4 


OFFMSK 


= 777 


OFFSET 


« 16. 



MASK FOR ATTENTION OP COOES 

BETROTHED BIT IN GET STUD STATUS RESPONSE 

BUFFER CONTROL BLOCK ALLOCATION LIMIT 

MASS STOP. CONTROLLER CLASS FIELD FOR MSCP [rae04] 

CONTROLLER MODEL FIELD FOR MSCP 

MAXIMUM NUMBER OF MSCP PACKETS 

MASK FOR STARTING HI CYLINDER 

MASK FOR MSCP DEVICE CLASS FIELD 

OISK CLASS 

DM ODT PC SAVE AREA OFFSET FROM UN.BUF 

DM ODT LOCATION OFFSET FROM UN.BUFfSTART OF OM SPACE) 

DM OVERLAY HI ADDR OFFSET FROM UN.BUF 

DM OVERLAY LO AOOR OFFSET FROM UN.BUF 

OM START AOORESS OFFSET FROM UN.BUF 

OUST STATUS HI OFFSET FROM UN.BUF 

OUST STATUS LO OFFSET FROM UN.BUF 

VIRTUAL CIRCUIT FOR OUP PROTOCOL 

EDC SEED 

ERROR RETRY COUNT 

FCT MEDIA FORMAT WORO OFFSET 

FCT VOLUME ID WORO 1 OFFSET 

FCT VOLUME 10 WORD 2 OFFSET 

MASK FOR SOI FRAME CODE 

MASK FOR SDI HEADER CODE 

HEADER TIMEOUT VALUE - EQUALS ABOUT 170 US. 

MASK FOR HI 8YTE OF WORD 

MASK FOR HI NIBBLE 

MASK FOR LO BYTE OF WORO 

MASK FOR HOST UNIT FLAGS 

MASK FOR MSCP I/O COMMANDS 

MASK FOR SOI LBN 

MASK FOR STARTING HI LBN 

MASK FOR LOG/ATTENTION OP CODES 

MASK FOR LO NIBBLE 

MAPPING ENABLED BIT IN BUFF OESC 

MASK FOR MAPPING REGISTER LOW 2 BITS 

MASK FOR UNUSED HIGH SITS 

COMPLEMENT OF MAPMSH 

MAPPING VALIO BIT IN PTE 

FCT S12 FORMAT CODE 

NUMBER OF PTE'S THAT WE CAN CACHE 

60 SECONDS IN A MINUTE ! 

OM ODT ARITMETIC FLAGS OFFSET FROM UN.8UF 

OM ODT CONSOLE AOORESS OFFSET FROM UN.BUF 

OM OOT CARRY FLAG OFFSET FROM UN.8UF 

MASK FOR PAGE OFFSET 

NUMBER OF WORDS IN DOWNLINE LOAO HEADER 



KDBSO. MICROCODE,, 22- APR-I9S8 11:16:48.97 



KDBUP DIGITAL EQUIPMENT CORP. 

CONTROLLER RAM ANO EQUATE DEFINITIONS 



1QOQOO 
000377 
001000 
000002 
140000 
060000 
000077 
OSOOOO 
030000 
1 10000 
010000 
060000 
10000 
120000 
007400 
000000 
020000 
O3O000 
100000 
000017 
004400 
000400 
0000 10 
000400 
000274 
O23Q0O 
1774Q0 
000170 
O0O44O 
000023 



2901 ASSEMBLER VERSION 32 



PAGE 046 



ONLREC 


i BIT15 


OPCOD 


s L08YT 


PAGESZ 


. S12 . 


PTELEN 


s 2 . 


Q.STAT 


< 140000 


RBNCOO 


= EOOOO 


R6NMSK 


> 77 


RBNPRM 


i 50000 


RBN2N0 


= 30000 


H1 1C00 


= 1 IOOOO 


RBNXOR 


RBNPRM4RBN2ND 


RBNXOR 


RBNPRM+RBN2ND 


HI 1X0R 


HI 1C00«RBN2ND 


HI 1X0R 


HI 1C00+RBN2ND 


RBNSTR 


< 7400 


RCT .MT 


■ 


RCT .PR 


= 20000 


RCT .SE 


= 30000 


RCT .EN 


s 100000 


SDIS 


= 17 


SDITO 


: 4400 


SECSZ 


> 2S6. 


SEOUEN 


= 10 


STDALN 


= BIT08 


SYNCL 


< AHOBC 


SYNCH 


■ *H02600 


UNITF 


If HIBYT 


CTMOUT 


= 120 . 


MODNUM 


= 440 


CODVER 


: i 19 . 



120000 
1 7O00O 



XBNCOD 
XBNSTR 

. PAGE 



:= 120000 
: : 170000 



ONLINE RECOVERY IN PROGRESS FLAG 

MASK FOR MSCP OP CODE 

SIZE OF HOST PAGE 

LENGTH OF PTE IN WOROS 

MASK FOR MSCP PACKET QUEUE STATUS 

RBN HEADER CODE 

MASK FOR RBN'S/TRACK 

PRIMARY RBN HEADER CODE 

SECONDARY RBN HEADER COOE 

BAD HEADER CODE 

RBNXOR = RBNPRM XOR. RBN2ND 
RBNXOR-RBNXOR 

; H1IX0R < H1IC0D .XOR. RBN2N0 
HI IX0R-H1 1X0R 

MASK FOR STARTING HI RBN 

RCT CODE FOR EMPTY ENTRY 

RCT COOE FOR RBN USED AS PRIMARY REPLACEMENT 

RCT CODE FOR RBN USEO AS SECONOARY REPLACEMENT 

RCT COOE FOR ENTRY PAST END OF RCT 

MASK FOR CONTROL REGISTER SDI SELECT 

SDI INTERCONNECT MAX CLOCK TICK TIMEOUT 

SECTOR SIZE 

SEQUENTIAL COMMAND MASK 

STANDALONE BIT IN GET STUD STATUS RESPONSE 

SYNC CHARACTER LOW 

SYNC CHARACTER HIGH 

MASK FOR UNIT FLAGS 

CONTROLLER TIMEOUT = 2 MINUTES 

CONTROLLER MODEL NUMBER (IS. IN BITS 4-10) 

MICROCDOE VERSION NUMBER s 2 . O ( AOOO - A003 = I 
( A004-A005: 1 ) ( AOOB=2 ) ( A007 = 3 J { A008:4 ) ( A009 = 5 ) 
(A010-A01 I >6I (A012iT) ( AO I 3 - AO 1 4 ' 8 . ) 
(AO15-A018=9. [mjtOS 1 ) ( AO 19=10. [mjt 09 al) 
(A020: 1 1 . [mjt 101 ,A021 = 1 1 . [mjt 1 1 1 A020 was 
never rel eased ) ( A022 : 1 2 . [m jt 1 2 ] ) 
(A023: 15. [mjt 131 ) ( 13 8 14 not used because 

of parity and just because it is 13.) 
( A024= 16 . IE121 ] - [E124I ) 

XBN SECTOR CODE 

MASK FOR START XBN 



o 
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DEFINITION OF REFERENCES IN BUFFER MAP 

BASE LEVEL THREE 

DIAGNOSTIC MACHINE REGISTER SAVE AREA 



000000 
00000 1 
000002 

000003 
000004 
000005 
OOOOOB 
000007 



0MREG7 


: O 


; DIAGNOSTIC 


MACHINE 


REGISTER 


7 


DMREG 1 


: 0MREG7*! 


; DIAGNOSTIC 


MACHINE 


REGISTER 


1 


DMREG2 


= DMREG 1*1 


; DIAGNOSTIC 


MACHINE 


REGISTER 


2 


DMREG3 


= 0MREG2+1 


; DIAGNOSTIC 


MACHINE 


REGISTER 


3 


DMREG4 


: DMREG3+1 


i DIAGNOSTIC 


MACHINE 


REGISTER 


4 


DMREG5 


a DMREG4*1 


; DIAGNOSTIC 


MACHINE 


REGISTER 


5 


DMREG6 


= DMREG5-H 


; DIAGNOSTIC 


MACHINE 


REGISTER 


6 


DMREGO 


> DMREGB+1 


; DIAGNOSTIC 


MACHINE 


REGISTER 






0. PROCESSOR HEAOER COMPARE STORAGE AREA 



HEAOER :• OMREGO+1 i BUFFER STORAGE FOR SECTOR HEADER ( HORCMP ) 

ASSUME HEA0ER817, LE, 10 
; * DRIVE RESPONSE STORAGE AREA 



0OO0 1 1 
000007 



INPUT 
INPLEN 



HEAOER* I 

7 



DRIVE RESPONSE INPUT AREA 

LENGTH OF DRIVE RESPONSE AREA (14 BYTES] 



HOST COMMUNICATION DATA AREA 



NOTE THAT RSPLEN , RSPPTR . RSPCOF , RSPPOF . RCSRWO , RCSRW1 MUST BE KEPT IN THAT ORDER **» 



000020 
0O0O2 1 

000022 
000023 
000024 
000025 

000000 



OO0026 
000027 



000030 
KDBUP 



RSPLEN 
RSPPTR 

RSPCOF 
RSPPOF 
RCSRWO 
RCSRW1 



CMDLEN 
CMDPTR 



HEADER*S . 
RSPLEN+1 

RSPPTR*! 
RSPCOF* 1 
RSPPOFtl 
RCSRWO* 1 



RESPONSE RING BUFFER LENGTH 
HOST RESPONSE RING BUFFER POINTER 
AOOR : RING BASE * 4*RSPPTR 
RESPONSE CURRENT RING OFFSET SAVE 
RESPONSE PREVIOUS RING OFFSET SAVE 
RESPONSE CSR WORD O SAVE 
RESPONSE CSR WORD 1 SAVE 



ASSUME RCSRW1 ,EQ, <RSP L EN* < RCSRW1 -RSPLEN>> 

NOTE THAT CMD L EN , CMOPTR , CMDCOF , CMOPOF . CCSRWO . CCSRW1 MUST BE KEPT IN THAT ORDER 



:= RCSRW1*! 
: = CMOLEN+I 



CMDCOF = CMDPTR+1 
KDB5Q. MICRO CODE., 22-APR-198S 11:16:43.97 



COMMANO RING BUFFER LENGTH 

HOST COMMAND RING BUFFER POINTER 

ADOR = RING BASE + 4*(RSPLEN * CMDPTR) 

COMMANO CURRENT RING OFFSET SAVE 
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^»S*^ 






00003 1 
000032 
000033 

OOOOOO 
000OO2 
0O0O04 

00O006 



000034 
000035 
00003S 
000040 
000042 
000044 
000045 
00004S 
OO0047 
000050 
00005 1 
000052 



000035 
000O46 
000057 
000035 
00004S 
00004S 
000057 
000070 
000070 
OOOI 12 
0001 12 
OOOI 22 
OO0O61 
O000G2 
O00063 
O00OS4 



000123 
O00123 



CMDPOF 
CCSRWO 
CCSRWI 



CMDCOF+ 1 
CMDPOF+1 
CCSRWO +1 



COMMAND PREVIOUS RING OFFSET SAVE 
COMMAND CSR WORD SAVE 
COMMAND CSR WORD 1 SAVE 



FAI LUR 

ALOLMT 

SEX2SK 

CNVTV1 

CNVTV2 

CNVTV3 

CNVTV4 

TEMPI 

TEMP2 

TEMP3 

SEKPRV 

SEKSAV 



ASSUME CCSRW1 ,EQ, < CMOLEN+ < CCSRWI -CMDLEN>> 

RSPO :s 2 ; RESPONSE INTERRUPT RING BASE NEGATIVE OFFSET 

CMDO := 4 ; COMMAND INTERRUPT RING BASE NEGATIVE OFFSET 

VAXO := 6 ; VAX PURGE INTERRUPT RING BASE NEGATIVE OFFSET 

MISCELLANEOUS WORD ALLOCATIONS (NAME OF ROUTINE USED IN) 

CCSRW1+1 ; INTERNAL FAILURE CODE 

FAILUR+1 ; ALLOCATION LIMIT (U.ALOC) 

ALOLMT+1 ; NUMBER OF SECTORS UNTIL SEEK (U.ALOC) 

<FAILUR+17>i77B0; U.CNVT VARIABLE #1 (2 WORDS) 

CNVTV1+2 ,' U.CNVT VARIABLE #2 (2 WORDS) 

CNVTV2+2 ; U.CNVT VARIABLE #3 (1 WORD) 

CNVTV3+1 ; U.CNVT VARIABLE #4 (I WORD) 

CNVTV4+1 ; TEMPORARY STORAGE #1 

TEMP1+1 ; TEMPORARY STORAGE #2 

TEMP2+1 ; TEMPORARY STORAGE #3 

TEMP3+1 ; SEEK ORDERING PREVIOUS SAVE 

SEKPRV+1 ; SEEK ORDERING SAVE AREA 



ECC ROUTINE BUFFER STORAGE 

NOTE THAT THESE LOCATIONS OVERLAY THE AREA STARTING AT 



ECC9 . 1 


= FAILUR+1 


ECC9 .2 


: ECC9 . 1+9 


ECC9 . 3 


-- ECC9.2 + 9 


ELPN 


> ECC9 . 1 


ELPM 


< ECC9 . 2 


EVAL 


= ELPM 


ELPP 


» ECC9 . 3 


ELPO 


= ELPP+9. 


ELOC 


-- ELPO 


SY 


= ELPO+18. 


SYO 


= SY 


SYS 


- SY+S. 


M 


= ELPP+2 


ISM 


s ELPP+3 


DISN 


s ELPP+4 


LM 


= ELPP+5 



FIRST ECC 9 WORD BUFFER AREA (ECCC) 
SECOND ECC 9 WORD AREA (ECCC) 
THIRD ECC 9 WORD AREA (ECCC) 



EVAL OVERLAYS ELPM 



ELOC OVERLAYS ELPO 



REVECTORING/REPLACEMENT STORAGE AREA 



REVSTR 
RVCSAV 



: = SY8+1 
: = REVSTR 



START OF REVECTORING RAM ASSIGNMENTS 

SAVES ORIGINAL REQUEST'S I/O PARAMETERS (5 WORDS) 
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000 130 
OOOI 3 1 
000132 
OOOI 33 



RVCBNL 
RVCBNH 
RVCTA 
REVEND 



RVCSAV+5 
RVC8NL+1 
RVCBNH+1 
RVCTA+1 



HOLDS ORIGINAL LBN IN ERROR (LO) 

HOLDS ORIGINAL LBN IN ERROR (HI) 

HOLDS ORIGINAL TRACK ADDRESS AND REAL TIME OP CODE 

END OF REVECTORING STORAGE AREA 



DYNAMIC BUFFER ALLOCATION STACK AREA 

BIT OF REGISTER RLL CONTAINS THE BUFFER LOCK FLAG AND ALONG WITH 
BITS 1 -> S OF RLL FORM THE ODD POINTER INTO THE FOLLOWING STACK 
THE STACK CONTAINS 1 ENTRY FOR EACH BUFFER AVAILABLE PLUS 1 AND 
THE LAST ENTRY CONTAINS A 2ER0 TO INDICATE THAT THERE ARE NO 
BUFFERS LEFT. EACH ACTIVE STACK ENTRY CONTAINS THE ADDRESS OF A 
DATA BUFFER. 



000132 

OOOOOO 
000133 
OO0134 
000135 

0001 36 

0001 37 

0001 40 

0001 4 1 

0001 42 
OQ0143 
000144 
000145 
000146 
000147 
000150 
000151 
O0O152 
O00153 
000 154 

0001 55 

0001 56 

0001 57 
OOOI 60 
0001 6 1 
000 1 62 
0001 63 
OOOI 6 4 
0001 65 
OOOI 6 6 
OOOI 6 7 
0001 70 



000020 

KDBUP 



BUFPTR 


■■ REVEND 


ASSUME REVEN0S1 . EQ. 1 


BUFPOO 


= BUFPTR 


ECOUNT 


= BUFP00+1 


BUFP01 


i ECOUNT+1 


HDLMT 


= BUFP01+1 


BUFP02 


= HDLMT+1 


UBURST 


s BUFP02+1 


BUFP03 


: UBURST+1 


CLIMIT 


- BUFP03+1 


BUFP04 


,s CLIMIT+1 


OPCODE 


= BUFP04+1 


BUFP05 


s OPCODE+I 


MRQUE 


= BUFP05+1 


BUFP06 


= MRQUE+1 


MWQUE 


: BUFP06+1 


BUFP07 


= MWOUE+1 


OUESAV 


s BUFP07+1 


BUFP08 


= QUESAV+1 


LOGLEN 


= BUFP0S+1 


BUFPOS 


= LOGLEN+1 


NSEEKS 


■ BUFP09+1 


BUFP10 


: NSEEKS+1 


RNGBSL 


= BUFP10+1 


BUFP1 1 


= RNGBSL+1 


RNGBSH 


= BUFP1 1 ♦ 1 


BUFP12 


= RNGBSH+1 


INTVEC 


« BUFP12+1 


8UFP13 


■ INTVEC+1 


DMTEMP 


= BUFP13+1 


BUFP 14 


= DMTEMP+1 


CNTFLG 


= BUFP14+I 



START OF BUFFER POINTER STACK 



**» N 

* * * B 
SAVE 

* * * 
SEARC 

* * * D 
UNIBU 



OTE 

UFFE 

NUMB 

ATA 

H LI 

ATA 

S TR 



*** OATA 



COMMA 
*** 
OP CO 
**» D 
MA I NT 
*** 
MAINT 
*** 
QUEUE 

* ** D 
ATTEN 
*** D 
NUMBE 

* * * ! 
RING 
**« I 
RING 
*** ! 
HOST 

* * * D 
DMDT 

* * * 1 
MSCP 



NO L 

ATA 

OE S 

ATA 

ENAN 

ATA 

ENAN 

ATA 

STA 
ATA 
TION 
ATA 
R OF 
ATA 
BUFF 
ATA 
BUFF 
ATA 
INTE 
ATA 
TEMP 
ATA 
CONT 



BIT O 

R STACK 

ER OF E 

BUFFER 

MIT COU 

BUFFER 

ANSFER 

BUFFER 

IMIT WO 

BUFFER 

AVE FOR 

BUFFER 

CE READ 

BUFFER 

CE WRIT 

BUFFER 

TUS AND 

BUFFER 

/ERROR 

BUFFER 

SEEKS 
BUFFER 
ER BASE 
BUFFER 
ER BASE 
BUFFER 
RRUPT V 
BUFFER 
GRARY 

UFFER 
ROLLER 



MUST BE ONE 

NULL ENTRY (= 0) 
CC SYMBOLS IN ERROR 
POINTER 1 

NTER (HDRCMP, D . IOPR) 
POINTER 2 

BURST SIZE (IN TWO WORD PAIRS) 
POINTER 3 
RK WORD 
POINTER 4 

U . ALOC, U . BMTY.U. BFIL 
POINTER 5 

QUE HEAD 
POINTER 6 

QUE HEAD 
POINTER 7 

LINK WORD SAVE AREA 
POINTER 8 
LOG PACKET LENGTH 
POINTER 9 
TO BE INITIATED 
POINTER 10 

LO 
POINTER 11 

HI (14 BITS) 
POINTER 12 

ECTOR (IF EQ O THEN NEVER INTERRUPT) 
PO INTER 1 3 
AVE AREA 
POINTER 14 
FLAGS 



CF.THS 1= BIT04 
KDB50. MICROCODE., 22 -APR-19S8 11:16:48.97 
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000100 
000200 
000320 



OO10O0 
000400 

00017 1 
OOOI72 
000173 



BUFP1S 

SAVR7 

BUFP16 



CF .MSC 
CF . ATN 
CFLAGS 



:: BITOS ; ENABLE MISCELLANEOUS ERROR LOG MESSAGES 

:s BIT07 ; ENABLE ATTENTION MESSAGES 

:s CF . THS !CF. ATN1CF.MSC ; FLAGS SUPPORTED BY THE CONTROLLER 

LG ; CONTROLLER STATUS WORD (HI BYTE), 

; MSCP HOST FLAGS (LO BYTE) 

CON. ST BIT DEFINITIONS (UPPER BYTE) 



LFAIL 
VAX.PG 



: : BITI5 

! > BIT14 

; = BIT13 

: ■ BIT12 

: ■ 8 I T 1 1 

! i BIT10 

: = BITOS 

:= BITOS 



CNTFLG*! 

BUFP15+1 
SAVR7+1 



o 



NOT USED 

NOT USED 

NOT USED 

NOT USED 

NOT USED 

NOT USED 



SEND LAST FAILURE LOG PKT 
VAX PURGE REQUIRED 



O = NO PURGE. 

**» OATA BUFFER POINTER 15 

FOR SAVING R7 IN ECC ROUTINE 

*s* DATA BUFFER POINTER 16 



TIMER/COUNTER SERDES SYNC STORAGE 



000174 
000 17S 
000 176 
000177 
O00200 
000201 
000202 
000203 



TMR.MC 

BUFP17 

TMR. BS 

BUFP18 

HOSTMO 

BUFP19 

SYNC 

BUFP20 



BUFP1 6*1 
TMR.MCtl 
BUFP17*! 
TMR.BS*! 
BUFPI8*! 
HOSTMO+I 
BUFP19*! 
SYNC+1 



HOST MSCP ACTIVITY TIMER 

««« DATA BUFFER POINTER 17 

CONTROLLER I NTERNAL T I MER BASE 

*** DATA BUFFER POINTER 18 

HOST TIMEOUT (SECS). IF EO THEN NO TIMEOUTS EVER ! 

«»* OATA BUFFER POINTER 19 

SYNC PATTERN ( L E VOWR , D . WDAT ) 

*** DATA BUFFER POINTER 20 



HOST MSCP PACKET RING SUFFER STORAGE AND POINTERS 



000204 

000205 
000206 
000207 
0002 10 
00021 1 
000212 
0002 13 
0002 14 
000215 
0002 1 6 
O0O2 17 
000220 
00022 1 



HSTOUE 

BUFP21 
DTEMP1 
BUFP22 
UTEMP1 
BUFP23 
LV1SV1 
BUFP24 
LV 1SV2 
BUFP25 
RVCIND 
BUFP26 
RVCRTY 
BUFP27 



BUFP20*1 

BITS 1 1 - 

HSTOUE*! 

BUFP21+1 

DTEMP1*! 

BUFP22+1 

UTEMP1+I 

BUFP23+1 

LVISVIfl 

BUFP24*! 

LV1SV2*! 

BUFP2S+ 1 

RVCINOt! 

BUFP26*! 

RVCRTY*! 



ST MSCP RESPONSE OUEUE 
ST MSCP PACKET ADDRESS 

< DATA BUFFER POINTER 21 
PROC TEMP STORAGE 

« OATA BUFFER POINTER 22 
PROC TEMP STORAGE 

> DATA BUFFER POINTER 23 
V1RD STATUS SAVE WORD 

> DATA BUFFER POINTER 24 
V1RD OPCODE SAVE WORD 

* DATA BUFFER POINTER 25 

LO ENTRY INDICATOR (FOR U.RV57) 

< DATA BUFFER POINTER 26 
TRY COUNT WHEN READING RCT 
« DATA BUFFER POINTER 27 



KDBUP 
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000222 
000223 
0O0224 
000225 
000226 
0O0227 
000230 
000231 
000232 
000233 
000234 
000235 
0OO236 
0OO237 
0O0240 
000241 
000242 
000243 
000244 
000245 
OO0246 
OO0247 
0O0250 
00025 1 
000252 
000253 
000254 
000255 
OO0256 
0OO257 
000260 
00026! 
000262 
000263 
000264 
000265 
OO0266 
000265 
000266 
000267 
000270 
00027 1 
0OO272 
000271 
000272 
000273 
0OO274 



000275 
000276 
000277 
000300 
OO03O1 



RCTOFF 
BUFP28 
RCTBLK 
BUFP29 
RVCBUF 
BUFP30 
RVCEBF 
BUFP31 
RVCSDI 
BUFP32 
RVCVEC 
BUFP33 
BTCNT 
BUFP34 
LN 

BUFP35 
CMPBUF 
BUFP36 
MAPSAV 
BUFP37 
MAPFLG 
BUFP38 
RVECUP 
BUFP39 
RVECDP 
BUFP40 
RVCFLG 
BUFP41 
TEMP 
BUFP42 
REPSTA 
BUFP43 
SAVUAR 
BUFP44 
MSCPLN 
BUFP45 
SAVEDC 
BADRL 
BADRH 
BUFP46 
SAVBUF 
BUFP47 
SAVCNT 
RGDATL 
RGOATH 
8UFP43 
SAVADR 



BUFP49 
LGCKSV 
BUFP50 
8IRTRY 
BUFP51 



BUFP27+1 

RCTOFP+1 

BUFP2S+1 

RCTBLK+1 

BUFP29*1 

RVCBUF+ 1 

BUFP30-H 

RVCEBF-H 

BUFP31+1 

RVCSDItl 

BUFP32+1 

RVCVEC+1 

BUFP33+ 1 

BTCNT*! 

BUFP34+I 

LN+1 

BUFP35+1 

CMPBUF+1 

BUFP36-M 

MAPSAV+1 

BUFP37+1 

MAPFLG+1 

BUFP38+1 

RVECUP*! 

BUFP39+1 

RVECDP*! 

BUFP40*! 

RVCFLG+1 

BUFP41-H 

TEMP* I 

8UFP4 2+1 

REPSTA-H 

BUFP43-M 

SAVUAR+ 1 

BUFP44+1 

MSCPLN-H 

BUFP45+ 1 

BUFP4S 

BUFP45*! 

SAVEDC*! 

BUFP46*! 

SAVBUF+1 

8UFP47+1 

BUFP47 

BUFP47-H 

SAVCNT+1 

BUFP48+1 

BUFP48 

BUFP48-M 

SAVADR+ 1 

BUFP49*! 

LGCKSV*! 

BUFP50* ! 

BUFP50*2 



STARTING SEARCH OFFSET IN CURRENT RCT BLOCK 

»«* DATA BUFFER POINTER 28 

CURRENT RCT BLOCK (AS OFFSET FROM RCT BASE) 

«** DATA BUFFER POINTER 29 

POINTER TO ORIGINAL BUFFER IN ERROR 

*** OATA BUFFER POINTER 30 

HOLDS BUF.NL OF BUFFER IN ERROR 

**« DATA BUFFER POINTER 31 

CURRENT SOI PORT UNDERGOING REVECTORING (O IF NONE) 

»*» OATA BUFFER POINTER 32 

REVECTORING DISPATCH VECTOR : EVEN FOR OPROC , ODD FOR UPROC 

*»» DATA BUFFER POINTER 33 

BUFFER SERVICE FAIRNESS COUNTER 

*** OATA BUFFER POINTER 34 

ECC VARIABLE 

«»» DATA BUFFER POINTER 35 
[chOl] POINTER TO DEDICATED COMPARISON BUFFER 

>•• DATA BUFFER POINTER 36 
iUQAl TEMP SAVe FOR MAPPING INFORMATION 

»** OATA BUFFER POINTER 37 
IU0A1 FLAG FOR MAPPING 

*»* DATA BUFFER POINTER 38 
IUQAl U PROC REVECTOR VECTOR 

*** DATA BUFFER POINTER 39 
[UQA1 D PROC REVECTOR VECTOR 

»«» DATA BUFFER POINTER 40 
[UQA] REVECTOR PROC FLAG 

*«* DATA BUFFER POINTER 4! 
(V051 TEMPORARY STORAGE 

*** OATA BUFFER POINTER 42 
IEERREC1H0LD REVECTOR STATUS 

»'»» DATA BUFFER POINTER 43 

Storage for UAR 

*'«* OATA BUFFER POINTER 44 
[rae02] *** MSCP msg length 

»** DATA BUFFER POINTER 45 

[qdal Storage for edc for nonblock 
CONTAINS LO WORO OF CONTROLLER SIIC BASE ADORESS 
CONTAINS HI WORD OF CONTROLLER SIIC BASE ADDRESS 

*** DATA BUFFER POINTER 46 

[qdal Storage for buffer ptr for nonblock 

*»* DATA BUFFER POINTER 47 

I qda ] Storage for word count for nonblock 
CONTAINS LO WORD OF SIIC REGISTER DATA 
CONTAINS HI WORD OF 31 IC REGISTER DATA 

*«* DATA BUFFER POINTER 48 
[qda] Storage for host adr for nonblock 
available for BDA uses 
available for BOA uses 

*** OATA BUFFER POINTER 49 

[rae07] Storage for Ant i log/log check pointer 

»*» OATA BUFFER POINTER 50 
[rrtjtoa] bi retry count (4096) 

•** DATA BUFFER POINTER 51 






KDBUP 
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MSCP PACKET STORAGE AND DEFINITION AREA (MSCP VI. 2 09-APR-82) 



000024 
000000 

oooooo 

000020 
1777BO 
OO00O2 

000040 
O00O34 
OO0030 
000054 
000014 
000034 
OOO02O 
000030 
000022 
000070 
000304 
000342 
000342 
000342 
000374 
00042S 
0004S0 
O00S12 
OO0544 
000576 
000630 
O00662 
0007 14 
000746 
001 ooo 
001032 
O01064 
OOI I t 6 
001 ISO 
001202 
001234 
001266 
001320 
001352 



NPKTS 
VC .CMD 
VC. RSP 
VC . LOG 
VC . DMM 
P 

AVL . LN 
BAD . LN 
CNT . LN 
DSK. LN 
DUP . LN 
LOG . LN 
MCP . 10 
MCP . LN 
MCP . RD 
SOI . LN 
LOGPKT 
LOGEND 
PKTBUF 
PKT001 
PKT002 
PKT003 
PKT004 
PKTOOS 
PKT006 
PKT007 
PKTOOS 
PKTOOS 
PKT010 
PKT01 1 
PKT012 
PKT013 
PKT014 
PKT015 
PKT01 6 
PKT017 
PKT01S 
PKT019 
PKT020 
PKTEND 



1*16. 
177760 



IS . 




56. 




BUFP52+1 




LOGPKT+LOG 


LN + P 


<L0GEN0+1 >8177776 


PKTBUF 




PKT001+MCP 


LN + P 


PKT002+MCP 


LN + P 


PKT003+MCP 


LN + P 


PKT004+MCP 


LN + P 


PKTOOS+MCP 


LN + P 


PKT006+MCP 


LN + P 


PKT007+MCP 


LN + P 


PKT008+MCP 


LN + P 


PKT009+MCP 


LN + P 


PKTOIO+MCP 


LN + P 


PKT01 1 + MCP 


LN + P 


PKT01 2+MCP 


LN + P 


PKT01 3 + MCP 


LN + P 


PKT014+MCP 


LN + P 


PKT015+MCP 


LN + P 


PKT01 6+MCP 


LN + P 


PKT017+MCP 


LN + P 


PKT01S+MCP 


LN + P 


PKT019+MCP 


LN + P 


PKTO20+MCP 


LN + P 



NUMBER OF MSCP PACKETS 

COMMAND VIRTUAL CIRCUIT ID 

RESPONSE AND ATTENTION VIRTUAL CIRCUIT ID 

ERROR LOG VIRTUAL CIRCUIT 10 

DIAGNOSTIC MACHINE MODE VIRTUAL CIRCUIT 10 

MSCP PKT OFFSET (1ST WORD IS OUEUE WORD) 

2ND WORO IS VIRTUAL CIRCUIT IDENTIFIER 

AVAILABLE ATTENTION MESSAGE LENGTH (BYTES) 

BUS ADDRESS ERROR LOG PACKET LENGTH (BYTES) 

CONTROLLER ERROR LOG PACKET LENGTH (BYTES) 

DISK ERROR LOG PACKET LENGTH (BYTES) 

DUPLICATE ATTENTION MESSAGE LENGTH (BYTES) 

ERROR LOG PACKET MAXIMUM LENGTH (28. WORDS) 

LENGTH FOR MSCP I/O END PACKETS 

MSCP PACKET LENGTH (WOROS) 

MAXIMUM MSCP PACKET READ LENGTH (WORDS) 

SDI ERROR LOG PACKET LENGTH (BYTES) 

COMMON ERROR LOG AND ATTENTION PACKET 

END OF LOG PACKET (27 WOROS LONG) 

START OF MSCP PACKET BUFFERS (MAKE SURE ITS EVEN) 

1ST MSCP PACKET BUFFER 

MSCP PACKET BUFFER 

MSCP PACKET BUFFER 
UFFER 



2ND 
3RD 
4TH 
5TH 
6TH 
7TH 
STH 
9TH 



MSCP PACKET 

MSCP PACKET BUFFER 

MSCP PACKET BUFFER 

MSCP PACKET BUFFER 

MSCP PACKET BUFFER 

MSCP PACKET BUFFER 



10TH MSCP PACKET 
11TH MSCP PACKET 
12TH MSCP PACKET 



BUFFER 
BUFFER 
BUFFER 



13TH MSCP PACKET BUFFER 

14TH MSCP PACKET BUFFER 

15TH MSCP PACKET SUFFER 

16TH MSCP PACKET BUFFER 

17TH MSCP PACKET BUFFER 

18TH MSCP PACKET BUFFER 

19TH MSCP PACKET BUFFER 

20TH MSCP PACKET BUFFER 
END OF MSCP PACKETS BUFF 



MSCP PACKET QUEUE POINTERS 



THE PACKET OUEUE POINTERS PRECEED THE FIRST WORD OF THE MSCP PACKET AREA 
FOR EACH OF PACKETS. THERE ARE -NPKTS' PACKETS, -NPKTS" ARE USED TO 



KOB 50. MICROCODE. .22-APR-19S8 11 : 16:48.97 
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HOLD MSCP COMMANDS ANO 1 IS DEDICATED FOR USE WITH 'ATTENTION' AND 
'ERROR LOG' PACKETS SENT FROM THE CONTROLLER. THIS DEDICATED 'LOG' PACKET 
IS ALSO USED TO HOLD AN IMMEDIATE COMMAND WHEN THE HOST HAS ALL OF THE 
OTHER PACKETS IN USE. THE OUEUE POINTERS CONSIST OF A NEXT PACKET POINTER 
AND STATUS BITS (P. LINK) AS DESCRIBED BELOW: 

; *---------------------....-----...........__....._................ 

; * RELATIVE REFERENCES TO FLAGS WITHIN A QUEUE POINTER 



lOOOOO 
040000 



0O0OO1 
000020 
0000 1 7 
0000 10 
00002 1 
000040 
OO0O1 3 
000022 
000023 
000002 
0000 1 6 
OO0003 
OO0030 
000031 
0000 1 1 
00004 1 
OQ0024 
000004 
0000 1 2 
000042 



OOOOOO 

00000 1 

oooooo 



QQOOOI 
000002 



000002 

KDBUP 



PSTAT 
PACTV 



BIT 15 
BIT 14 
BITS 13 



O = MSCP PACKET AVAILABLE. 1 = MSCP PKT IN USE 

O = PACKET IN QUE, 1 = PACKET ACTIVE 

0=LAST PACKET IN CHAIN, NEQ OsPOINTER TO NEXT PACKET 



MSCP PACKET COMMAND OP COOES - MSCP VERSION I.O 28-JAN-8I 



MSCP - ABORT OP CODE 

MSCP - ACCESS OP CODE 

CONTROLLER - ATTENTION PROCESSING OP CODE 

MSCP - AVAILABLE OP CODE 

MSCP - COMPARE CONTROLLER DATA OP CODE(NOP) 

MSCP - COMPARE HOST DATA OP CODE 

MSCP - OETERMINe ACCESS PATHS COMMAND 

MSCP ■ ERASE OP CODE 

MSCP - FLUSH CACHE OP COOE(NOP) 

MSCP - GET COMMAND STATUS 

CONTROLLER - GET DRIVE STATUS OP CODE 

MSCP - GET UNIT STATUS OP CODE 

CONTROLLER - MAINTENANCE READ COMMAND 

CONTROLLER - MAINTENANCE WRITE COMMAND 

MSCP - ONLINE OP CODE 

MSCP - READ OP CODE 

MSCP - REPLACE OP CODE 

MSCP - SET CONTROLLER CHARACTERISTICS OP CODE 

MSCP - SET UNIT CHARACTERISTICS OP CODE 

MSCP - WRITE OP CODE 



MSCP COMMAND PACKET OFFSETS 



PACKET STATUS AND LINK WORD 

VIRTUAL CIRCUIT IDENTIFIER 

UQ PORT MSG LENGTH OVERLAIO BY PACKET LINK 

;LOW 4 BITS OF P.VCID ARE CLEARED BY U . RECV !< ARE USED AS FLAGS 



OP 


ABO 


= 1 


OP 


ACC 


s 20 


OP 


ATT 


= 17 


OP 


AVL 


s 10 


OP 


ceo 


= 21 


OP 


CMP 


= 40 


OP 


DAP 


: 13 


OP 


ERS 


: 22 


OP 


FLU 


= 23 


OP 


GCS 


= 2 


OP 


GST 


-- 16 


OP 


GUS 


: 3 


OP 


MRD 


= 30 


OP 


MWR 


= 31 


OP 


ONL 


: 1 1 


OP 


RD 


= 4 1 


OP 


RPL 


■ 24 


OP 


see 


= 4 


OP 


sue 


= 12 


OP 


WR 


>■ 42 



P . LINK 


= P 


2 


P . VCID 


s P 


1 


UQ. CNT 


= P 


LINK 



PABRT 
PONER 



P . CRFO : = P+0 
KDB50. MICROCODE. .22-APR-1988 11 : 16:48.97 



= BITOO 
= BIT01 
= BITS 3-2 



; UNUSED 
COMMAND REFERENCE NUMBER (LO) 



PACKET MARKEO FOR ABORT 

AVAIL PART OF FAILED ONLINE COMMAND 
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000003 
0O0004 
OOOOOS 
000004 
000006 
OOOOO? 
O00O10 
0000 10 
OOOOI 1 
000012 
000012 

00001 3 

00001 4 
000015 

0000 1 s 
0000 17 
00001! 
000013 
000020 
000021 
OOOOIO 
000011 

00001 1 
000022 
000022 
OOO023 

00001 2 
000O13 
000020 
00002 1 

00001 o 

0000 1 1 
000010 

00001 1 
000012 
OOO02O 
000021 
000022 
000023 
000026 



000022 
000023 
OOO024 
000025 
000026 

00001 6 

00001 7 
OOO027 
000030 
00O031 
00O03 1 



2901 ASSEMBLER VERSION 32 



PAGE 064 



p . 


CRF1 


: « P . CRFO+1 


p . 


UNIT 


: a p + 2 


p 


RS03 


: i P + 3 


p 


CONS 


: = P + 2 


p 


OPCO 


: = P + 4 


p 


MOD 


: = P + 5 


p 


RSOS 


: « P + 6 


p 


BCNO 


: i P + 6 


p 


BCN1 


: = P .BCNO+1 


p 


RS06 


: ■ P+8 . 


p 


BUFO 


: = P+8 . 


p 


BUF1 


:■ P.BUFO+1 


p 


BUF2 


: « P .BUF1+1 


p 


BUF3 


: = P.BUF2+1 


p 


BUF4 


: I P.BUF3+1 


p 


BUFS 


: t P .BUF4+1 


p 


BUFL 


: » P .BUFO 


p 


BUFH 


: = P .BUF1 


p 


LB NO 


: « P+14. 


p 


LBN1 


: ■ P . LBNO+1 


p 


RFNO 


: i P + 6 


p 


RFN1 


:: P.RFNO+1 


p 


UNFL 


: = P + 7 


p 


SHUN 


:: P+16 . 


p 


RSI 6 


= P+16 . 


p 


RSI 7 


: = P+17 . 


p 


HSTO 


: : P+8 . 


p 


HST1 


: = P .HSTO+1 


p 


EL GO 


: = P+14 , 


p 


ELG1 


: = P.ELGO+1 


p 


RBNO 


: = P+6 . 


p 


RBN1 


: . P .RBNO+1 


p 


VRSN 


: > P + 6 


p 


CNTF 


: < P + 7 


p 


HTMO 


: = P + S . 


p 


RGIO 


: = P+14 . 


p 


RGI 1 


: t P .RGIO+1 


p 


RGOO 


: = P+16. 


p 


RG01 


: J P.RGOO+1 


p 


CYLS 


:= P+20. 


THESE OFFSETS ARE T 


S 


. ADRL 


: r P+16. 


s 


. ADRH 


: = S.AORL+1 


S 


.CYLL 


: = P+18 . 


S 


.CYLH 


: s s . CYLL+1 


s 


GRUP 


: = S .CYLH+1 


s 


. LBNL 


: = P.BUF4 


s 


. LBNH 


: = P. BUFS 


s 


. TRAK 


:» S.GRUP+1 


s 


.SECS 


:= S.TRAK+1 


s 


.SECI 


: ■ S .SECS+1 


s 


.OPFL 


: = S.SECI 



LO 16 BITS OF ADOR 
BITS OF AOOR 



COMMAND REFERENCE NUMBER [HI! 

UNIT NUMBER FIELD 

RESERVED THIRD WORD 

DMOT CONSOLE ADDRESS (=0 FOR 777S60I 

OPCODE FIELD (LO BYTE1/HI B YTE > RESERVEO 

MODIFIERS FIELD 

RESERVED SIXTH WORD 

BYTE COUNT (LO) 

BYTE COUNT (HI) 

RESERVED EIGHTH WORD 

BUFFER OESCRIPTOR (1ST WORD) 

BUFFER DESCRIPTOR (2ND WORD) HI 

BUFFER DESCRIPTOR (3RD WORD) 

BUFFER OESCRIPTOR (4TH WORD) 

BUFFER OESCRIPTOR (STH WORD) SAVE LO LBN OF 1ST BAD BLOCK 

BUFFER OESCRIPTOR ( 6TH WORD) SAVE HI LBN OF 1ST SAO BLOCK 

CONTROLLER/MSCP BUFFER DESCRIPTOR LO 

CONTROLLER/MSCP BUFFER DESCRIPTOR HI 

LOGICAL BLOCK NUMBER (LO) 

LOGICAL BLOCK NUMBER (HI) 

ABORT/GET COMMAND STATUS REF # (LO) 

ABORT/GET COMMAND STATUS REF # (HI) 

ONLINE/SET UNIT CHAR UNIT FLAGS 

SHADOW UNIT 

reserved Field at offset 16. ;[E122] 

reserved field at offset 17. ;1E122] 

HOST ID (LO) 

HOST ID (HI ) 

ERROR LOG FLAGS (LO) 

ERROR LOG FLAGS (HI) 

REPLACE RBN (LO) 

REPLACE RBN (HI) 

SET CONTROLLER CHAR MSCP VERSION 

SET CONTROLLER CHAR CONTROLLER FLAGS 

SET CONTROLLER CHAR HOST TIMEOUT 

MAINTENANCE READ/WRITE REGION ID (LO) 

MAINTENANCE READ/WRITE REGION ID (HI) 

MAINTENANCE READ/WRITE REGION OFFSET (LO) 

MAINTENANCE READ/WRITE REGION OFFSET (HI) 

GET UNIT STATUS CYLINDER SIZE 



CURRENT HOST MEMORY TRANSFER ADDRESS (LO) 

CURRENT HOST MEMORY TRANSFER ADDRESS (HI) 

SDI LO CYLINDER # 

SOI HI CYLINDER # 

SDI GROUP NUMBER 

CURRENT HEADER (LBN) LO 

CURRENT HEADER (LBN) HI 

SDI TRACK NUMBER 

SDI START SECTOR 

SOI INDEX SECTOR 

OP CODE AND FLAGS FOR READ/WRITE COMPARE 



o 



OVERLAYS 
OVERLAYS 



BUF4 
BUF5 



KDBUP 
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MSCP END PACKET OFFSETS 



OOO006 
OOO007 
000010 
00OO2O 
00002 1 

00001 2 
OO0013 

00001 4 

0000 1 5 

00001 6 
000017 
000023 
000024 
000025 
000026 
000027 
000030 
00003 1 
00OO31 
000020 
000021 
000024 
0OO025 
000026 
000027 
000025 
000012 

00001 3 

00001 4 

00001 5 

00001 6 

0000 17 



. FLGS 

STS 
.MLUN 
.FBBO 
. FBB1 
. CMSO 
. CMS1 

UNTO 
. UNT1 
.UNT2 
. UNT3 
.SHST 
.TRCK 
.GRP 
. CYL 
. USVR 
.RCTS 
.RBNS 
.RCTC 

ME0 1 
.MED 2 
. UNSO 

UNS1 
. VSEO 
. VSE1 
. RSI 9 
.CTMO 

CSVR 
.CNTO 
.CNT1 
. CNT2 
.CNT3 



P + 4 

P + 5 

P + 6 

P+14. 

P.FBBO+1 

p + a . 

P . CMSO+1 

P+10. 

P . UNTO+ 1 

P , UNT1+1 

P. UNT2+1 

P+17. 

P+1». 

P+19 . 

P + 20. 

P + 21 . 

P + 22 . 

P + 23. 

P + 23 . 

P+14. 

P.MEDt+1 

P+ 18 . 

P . UNSO+ 1 

P + 20. 

P. VSEO+1 

P+19. 

P + 8 . 

P + 9 . 

P+10. 

P CNTO+1 

P. CNT1+1 

P. CNT2+t 



FLAGS 

END PACKET STATUS 
MULTI-UNIT CODE 

FIRST BAD BLOCK (LO) 

FIRST BAD BLOCK (HI) 

COMMAND STATUS (LO) 

COMMAND STATUS (HI) 

GET UNIT STATUS UNIT 

GET UNIT STATUS UNIT 

GET UNIT STATUS UNIT 

GET UNIT STATUS UNIT 

GET UNIT STATUS SHAD 

GET UNIT STATUS TRAC 



GET UNIT STATUS 

GET UNIT STATUS 

GET UNIT STATUS 

GET UNIT STATUS 



GET UNIT STATUS RBNS 
GET UNIT STATUS RCT 
1ST WORD OF MEDIA TY 
2ND WDRO OF MEDIA TY 
ONLINE 8 SET UNIT CH 
ONLINE 8 SET UNIT CH 
ONLINE 8 SET UNIT CH 
ONLINE S SET UNIT CH 
RESERVEO NINETEENTH 
SET CONTROLLER CHAR 
SET CONTROLLER CHAR 
SET CONTROLLER CHAR 
SET CONTROLLER CHAR 
SET CONTROLLER CHAR 
SET CONTROLLER CHAR 



IDENTIFIER ( 1ST WORD) 
IDENTIFIER (2ND WORD) 
IDENTIFIER (3RD WORD) 
IDENTIFIER (4TH WORD) 
OW STATUS 
SIZE 
GROUP SIZE 
CYLINDER SIZE 

UNIT S/W 8 H/W VERSION NUMBERS 
RCT TABLE SIZE 
/TRACK 
COPIES 
PE 
PE 

AR UNIT SIZE 
AR UNIT SIZE 



(LO) 

(HI) 
AR VOL SERIAL NUMBER (LO) 
AR VOL SERIAL NUMBER (HI) 
WORD 

CONTROLLER TIMEOUT 

CONTROLLER S/W 8 H/W VERSION #S 
CONTROLLER 10 WORD 1 
CONTROLLER ID WORD 2 
CONTROLLER ID WORD 3 
CONTROLLER ID WORD 4 



END PACKET STATUS COOES 



000037 
000040 
O0O007 
000000 
OOOOO 1 
0O0OO2 
0OO003 
00OOO4 
000005 
000006 
000007 
OOOO 10 

KDBUP 



ST.MSK := 37 

ST. SUB ;■• 40 

ST .SHF ; = 7 . 

ST .SUC : ■ 

ST . CMO : = 1 

ST. ABO :» 2 

ST.OFL := 3 

ST.AVL :« 4 

ST.MFE :• 5 

ST .WPR : s 8 

ST . CMP : s 7 

ST. OAT :: 10 

KOBSO. MICROCODE., 22- APR-1988 11:16:48.97 



STATUS/EVENT CODE MASK 

SUB CODE MULTIPLIER 

COMMAND OFFSET RIGHT ROTATE COUNT 

SUCCESS 

INVALID COMMAND 

COMMAND ABORTED 

UNIT OFFLINE 

UNIT AVAILABLE 

MEDIA FORMAT ERROR 

UNIT WRITE PROTECTED 

COMPARE ERROR 

DATA ERROR 



KDBUP 

CONTROLLER RAM 
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00001 I 

00001 2 

00001 3 



ST.HST 
ST . CNT 
ST. DRV 



HOST BUFFER ACCESS 
CONTROLLER ERROR 
DRIVE ERROR 



STATUS SUB-CODE VALUES 



000000 
000040 
000100 
0OO400 



SC. NML 
SC.SDI 
SC.SCN 

SC. AOL 



SUCCESS SUB-CODE VALUES 



* 0*ST.SUB 

= 1»ST.SUB 

= 2«ST.SUB 

: S.»ST.SUB 



NORMAL SUB-CODE 
SPIN DOWN IGNORED SUB-CODE 
STILL CONNECTED SUB-CODE 
ALREADV ONLINE SUB-CODE 



UNIT OFFLINE SUBCOOE VALUES 



oooooo 

000040 
O001O0 
000400 
OO02O0 



020000 
010000 



SC.UNK 
SC. NVL 
SC . IOP 
SC. OIS 
SC. DUP 



SC.WPH 
SC .WPS 



OJST.SUB 
1*ST .SUB 
2«ST.SUB 
8 . *ST . SUB 
4>ST.SUB 



UNKNOWN UNIT SUB-CODE 

NO VOLUME MOUNTED OR ORIVE RUN/STOP SWITCH OUT 

UNIT INOPERATIVE 

UNIT DISABLED BV FIELD SERVICE 

UNIT IS A DUPLICATE (SUCCESS SUBCODE ALSO) 



WRITE PROTECTED SUB-CODE VALUES 



: = BIT13 

: = SIT 12 



HARDWARE WRITE PROTECTED 
SOFTWARE WRITE PROTECTED 



DATA ERROR SUB-CODE VALUES (SC.ECC USED FOR MEDIA FORMAT ALSO 



OOOOOO 
000100 
000140 
000340 
000400 
OO0440 
OOOSOO 
OO0540 
OOOSOO 
000640 
000700 
000740 



SC. FER 
SC. HDR 
SC.DSV 
SC. ECC 
SC. EC1 
SC . EC2 
SC. EC3 
SC. EC4 
SC. ECS 
SC. ECS 
SC. EC7 
SC.ECS 



0«ST.SUB 
2«ST .SUB 
3*ST.SUB 
7*ST .SUB 
S .*ST .SUB 
9 . *ST .SUB 
lO. »ST .SUB 
1 1 . »ST .SUB 
12. *ST .SUB 
13. «ST .SUB 
14. *ST . SUB 
IS. >ST.SUB 



FORCED ERROR 
HEADER COMPARE ERROR 
DATA SVNC TIMEOUT 
ECC ERROR (UNCORRECTABLE) 
ONE SYMBOL ECC ERROR 
TWO SVMBOL ECC ERROR 
THREE SVMBOL ECC ERROR 
FOUR SVMBOL ECC ERROR 
FIVE SYMBOL ECC ERROR 
SIX SYMBOL ECC ERROR 
SEVEN SYMBOL ECC ERROR 
EIGHT SYMBOL ECC ERROR 



000240 
00030O 



SC .N12 
SC . BAD 



MEDIA FORMAT ERROR SUB-CODES 



5*ST .SUB 
6*ST .SUB 



NOT 512 BYTE FORMAT 
DISK NOT FORMATTED 



OOO04O 
OOOIOO 
0001 40 
000200 

KDBUP 



SC.STO 
SC . INV 
SC . POS 
SC . RWR 



DRIVE ERROR SUB-CODE VALUES 



= 11ST.SUB 

■■ 2«ST.SUB 

= 3*ST.SUB 

= 4*ST.SUB 
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SDI RESPONSE TIMEOUT 
INVALID SOI RESPONSE 
POSITIONER ERROR 
LOST READ/WRITE READY 



c 
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000240 
OOO300 
000340 

O004O0 



000040 
O001O0 

000 1 40 



000040 
OOOI 00 
0O01 40 
000200 
000240 



SC . DCL 
SC .RRD 
SC.DOE 
SC . LVO 



SC. OVR 
SC. EDC 
SC. CNT 



SC. ODT 
SC . ODB 
SC. NOM 
SC.PAR 
sc . imr 



= 5«ST.SUB 

' S.tST.SUB 

= 7 . *ST.SUB 

= S.*ST.SUB 



LOST ORIVE CLOCK OPERATION 

LOST DRIVE RECEIVER REAOY 

ORIVE DETECTED ERROR 

RTOS PULSE ERROR/RTDS PARITY ERROR/OATA PULSE ERROR 



CONTROLLER ERROR SUB-CODE VALUES 



1 .*ST .SUB 
2. «ST.SUB 
3 . «ST. SUB 



SERDES OVERRUN ERROR 

[EC0#1 ] EDC ERROR 

(EC0#1 1 INCONSISTENT CONTROLLER STATE 



BUS ERROR SUB-CODE VALUES 



1 *ST .SUB 
2*ST .SUB 
3*ST .SUB 
4*ST .SUB 
5*St . sub 



ODD TRANSFER ADDRESS 

ODO BYTE COUNT 

UNIBUS NONEXISTANT MEMORY ERROR 

UNIBUS PARITY ERROR 

INVALID MAPPING REGISTER 



MSCP ERROR LOG ATTENTION PACKET AND MESSAGE OFFSETS 



o 



0O00O2 
000003 
000004 
0OO005 
000006 
000006 
OO00O7 
OO00 10 

00001 1 

00001 2 
000013 
000014 
000014 

00001 5 

00001 6 

00001 7 

00001 6 

00001 7 
000020 

00002 1 
000022 
000022 
000023 
000024 
000025 
00OO26 
000027 
000O3O 

00003 1 
000032 
000033 

KDBUP 



L 


CRFO 


= P + 


LO CO 


L 


CRF1 


= I. CRFO* 1 


HI CO 


L 


UNIT 


: p + 2 


UNIT 


L 


SEO 


= P + 3 


SEOUE 


L 


FMT 


= P + 4 


FORMA 


L 


FLGS 


= P + 4 


FLAGS 


L 


EVNT 


» P+5 


EVENT 


L 


CNTO 


= P + 6 


CONTR 


L 


CNT1 


= L.CNTO+1 


CONTR 


L 


CNT2 


* L .CNT1+1 


CONTR 


I 


CNT3 


s L.CNT2+1 


CONTR 


L 


CSVR 


s P+10 . 


CONTR 


L 


CHVR 


= L .CSVR 


CONTR 


L 


MLUN 


s P+1 1 . 


MULT I 


L 


BAOO 


= P*12 . 


HOST 


I 


SAD1 


■ L.BA0O+1 


HOST 


L 


UNTO 


= PUS. 


UNIT 


L 


UNT1 


= L.UNTO+1 


UNIT 


L 


UNT2 


■■ L . UNT1-4-1 


UNIT 


L 


UNT3 


= L . UNT2+1 


UNIT 


L 


USVR 


: P+16 . 


UNIT 


L 


UHVR 


: L . USVR 


UNIT 


L 


RTRY 


• P+17 . 


RETRY 


L 


VSEO 


= P+IS . 


VOLUM 


L 


VSE1 


■ L.VSEO+1 


VOLUM 


L 


HDRO 


= P+20. 


HEADE 


I 


HDR1 


: L.HDRO+t 


HEADE 


I 


SDIO 


■■ P*22. 


SOI S 


L 


SDI 1 


= L.SOIO+1 


SDI S 


L 


S0I2 


= L . SOI 1 + 1 


SDI S 


L 


SDI3 


= L .S0I2+1 


SDI S 



MMAND REFERENCE NUMBER 

MMANO REFERENCE NUMBER 

NUMBER 

NCE NUMBER 



COOE 
OILER ID WORD 1 
OLLER ID WORD 2 
OLLER ID WORD 3 
OLLER ID WORD 4 

OLLER SOFTWARE REVISION (LO) 
OLLER HARDWARE REVISION (HI) 
-UNIT CODE 
MEMORY ADDRESS LO 
MEMORY ADDRESS HI 
ID WORD 1 
ID WORO 2 
10 WORO 3 
ID WORD 4 

SOFTWARE REVISION (LO) 
HARDWARE REVISION (HI) 

COUNT 
E SERIAL NUMBER (LO) 
E SERIAL NUMBER (HI ) 
R (LO) 



R (HI ) 
TATUS WORD 
TATUS WORD 
TATUS WORD 
TATUS WORO 
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000034 
0OOO35 



L . SDI4 
L . SDIS 



L .SDI3+1 
L .SDI4-H 



STATUS WORD 
STATUS WORD 



LOG PACKET FLAGS 



O4O0OO 
0OO40O 
IOOOOO 



0OO1O0 
000101 
000102 
000200 



000000 
0OOO0 1 
000002 
000003 



IOOOOO 
04OOOO 
020000 
020000 
010000 
004000 
002000 
OOIOOO 
000400 
OOO200 
000100 
000040 
OOO020 
OOO020 
000002 
00000 1 
000001 
000002 
0OOOO4 
OOOOOI 
OOOOOI 

KOBUP 



LF .CON 
LF .SNR 
LF .SUC 



BiToe«2se . 

BITOO*256 . 
SIT07S256 . 



OPERATION CONTINUING FLAG 
SEOUENCE NUMBER RESET FLAG 
OPERATION SUCCESSFUL FLAG 



o 



MSCP PACKET CONTROLLER TO HOST OP CODES 



VIRTUAL CIRCUIT 



OP 


AVA 


= 100 


OP 


OUP 


r 101 


OP 


ACP 


• 102 


OP 


ENO 


- 20O 



*** 

AVAILABLE ATTENTION MESSAGE 

DUPLICATE UNIT NUMBER ATTENTION MESSAGE 

ACCESS PATH ATTENTION MESSAGE 

ENO PKT FLAG OR UNREC0GNI2E0 COMMANO ENO 



VIRTUAL CIRCUIT 1 



FM 


CNT 


: 


FM 


BAD 


= 1 


FM 


OSK 


= 2 


FM 


SOI 


: 3 



ERROR LOG FORMAT 

ERROR LOG FORMAT 

ERROR LOG FORMAT 

ERROR LOG FORMAT 



(CONTROLLER ERROR) 
(UNIBUS ACCESS ERROR) 
(DISK TRANSFER ERROR) 
(SDI ERROR) 



MSCP PACKET MODIFIER COOES 



MO 


EXP 


i BIT15 


MD 


CMP 


s BIT14 


MD 


CSE 


• BIT13 


MO 


NOV 


« BIT 1 3 


MD 


ERR 


i BIT12 


MO 


SCH 


■ BIT1 1 


MO 


SCL 


= BIT10 


MD 


SEC 


= 8IT09 


MD 


SER 


= BITOS 


MD 


SSH 


= BITOT 


MD 


WBN 


: BITOS 


MO 


W8V 


s BIT05 


MO 


SEO 


- B I T04 


MO 


SHO 


= BIT04 


MD 


ALL 


= 8IT01 


MD 


SPD 


: BITOO 


MD 


FEU 


= BITOO 


MD 


VOL 


s BIT01 


MD 


SAV 


: BIT02 


MD 


NXU 


= BITOO 


MD 


RIP 


= BITOO 



EXPRESS REQUEST MODIFIER 

COMPARE MODIFIER 

CLEAR SERIOUS EXCEPTION 

[CONTROLLER) NO SEEK OVERLAP MODIFIER 

FORCE ERROR MODIFIER 

SUPPRESS CACHING (HIGH) [rae02] 

SUPPRESS CACHING (LOW) [rae02] 

SUPPRESS ERROR CORRECTION MODIFIER 

SUPPRESS ERROR RECOVERV MODIFIER 

SUPPRESS SHADOWING [rae02] 

WRITE BACK ( NON - VO L AT I LE I [rae021 

WRITE BACK (VOLATILE) I rae02 ] 

WRITE SHAO SET ONE UNIT AT A TIME [rae021 

SHADOW UNIT SUPPLIED (ERROR ON CONTROLLER) 



ALL CLASS DRIVERS 

SPIN DOWN MODIFIER 

FLUSH ENTIRE UNIT 

VOLATILE ONLY 

SUPPRESS AVAILABLE ATTENTION MSG MODIFIER 

NEXT UNIT MODIFIER 

ALLOW SELF DESTRUCTION MODIFIER 



[rae02] 



I rae02] 

[ raaoz ] 
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000004 
000002 
OO0001 
OOOOOI 
0OOO4O 



IOOOOO 
040000 
020000 



MO 


SWP 


= BIT02 


MD 


IMF 


: BIT01 


MD 


PRI 


= BITOO 


MD 


FKC 


: BITOO 


MD 


EXC 


- BIT05 



SET WRITE PROTECT 

IGNORE MEDIA FORMAT ERROR MODIFIER 

PRIMARY REPLACEMENT MODIFIER 

Flush Encryption/Decryption Key Cache IchlO] 

Exclusive Access (unit) IchlO] 



END PACKET FLAGS 



EF .BBR 
EF . BBU 
EF . LOG 



BIT15 
BIT14 
BIT13 



BAD BLOCK REPORTED 
BAD BLOCK UNREPORTED 
ERROR LOG GENERATED 



REFERENCES WITHIN THE SOI INTERCONNECT CONTROL BLOCK 



STATUS OF SDI INTERCONNECT 



SOI INTERCONNECT STATUS FLAG EQUATES 



OOOOOI 
0O0002 
OOO004 
000010 
OOO02O 
000040 
OOO 100 
000200 
000400 
00 1000 
OO2000 
004000 
O1O00O 



PKIP 


= BITOO 


SEEK 


= BIT01 


OERR 


: BIT02 


VECT 


: BIT03 


BFRO 


= BIT04 


SUSP 


-- BIT05 


BFSV 


: BITOS 


XCMP 


= BIT07 


OATT 


: BIT08 


GSEL 


< BIT09 


ORDUP 


s BIT 10 


DRVOL 


< BIT1 1 


DRAVL 


■- BIT 1 2 



MOD 
DRO 
000 

00 1 
010 

01 1 

too 

101 
1 10 

1 1 1 

= 

IN 
DET 



NO PKT, 
NO SEEK 
NO ERROR 
VECTOR 
OK, 1 = 
TASK RUN 
OK, 1 = 
OK, 1 s 
OK, 1 s 
IFIES "SE 
UP, DRVOL 
DRIVE 
DRIVE 
DRIVE 
DRIVE 
DRIVE 
NOT US 
NOT 
= ORIVE 
NOP, t : 
ADDITION 
ERMINING 

NO ERROR 
ADDITION 
FORCE INI 
NO REVEC 
THIS BIT 
N REVECTO 



1 a PAC 
NEEDED 

1 = F 
EVEL DO 
BUFFER 
NING, 1 
BUFFER 
TRANSFE 
DRIVE A 
EK 

AND D 
ONLINE 
ONLINE 
OFFL INE 
OFFLINE 
AVAILAB 
ED 
ED 
OFFLINE 

SEND L 
SLAT IS 
IF A DR 

RECOVE 
ERRIP I 
T TO AL 
TORING 

1 AND 
RING IS 



; IE121 I 



KET IN PROGRESS 

Is SEEK INITIATE NEEDED 
ATAL ERROR ON I/O COMMAND 
NE, 1 : STATE VECTOR LEVEL ACTIVE 
CONTROL BLOCKS NEEDED 

= TRANSFER TASK SUSPENOED 
SERVICE REQUIRED FROM U.PROC 

TASK COMPLETED 
TTENTION PENDING 
SEEK, liGROUP SELECT ONLY 
RAVL ARE ENCODED AS FOLLOWS: 

AND DUPLICATE 

AND NOT USABLE 

AND DUPLICATE 
LE (SPINABLE OR NOT SPINABLE) 



AND UNKNOWN TO CONTROLLER 
OG OR ATTENTION PKT TO HOST 

USED AS A FLAG TO AID IN 
IVE IS ALREADY ONLINE TO THE CONTROLLER 
RY, 1 i LEVEL O RECOVERY ACTIVE 
S USED AFTER INITIALIZATION 
L DRIVES 
REQUIRED, 1 : REVECTORING REQUIRED 

"RVCSOI" POINTS TO THIS SDI BLOCK, 

IN PROGRESS FOR THIS DRIVE. 



""> 



00000 1 
KOBUP 



SDI.SL :• SOI.ST+1 ; HEADER COMPARE SEARCH LIMIT 
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DIGITAL EQUIPMENT CORP. 


2901 ASSEMBLER V 


CONTROLLER 


RAM AND EQUATE DEFINITIONS 




O0O0O2 


SDI . CP 


: = SOI .SL + 1 


000003 


S D I . SW 


: = SOI . CP+1 


000004 


SDI . TM 


: ■- SDI . SW+1 


OOOOOS 


SDI . UC 


: « SDI . TM+1 


oooooe 


SDI . UB 


: > SDI . UG+1 


O00OO7 


SDI OB 


: = SDI . UB+ 1 



POINTER TO CURRENTLY ACTIVE UNIT CHARACTERISTICS 

STATE WORD - MSCP END STATUS/ERROR LOG COOE 

SDI INTERCONNECT ACKNOWL EOGE/COMMAND TIMER 

U.PROC GROUP WORD (USED BY U.CPRM) 

ADDRESS OF U.PROC'S BUFFER CONTROL BLOCKtFOR I/O) 

ADDRESS OF O.PROC'S BUFFER CONTROL BLOCKIFOR I/O) 

NOTE - THE FOLLOWING 4 WORDS ( SD I . 1 T , SD I . C L , SD I . CH , SD I . GP ) ARE USEO TO SEND 
THE SDI LEVEL 2 SEEK COMMANO DIRECTLY FROM THE SDI CONTROL SLOCK 



OOOOIO 
OO00 1 1 
0000 t 2 

00001 3 

00001 4 

00001 5 

00001 6 



000017 
O0OO2O 

000377 
001400 



007400 
036000 
002000 
004000 
010000 
020000 
040OOO 

100000 

00002 1 
000022 
000023 
OOO024 

000025 
00O026 
00000 1 
000002 
000004 

000020 
000040 



SDI 


1T 


SDI 


CL 


SOI 


CH 


SOI 


GP 


SDI 


SS 


SDI 


XL 


SDI 


XH 



SDI DS+1 
SDI . I T* I 

SOI . CL + 1 
SOI . CH+1 
SDI . GP+1 
SDI .SS* 1 
SDI . XL + 1 



TEMP WORD (USEO FOR ERROR LOG/ATTN COOE, SEEK COMMAND) 

CURRENT CYLINDER ADDRESS LO (FORMS SEEK COMMAND) 

CURRENT CYLINDER ADORESS HI (FORMS SEEK COMMAND) 

CURRENT GROUP NUMBER (FORMS SEEK COMMANO) 

* OF SECTORS TO TRANSFER BEFORE SEEK REOUIREO 

LO NUMBER OF BYTES REMAINING TO BE TRANSFERRED 

HI NUMBER OF BYTES REMAINING TO BE TRANSFERRED 



SDI CONTROL BLOCK ERROR STATE CONTROL WORDS >•* 



SDI .El 
SOI . EO 



: s SOI . 
-- SOI. 

ERRVEC 
LV2CNT 



RETCNT 
IORTY 



XH + 1 
61 + 1 



LOBYT 
1400 



: = 7400 
: s 36000 
IOCNT 
IOSEK 

IOCLK 
I RWR 
: = B I T 1 4 



ERRINP 

SDI .SV : s SOI 

SDI .PO : = SOI 

SDI.RO : = SOI 

SOI . OE : • SDI 



BIT 15 



SDI . OM 
SDI . ES 



BITOO 
BIT01 
BIT02 
BIT03 
BIT04 
BITOS 
BIT06- 
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: • SDI . 
: = SOI . 
RVWRIT 
OFFTRK 
FSEEK 

RVACTV 
URETRY 



EO+1 
SV+1 
PQ+1 
RO+1 

OE+1 
OM+1 



LEVEL 1 ERROR STATE CONTROL WORD 
USED FOR READ RETRIES (EOC AND ECC ERRORS) 
LEVEL O ERROR STATE CONTROL WORD 
USED FOR SDI LEVEL 2, 1 ERRORS 

AND FOR READ, WRITE, COMPARE DRIVE ERROR RETRIES 
ERROR STATE VECTOR (SOI.EO AND SDI. El) 
O = LEVEL INACTIVE, NEO O = LEVEL ACTIVE 
SOI LEVEL TWO RETRY COUNT (2 BITS LONG) 
INCREMENT RETRY COUNT WITH ADDC #377, REG 
USED WITH SDI . EO 

I/O RETRY COUNT (USEO WITH SOI.EO) 
I/O RETRY INDICATOR FLAGS 

REAO/WRITE RETRY INDICATOR (1=LAST RETRY) 
SEEK ERROR ( RECAL , RESEEK IN RECOVERY) 

DRIVE CLOCK TIMEOUT ERROR (INIT, RESEEK IN RECOVERY) 
R/W ROY OR SERDES LATE ERROR (RETRY I/O IN RECOVERY) 
O i NO INIT DONE, 1 s INIT DONE ON RECOVERY 
USEO WITH SDI .EO 

O » NO RECOVERY, 1 = RECOVERY IN PROGRESS 
USEO WITH SDI.EO AND SO I . E 1 
EVEL 2 FUNCTION STATE VECTOR 

ER TO HEAD OF CONTROL BLOCK MSCP PACKET OUEUE 
IONAL OPTIMIZATION COUNT 
VERLAP ENABLE FLAG: 

ISABLE, 1 : ALLOW, -1 : . PROC SAW LAST BUFFER 
GE FOR CURRENT MSCP PKT PTR WHILE OVERLAPPING 
XTENDEO STATUS 

REVECTOR WRITE FLAG FOR U.BFLC 

SEEK REOUIRED DUE TO ERROR RECOVERY LEVEL USEO 

FORCE SEEK FLAG 

NOT USED 

REVECTORING ACTIVE 

U.PROC RETRY IN PROCESS 

UNUSED 



BIT1 
BITI 
BITI 
BITI 



SDI 

POINT 

ROTAT 

SDI 

O : D 

STDRA 

SDI 



c 
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FAIRCT 
ELEV 



: = BIT08-BIT14 
: s 77400 
: s B I T 1 5 



PAGE OSI 



SEEK FAIRNESS COUNTER 
SEEK FAIRNESS COUNT MASK 
SEEK ELEVATOR FLAG 



000027 
000030 
00003 1 
00003? 



000033 
00OO33 
000034 
000034 
100000 
00003S 
000035 
00OO36 
10OOO0 
00OO37 
000040 
00004 1 
000042 
000043 
OOOOIO 



SD I 81 
SDI . BH 
SOI . RL 
SOI . RH 



SOI . ES+1 

SOI . BL+ 1 

SDI . BH+ 1 
SDI . RL + 1 



LO BAD BLOCK DETECTED (CLEAR IN U.ALOCI 

HI BAD 6L0CK DETECTED (CLEAR IN U.ALOCI 

LO LBN OF PRIMARY RBN 

HI LBN OF PRIMARY RBN 



START OF DRIVE GENERAL CHARACTERISTICS (SDI V3 . 7 . IS-JUNE-SI) 



SOI 


TO 


:.« SDI 


RH + 


SDI 


XR 


: : SDI 


TO 


SO I 


LT 


: ' SOI 


T0 + 


SOI 


RC 


: = SOI 
UNC.SS 


LT 


SDI 


ER 


: > SDI 


LT* 


SOI 


EC 


:» SOI 


ER 


SDI 


RS 


: -- SDI 
FDIAG 


ER + 


SDI 


I 1 


MIDI 


RS + 


SDI 


12 


:■« SDI 


I 1 + 


SDI 


13 


: - SDI 


12 + 


SDI 


TI 


: : SDI 


13 + 


SDI 


UE 


: = SOI 


TI + 


SDI 


DL 


: s <SD 


.TI 



LO 



BYTE 
BYTE 
BYTE 
BYTE 



BYTE 

BYTE 



+1 -SOI 



SHORT T.O. (LOI/SOI VERS (HI) 

TRANSFER RATE 

LDNG T.O. (L01/RETRY # (HI) 

RCT COPIES ( LO ) /RESERVED (HI) 

= 512 BYTE ONLY, 1 = 512 OR 576 BYTE SECT 

ERROR RECOVERY LEVELS 

ECC ERROR THRESHOLD 
HARDWARE REVISION #( H I I /SOFTWARE REVISION #(L0) 

; 1: LIMITED DIAG, = FULL OIAG SUPPORT 
UNIQUE DRIVE ID #1 
UNIQUE DRIVE ID #2 
UNIQUE DRIVE ID #3 
DRIVE TYPE IDENTIFIER (L01/DRIVE REVS/SEC (HI) 
END OF CONTROLLER CRITICAL ORIVE COMMON CHARACTERISTICS 
T0>; LENGTH OF DRIVE COMMON CHARACTERISTICS 



; IEI2! 1 



START OF SOI STATUS STORAGE (7 WORDS) »*• 



SDI STATUS WORD (UNIT NUMBER INFORMATION) 



DRIVE STATUS UNIT WORD BIT DEFINITIONS 



1O00O 
02O00O 
040000 
100000 
170000 

000044 



OOOOOI 
000002 

OOOOIO 
000020 
000040 
000 1 00 

KDBUP 



ORV. U1 
DRV . U2 

ORV . U3 
DRV U4 
DRV .SU 



: i BIT12 

: ■ B I T 1 3 

:■■• BIT 14 

: : BIT IS 



NO SUBUNIT, 

NO SUBUNIT, 

NO SUBUNIT, 

NO SUBUNIT, 



:'s SDI . UN+1 



<0RV.U1+ORV.U2+ORV.U3+ORV.U4>; 
: SOI STATUS WORD 



1 = SUBUNIT PRESENT 
1 i SUBUNIT PRESENT 
1 > SUBUNIT PRESENT 
I = SUBUNIT PRESENT 
SUBUNIT MASK 



DRIVE STATUS 1ST WORD BIT DEFINITIONS 



DRV 


RU 


= BITOO 


DRV 


PS 


: BIT01 
= BIT02 


DRV 


EL 


= BIT03 


ORV 


SR 


= BIT04 


ORV 


OR 


= BIT05 


DRV 


RR 


= BIT06 



RUN/STOP SWIT IN 
PORT SWITCH IN 



O = RUN/STOP SWIT OUT, 

Q s PORT SWITCH OUT, 1 s 

NOT USED 

O a NO ACTION, 1 : PLEASE SEND A LOG PACKET 

O = SPINDLE NOT AT SPEED. I = SPINOLE AT SPEED 

O = NO OIAG REQ'D, 1 = DIAGNOSTIC LOAD REO'O 

O = NO READJ REQ'D, 1 = READJUSTMENT REQ'D 
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00020S 
000400 
001000 
002000 
004000 
010000 
020000 
O400OO 
100000 
0OO045 



OO0010 
000020 
000040 
OOOIOO 
OO020O 

ooono 

000400 
001000 
002000 
004000 
010000 
020000 
040000 
1 00000 
170000 
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DRV . OA 
DRV . S7 
DRV . OB 
ORV .FO 
DRV .00 

DRV .W1 

DRV W2 

DRV W3 
DRV . W4 
SOI .S2 



:= BIT07 

: s BIT08 

: > BIT09 

= BIT10 

: s BIT1 1 

: : BIT 12 

: = BIT 13 

: I BIT14 

: « BIT1S 

: « SOI . S1*1 
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ONLINE/AVAILABLE, 1 s ONLINE TO OTHER PORT 



512 BYTE SECTOR, 
NO DIAG CYL ACCESS 
NO FORMATTING, 1 = 
DRIVE ENABLED, 1 = 
W.P, SWITCH 
W.P. SWITCH 
W.P. SWITCH 
W.P. SWITCH 
STATUS WORD 



S76 BYTE SECTOR 
1 : YES DIAG CYL ACCESS 
FORMATTING ENABLED 

DRIVE DISABLEO FOR DIAGNOSTICS 

IN 

IN 

IN 

IN 



OUT. 1 


s W 


p . 


SWITCH 


OUT. 1 


i W 


p . 


SWITCH 


OUT, 1 


= W 


p . 


SWITCH 


OUT, 1 


-. w 


P . 


SWITCH 



o 



» LOWER BYTE OF SDI.S2 IS STATUS ERROR BYTE 



ORV .WE 
DRV. DF 
DRV.PE 
DRV . RE 
DRV . DE 
OCMASK 

DRV .C4 
DRV . C3 
DRV .C2 
ORV C1 
DRV .S1 
DRV .S2 
DRV . S3 
DRV.S4 
DRV . SN 



BITOO 
BIT01 

BIT02 
BIT03 
BIT04 
8IT05 
BIT06 
BIT07 
<DRV .WE+ORV . 

8IT0S 
BIT09 
BIT 10 
BIT1 1 
BIT12 
BIT13 
BIT14 
BIT IS 
ORV .S1+DRV . 



S2 + 



NOT USED 
NOT USED 
NOT USED 
O > OK, 1 
O ■ I N I T 
< OK, 1 
■ OK, 1 
O = OK, 1 

♦DRV .PE+DRV 
DRIVE CLEA 
CONTROLLER 
CONTROLLER 
CONTROLLER 
CONTROLLER 
CONTROLLER 
CONTROLLER 
CONTROLLER 
CONTROLLER 

DRV . S3+0RV. 



i WRITE LO 
IAG OK, I 
■ PROTOCOL 
- RETRYABL 
: DRIVE ER 
RE> 

COMMAND 
STATUS - 
STATUS • 
STATUS • 
STATUS - 
STATUS - 
STATUS - 
STATUS - 
STATUS - 
S4 ; MASK 



CK ERROR 

INIT DIAG FAILURE 
ERROR 
E ERROR-REISSUE COMMAND 
ROR 

ERROR CLEAR MASK 
IGNORED BY ORIVE 
IGNORED BY DRIVE 
IGNORED BY DRIVE 
IGNOREO BY DRIVE 
IGNORED BY ORIVE 
IGNORED BY ORIVE 
IGNORED BY DRIVE 
IGNORED BY ORIVE 
FOR TESTING S BITS 



SDI CONTROL BLOCK PRIVATE ATTENTION PACKET «*« 

NOTE - BIT O OF THE PACKET CONTROL WORO ADDRESS DIFFERENTIATES BETWEEN 
ATTENTION PACKETS AND NORMAL MSCP PACKETS, I.E. BIT * 1 MEANS IT IS 
AN INTERNAL ATTENTION PACKET AND BIT = O MEANS IT IS A MSCP PACKET. 



000046 
000047 
000050 
00005 1 
000052 
0O0053 
0OO054 
000055 



SOI .AT 
SDI .2T 
SOI . S4 

SDI SS 

soi .se 

S01.S7 
SDI . OP 
SDI . PL 
SOIB . L 



SDI S2+1 
SDI . AT+1 
SOI .AT+P .CRFO 
SDI .AT+P . CRF1 
SOI .AT + P .UNIT 
SOI .AT+P . RS03 
SOI .AT+P .OPCD 
SDI .AT+P .MOD 
SOI . AT + S . 



ATTENTION PACKET CONTROL WORO 

2ND TEMP WORD - ATTENTION VIRTUAL CIRCUIT NOT NEEOEO 

UNUSEO IN ATTN PKT - SDI EXTENDED STATUS 

UNUSEO IN ATTN PKT - SDI EXTENDED STATUS 

UNUSED IN ATTN PKT - SOI EXTENDED STATUS 

UNUSED IN ATTN PKT ■ SDI EXTENDED STATUS 

USED FOR ATTENTION/GET STATUS INTERNAL OP CODE 

WRITE PRELOAD COUNTER (NOTE MSB MUST BE ZERO) 

LENGTH OF SOI CONTROL BLOCK 



START OF SUBUNIT CHARACTERISTICS BUFFER «*» 



SOI .CW 
S I . CW 



: s O 

: = SDI . PL+1 



i SUBUNIT BUFFER CONTROL WORD 

[VOSISUBUNIT BUFFER CONTROL WORD 
15-12 ; SUBUNIT CODE ( 000 1 , 00 1 O , O 1 00 , 1 OOO ) 
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DRV . AV 
ORV. AT 



DRV . UM 

i IF SD! 



■ * BIT11 ; O = SUBUNIT ONLINE, 1 = SUBUNIT AVAILABLE 

-. BIT10 ; O = ATTENTION SENT. 1 = NEED TO SEND ATTENTION 

BITS 9-0 ; UNIT NUMBER (O - 1023) FOR THIS SUBUNIT 
■■ DRV . SU i DRV . AT ! ORV .AV; UNIT NUMBER MASK (USE WITH 'BIC'I 

.CW IS ZERO THEN IT IS AVAILABLE, OTHERWISE IT IS IN USE. 



000057 
OO006O 



100000 
020000 
O 10000 
000200 
OO00O4 
OOO002 
000001 
OO00O3 

OOO06 1 
000062 
000063 
000064 
000065 
OOO066 
000067 



O0O20O 
OOO07O 
00007 1 
0OO072 
000073 
000074 
000074 
000075 
0OO076 
OO0O77 
OOOIOO 
000 10 1 



000 101 
000102 
000 103 



SOI .SD 

SDI .UP 



SOI. CW+ 1 
SOI SD+1 



PARENT SDI CONTROL BLOCK POINTER 
UNIT FLAGS FOR MSCP PACKET 



UNIT FLAG BIT DEFINITIONS 



UF . RPL 
UF .WPH 
UF.WPS 
UF .RMV 



UF . 

UF 
UF 



576 
CMW 

CMR 



BIT15 
BIT13 
BIT12 
BIT07 
BIT02 
BIT01 
BITOO 
<UF . CMW+UF . CMR> 



1 s NO HOST BBR ON THIS UNIT 



WRITE PROTECTED HARDWARE 
1 s WRITE PROTECTED SOFTWARE 
1 : REMOVABLE MEDIA 

1 = VOLUME MOUNTED HAS 576 BYTE SECTORS 
1 = COMPARE ON ALL WRITE OPERATIONS 
1 : COMPARE ON ALL REAO OPERATIONS 



SDI . VI 
SOI . V2 

SDI ,H1 
SDI . H2 
SDI . GC 
SOI . TG 

SDI . RT 



SDI UF+1 
SDI . V1+1 
SDI . V2+1 
SDI .H1+1 

SDI H2+t 
SDI . GC+1 
SOI . TG+1 



VOLUME SERIAL NUMBER WORO 1 

VOLUME SERIAL NUMBER WORD 2 

LO ORDER LBN SPACE IN CYLINDERS 

HI ORDER LBN SPACE IN CYLS (LOI/HI CYL # (HI) 

GROUPS PER CYL (L0I//H1 START LBN (LOI/HI START XBN (HI) 

TRACKS PER GROUP (L01//HI START RBN (LOI/HI START DBN (HI) 

# REPLACEMENTS PER TRACK, RM FLAG ( LO 1 /RESERVED (HI) 



SUBUNIT CAPABILITIES BIT DEFINITIONS 







UNC . RM 


:= BIT07 


SOI 


OP 


: - SDI 


RT+1 


SDI 


Ml 


: = SDI 


DP+1 


SDI 


M2 


: : SDI 


M1 + 1 


SOI 


FC 


:■■ SDI 


M2+1 


SDI 


12 


: : SDI 


FC+1 


SDI 


GO 


: ■- SDI 


12 


SDI 


LI 


: ■ SDI 


GO+1 


SDI 


L2 


: ■ SDI 


L1 + 1 


SDI 


RV 


: = SDI 


L2+1 


SDI 


PH 


: = SDI 


RV+1 


SDI 


LL 


: : SOI 


PH+1 



i = NO REMOVABLE MEDIA 
DATA PREAMBLE SIZE (LOI/HEADER 
MEDIA TYPE LD ORDER 
MEDIA TYPE HI ORDER 
FCT COPY SIZE IN XBNS 
# 512 BYTE LBNS PER TRACK (LO) 
GROUP OFFSET (HI) 
LBN'S IN HOST AREA (LO) 
LBN'S IN HOST AREA (HI) 
RCT SIZE IN LBN'S 
[V0S1 TEMP FOR PRIMARY HDR DURING REVECT 
LENGTH OF UNIT CHARACTERISTICS 



1 = REMOVABLE MEDIA 
PREAMBLE SIZE (HI) 



HOST MAPPING INFORMATION 






MAP . CH 
MAP . NX 
MAP . MO 



: . SOI . PH+1 

: s MAP . CH+ 1 

= MAP . NX+1 



PTR TO START OF PTE CACHE 

PTR TO CURRENT PTE ENTRY 

ADDRESS OF NEXT UNREAD PTE IN HOST MEM LOW 



KDB5O.MICR0C0DE.,22-APR-1988 11:16:48.97 



KDBUP DIGITAL EQUIPMENT CORP. 

CONTROLLER RAM ANO EQUATE DEFINITIONS 



^K.WF 



OOO 104 
OOOIOS 

000106 

000107 
0O01 10 
OOOt 1 1 
000 1 12 
000 1 1 3 
000 1 14 
000 1 IS 
OOOI IS 
000120 



MAP Ml 
MAP . RD 
MAP . UR 
MAP . OF 
MAP SI 
MAP. VO 
MAP . V 1 
MAP . V2 
MAP . V3 
MAP .ST 
MAP .NO 
SOIB. L 
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MAP.MO+1 ; ADDRESS OF NEXT UNREAO PTR IN HOST MEM HIGH 

MAP, Ml* 1 /NUMBER OF CACHED BUT UNUSED PTE'S 

MAP.RD+1 ; NUMBER OF REMAINING UNREAD PTE'S FOR THIS REO 

MAP.UR+1 ;OFFSET INTO PAGE 

MAP.OF+1 /SEGMENT 1 SIZE 

MAP.SH-I ;LOW ORDER MAPPING REGISTER NUMBER 

MAP.VO-M /HIGH ORDER MAPPING REGISTER NUMBER 

MAP.V1+1 ;LOW ORDER MAPPING BASE AODRBSS 

MAP.V2+1 ;HIGH ORDER MAPPING BASE ADDRESS 

MAP.V3+1 /STATUS -- 1 a MAP INIT DONE, O a NOT OONE Ikjk] 

MAP.ST-M ;END OF MAPPING INFORMATION 

MAP.N0*2. ;[V051 LENGTH OF SOI CONTROL 8L0CK PLUS EXTRA 



DATA BUFFER CONTROL BLOCK DEFINITIONS 
BUF.NL := ; POINTER TO NEXT DATA BUFFER CONTROL BLOCK 



DATA BUFFER USE FLAGS (UPPER 2 BITS OF BUF.NL) 



1O00O0 
040000 



BLAST :a BIT15 ; = CONTINUE, 1 a LAST BUF/SEEK REO 

BFULL :a BIT14 ; = BUFFER EMPTY, 1 = BUFFER FULL 

:= BUF.NL+1 ; BUFFER CONTROL BLOCK STATUS WORD 



BUFFER CONTROL BLOCK STATUS BIT DEFINITIONS 



1OO00O 
O4O000 
020000 
O lOOOO 
OO40OO 
002000 
001000 
000400 

000040 
000020 
000010 
000004 
O000O2 
OO00O1 

000002 
OO0003 
000004 
O0O005 
OOO0O6 
OOO0O7 

K08UP 







BRTRY 


: = 


BIT 15 






SLSTB 


: s 


BIT 14 






BECER 


: s 


BIT13 






BECC 


: a 


BIT12 






BGDDD 


: a 


BIT1 1 






BDSNF 


: s 


BIT10 






BLRWR 


: s 


BIT09 






BERDN 


: * 


BITOS 
BITS ' 






BRCTS 


: a 


BITOS 






BRARS 


: a 


BIT04 






BMAPDN 


: s 


BIT03 






BNXCOP 


: a 


BIT02 






BCGRP 


: a 


BIT01 






BGRUP 


: s 


BITOO 


BUF 


BP 


: * BUF 


ST-M 




BUF 


HL 


:a BUF 


BP+1 




BUF 


HH 


: a BUF 


HL*1 




BUF 


TA 


: a BUF 


HH*1 




BUF 


SD 


: a BUF 


TA*1 




BUF 


UA 


! = BUF 


SD-H 





a NORMAL, 1 a U . PROC READ RETRY 

O a NOT LAST, 1 a RETRY REALLY IS LAST BUFFER 

O a NORMAL, 1 a FATAL ECC ERROR, BUT GIVE BEST GUESS DATA 

O a NO ECC ERROR, 1 a ECC ERROR 

O a NO HEADERS OK, 1 a AT LEAST 1 HEADER OK 

a NO DATA SYNC ERR, 1 a DATA SYNC NOT FOUND IEERREC] 

a NO RO/WR ROY ERR, 1 a LOST RD/WR RDY [EERREC1 

a NO ERR REC CMO ISSUED, 1 a ERR REC CMD ISSSUED [EERRECI 

NOT USED 

O a RCT HAS NOT BEEN SEARCHED, 1 a HAS BEEN SEARCHED IEERREC] 

O a RCT HAS NOT ALREADY BEEN SEARCHED, 1 a HAS ALREAOY BEEN SEARCH 

O a MAPPING NOT DONE, 1 a MAPPING DONE 

O a FATAL ERROR, 1 a READ NEXT RCT COPY 

O a SELECT GROUP NOT DONE. 1 a SELECT GROUP OONE 

O a NO ACTION, 1 : SELECT GROUP 

OATA BUFFER POINTER 

1ST WORD OF EXPECTED HEADER 

2ND WORD OF EXPECTED HEADER 

TRACK ADDRESS ANO I/O COMMAND THIS SECTOR 

POINTER TO PARENT SDI CONTROL BLOCK 

HOST ADDRESS BITS IS - O (FOR THIS SECTOR) 



D [E 
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OOOOIO 
00001 1 

0000 12 
00001 3 
0000 1 4 



BUF .US 

8UF .DP 

BUF .BC 
BUF. U1 
BUF . U2 
;BUF.U3 
BUF . LL 
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BUF.UA+1 ilBDAl BI AODR BITS IS/30 -> BITS <0,13> 

BUF.US+1 ;[BDA] GROUP FOR THIS SECTOR -> BITS <0,7> 

;[8DAJ 2ND SEGMENT WORD COUNT •> BITS <S,1S> 

BUF.GP+1 ;[BOA] BYTE COUNT FOR U . PROC (TO/FROM HOST) 

SUF.BC+1 ;2ND SEGMENT HOST ADDRESS LOW 

SUF.U1+1 ;[B0A]2N0 SEGMENT HOST ADDRESS HIGH -> BITS <0,13> 

BUF.U2+1 ilBDA] BYTE COUNT FDR SECOND SEGMENT -> BITS <0,8> 

8UF.U2+1 MBDA1BUFFER CONTROL BLOCK LENGTH 



oooooo 

000400 
00040 1 
000415 



DATA BUFFER DEFINITIONS 



BUF .56 : a o 

BUF ED : a BUF. S6*SECSZ 

BUF EC : a BUF . ED<-1 

BUF . DL : a BUF . EC* 1 2 . 



START OF 25S WORD DATA BUFFER 

DATA ERROR CORRECTION CODE (EDO 

START OF 12 WORDS HOLDING 17 PACKED ECC SYMBOLS 

OATA BUFFER LENGTH 



.,..»,,.,,, EN o BUFFER MAP DEFINITIONS 



o 



000200 
0000S1 



OOOOIO 
O0OO04 

001 352 

OOOOOO 
001355 
001355 

OOOOOO 
0013S5 
001475 
001615 
001735 
002055 
005255 
OOS2S5 
OOS672 
033317 
033317 
033737 

OOOOOO 
034000 



NBCB 
NBUFR 



NSCB 
NSDI 
DM. BEG 



ASSUME 
SDI . 1 
SOI . 2 
SDI . 3 
SOI . 4 
BUFBEG 
BUFEND 
BUFR1 . 
BUFR2 . 
DATEND 
STCACH 
ENCACH 

ASSUME 
ALGAOR 



SUBUNIT CHARACTERISTICS, 

BUFFER CONTROL BLOCK, 

SOI INTERCONNECT CONTROL BLOCK, AND 

BUFFER ALLOCATION 



I3S2 



[BDA1NUMBER OF BUFFER CONTROL BLOCKS 

(ch04 ] Number of data buffers that are dynamically 
allocated. Buffer NBUFR-M (ie, buffer 42) 
is reserved for use by the comparison routine. 

NUMBER OF SUBUNIT CHARACTERISTICS BUFFERS 

NUMBER OF SDI INTERCONNECTS 

DM MACHINE MUST START AT 1352 ! 1 



ASSUME PKTEND, IE, DM. BEG; MAKE SURE PACKETS DON'T INTRUDE ON DM SPACE 
UN. BUF :a 0M.SEG*3 ; START OF SUBUNIT CHARACTERISTICS BUFFERS 
SOIBEG a <UN SUF8 1 7777 6 > -H ; IV05JSTART OF SDI CONTROL BLOCKS ( OOD ) 



<S0I8EG<8ITOO> , EO, 1 ; MAKE SURE START IS OOD 

:= SOIBEG i START OF SOI INTERCONNECT #1 CONTROL SLOCK 

:a SOI.H-SOIB.L ; START OF SOI INTERCONNECT #2 CONTROL BLOCK 

:a S0I.2+SDIB.L ; START OF SDI INTERCONNECT #3 CONTROL BLOCK 

:a S0I.3+SDIB.L ; START OF SDI INTERCONNECT #4 CONTROL BLOCK 

:a S0I.4*SDIB.L ; START OF BUFFER CONTROL BLOCKS 

:a BUFBED*<NBCB»BUF . LL> ; END OF BUFFER CONTROL BLOCKS 

!■ BUFEND ; START OF 1ST DATA BUFFER 

:a BUFR1 . *BUF .DL ; START OF 2ND DATA BUFFER 

:a BUFR1 . ♦ < < NBUFR-M > « BUF , DL > ; |ch041END OF OATA BUFFERS (INCLUDING COMPARE BUFFER) 

: a OATENO ; START OF PTE CACHE AREAS 

:a STCACH*<NSDI*MEMS2«2> : ALLOCATE CACHE FOR EACH SOI 

; MAKE SURE NO OVERWRITING ECC DATA 
ANTI-LOG AOORESS 



ENCACH, LT, ALGAOR 
: a 34000 ; 
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ALGADR+20OO 



LOG ADDRESS 



o 
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CONTROLLER INTERNAL ERROR CODES 



OO00O1 
0O0002 
000003 
000003 
000003 
010000 
000004 
O20O00 
OOOOOS 
030000 
000006 
000007 
0OO0 10 
00001 1 
000012 
000013 
000014 
000015 
00001 8 
OOOOI 7 
OOO026 



OOOI44 
000146 
000147 
000150 
000 ISO 
OOOOOO 



ER 


PRD 


= 1 


ER 


PWR 


: 2 


ER 


RP2 


= 3 


ER 


WP2 


: 3 


ER 


BP1 


: 3 


ER 


SRP 


= 10000 


ER 


RAP 


: 4 


ER 


SAP 


= 20000 


ER 


ROP 


= 5 


ER 


SOP 


= 30000 


ER 


RRD 


: 6 


ER 


RWR 


! 7 


ER 


INT 


= 8 . 


ER 


HTO 


5 9 . 


ER 


NIM 


= 10. 


ER 


MST 


= 11. 


ER 


DMX 


: 12. 


ER 


TMO 


: 13. 


ER 


VCI 


= 14. 


ER 


IWR 


= 15. 


ER 


MRR 


t 22. 



ER.MER 
ER.STP 
ER . BCA 
ER . RTO 
BERMAX 

. PAGE 



; ER.SUN : : 23. 



: = 100. 

: - 102 . 

: - 103 . 

: > 104 . 

: « ER. RTO 

ASSUME BERMAX, EQ , ER . RTO 



UNIBUS PACKET READ ERROR 

UNIBUS PACKET WRITE ERROR 

CONTROLLER BI READ PARITY ERROR 2 

CONTROLLER BI WRITE PARITY ERROR 2 

CONTROLLER BCI PARITY ERROR 1 

CONTROLLER BI PARITY ERRORS/SHIFTED FOR LEDS 

CONTROLLER RAM PARITY ERROR 

CONTROLLER RAM PARITY ERROR/SHIFTED FOR LBOS 

CONTROLLER ROM PARITY ERROR 

CONTROLLER ROM PARITY ERROR/SHIFTED FOR L60S 

UNIBUS RING READ ERROR 

UNIBUS RING WRITE ERROR 

UNIBUS INTERRUPT MASTER FAILURE 

HOST ACCESS TIMEOUT ERROR 

HOST EXECEEDEO COMMAND LIMIT 

UNIBUS BUS MASTER FAILURE 

DM XFC FATAL ERROR 

CONTROLLER HARDWARE ERROR 

INVALID VIRTUAL CIRCUIT IDENTIFIER 

INTERRUPT WRITE ERROR ON UNIBUS 

MAPPING REGISTER READ ERROR 

EITHER TIMEOUT OR PARITY WHILE READING 

PTES FROM HOST. Saa Sec 8.0 UQSSP . 

TOO MANY SUB-UNITS ON CONTROLLER kjn 

ER.SUN is not referenced 

elsewhere in code. 23. reserved for 

attempt to map when mapping not supported 

sec 8 . O uqssp 

BI MASTER ERROR (must be controller specific) 

BI STOP OCCURED 

BCAI PARITY TO RAM ERROR 

tmjtOal BI RETRY TIME OUT 
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MACRO ASSUME V1.TST.V2 
if tst , <<V1 >- <V2>> 

. i f f 



PACE 068 



ASSUME TWO VALUES MEET CONDITION 



7AS5UME - VALUES VI AND V2 ARE NOT TST 



. endc 
.ENOM 
.PACE 
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SOI LEVEL O AND 1 EQUATES 



1 52000 
1 640OO 
13 1000 
O46400 
O2540O 
046400 
01340O 
O7O40O 
1 22400 
107000 
175377 
131000 



000176 
OO020 1 
000202 
OOOOOI 
O002OO 
000204 
OO0005 
000009 
000207 
0001 70 
0000 1 1 
000210 
OOOI 67 
OOOOI 2 
0002 1 3 
OOOOI 4 
0002 1 6 
000003 
000200 
O0Q0O6 
000366 
000220 
000157 
OOOOI 7 
0001 75 



CONTCD 

ECHOCD 

ENDCD 

NENOCD 

FORI CD 

FORSCD 

READCD 

STRTCO 

WRITCO 

SGRPCD 

WRRDX1 

WRROXR 



»H00400 

AHOESOO 

AHOB200 

<<-6NDCD/256 

"H02B00 

AHO40OO 

*H01 700 

*H07 100 

*HOA500 

^HOSEOO 



CONTINUE FRAME COOE 

ECHO FRAME CODE 

END FRAME COOE 
>-1>»256.; NOT END FRAME CODE (SET FOR XOR IN END.FI 

FORMAT ON INDEX CODE 

FORMAT ON SECTOR CODE 

SELECT HEAD AND READ CODE 

START FRAME CODE 

SELECT HEAD AND WRITE COOE 

SELECT GROUP COOE 
-<READCDaWRITCO>- 1 > 
<REAOCO(WRITCD>SWRROXt>; READ/WRITE XOR VALUE 



SOI LEVEL 2 EQUATES 



COMPLT 


= «H07E 


CHGMOO 


: *H081 


CHGFLG 


= AH082 


DCN.ST 


= BITOO 


OCN. TT 


= BIT07 


DISCON 


= *H0S4 


DRVCLR 


■ AH005 


eRECOV 


< »H006 


GTCCHR 


= AH087 


GTCRSP 


» *H078 


GETSTA 


t AH009 


GTUCHR 


= *H088 


GTURSP 


s AH077 


INSEEK 


= AHOOA 


ONLINE 


= "H08B 


RUNN 


= AHOOC 


RECALB 


= »HOSE 


SOIRTV 


= 3 


SDTIMO 


= 200 


SEEKL 


s 6 


STARSP 


s AHOF6 


TOPOL 


= "H09O 


TOPRSP 


= AH06F 


SDITMO 


= 15 . 


UNSUCC 


s AH07D 



COMPLETED OP CODE 

CHANGE MODE OP COOE 

CHANGE CONTROLLER FLAGS OP COOE 

DISCONNECT SPIN DOWN FLAG 

DISCONNECT TERMINATE TOPOLOGV FLAG 

DISCONNECT OP CODE 

DRIVE CLEAR OP CODE 

ERROR RECOVERY OP CODE 

GET COMMON CHARACTERISTICS OP COOE 

GET COMMON CHARACTERISTICS RESPONSE CODE 

GET STATUS OP COOE 

GET SUBUNIT CHARACTERISTICS OP COOE 

GET SUBUNIT CHARACTERISTICS RESPONSE COOE 

INITIATE SEEK OP COOE 

ONLINE OP CODE 

RUN OP CODE 

RECALIBRATE OP CODE 

SDI LEVEL TWO ERROR RETRY COUNT + 1 

SEROES TIMEOUT 

LENGTH OF SOI LEVEL 2 SEEK COMMAND 

GET STATUS RESPONSE 

TOPOLOGY OP COOE 

TOPOLOGY RESPONSE 

CONTROLLER TIMEOUT VALUE 115 SECONDS) 

UNSUCCESSFUL OP CODE 



SOI ERROR AND OTHER EQUATES 



O00O10 
000001 



CSERR 
OCERR 



: = BIT03 
: = BITOO 



CHECKSUM ERROR ON LEVEL 1 READ 

DRIVE CLOCK TIMEOUT ON LEVEL 1 REAO/WRITE 
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FRERR 


: = 8IT02 


LNERR 


:■ BIT04 


SFERR 


: s BIT01 


UNERR 


: i BITOS 




. PAGE 



FRAMING ERROR ON LEVEL 1 READ 
RESPONSE LENGTH ERROR 
FIRST WORD NOT START FRAME ERROR 
UNSUCCESSFUL RESPONSE ERROR 
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.SBTTL KDB U-PROC DIAGNOSTICS 8 INITIALIZATION CODE 



< 

a 
n 

2 
cc 
O 



o 

-I 



********** 



DIAGNOSTIC HISTORV 

********************* 



******** 



************* 



1 1- 


JAN- 


81 


MATT 


20- 


JAN- 


81 


CURT 


27- 


JAN- 


81 


MATT 


29- 


JAN- 


81 


MATT 


30- 


JAN- 


81 


MATT 


1 2 


FEB - 


3 1 


MATT 


IS 


FEB- 


81 


BILL 


2S 


FEB- 


31 


MATT 


27 


MAR- 


81 


MATT 


1 7 


JUN- 


81 


MATT 


1 8 


JUN- 


81 


MATT 


19 


JUN 


81 


MATT 


24 


JUN 


81 


CURT 


24 


JUN 


31 


MATT 


30 


JUN 


81 


BILL 


1 6 


JUL 


a 1 


BILL 


03 


AUG 


81 


MATT 


14 


AUG 


81 


MATT 


17 


NOV 


81 


MATT 


1 6 


FEB 


32 


MATT 


23 


FEB 


82 


MATT 


05 


MAY 


82 


MATT 


14 


MAY 


82 


MATT 


28 


MAY 


82 


MATT 


1 8 


JUN 


82 


CURT 


1 9 


'JUN 


32 


CURT 


23 


-JUL 


32 


MATT 


23 


-NOV 


32 


MATT 


04 


-FEB 


83 


MATT 


10 


-OCT 


83 


MATT 


18 


-OCT 


83 


MATT 


01 


•MAR 


1 984 


MIKE 


1 1 


-APR 


1 984 


MIKE 


24 


-APR 


- 1984 


MIKE 


04 


-MAY 


- 1934 


MIKE 


14 


-MAY 


-1934 


MIKE 


30 


-MAY 


- 1984 


MIKE 


03 


-JUL 


- 1984 


MIKE 


24 


-AUG 


• 1984 


MIKE 


1 1 


-SEP 


- 1984 


MIKE 


21 


-SEP 


-1984 


MIKE 


24 


-SEP 


-1984 


MIKE 


08 


-OCT 


- 1984 


MIKE 



NPR FIX 

FIX ZERO BUFFER, SAVE FAILURE 

FIXED TWO STEP BITS SET IN SA REG 

SOI TEST FIX 

TEST CRTDS BIT IN OCR 

LEO CORRECTION 

BURST VALUE CORRECTION 

NPR ERROR REPORTING CORRECTION 

IMPLEMENT RICHVS CODE SAVING 

CODE NOT TO TOUCH FAILUR WORD 

CORRECTIONS OF PREVIOUS EDIT 

PURGE/POLL WIPES RO FIXED 

ADD SIGNITURE ANALYSIS CODE - 1 WORD 

TOOK EXTRA WORD OUT OF ERROR ROUTINE/COMMENT CHANGE 

REMOVE LAST FAILURE STORE 

FIX CROM TIMEOUT VALUES 

FIX STEP 1 DISPLAY ERROR 

ACLO FIXIONE LAST TIME) 

FROM 4K TO 1 6K 

SDI CHANGES FOR 8 PORT DIAGNOSTIC MODE 

ADD '+DRINIT' AT STEP4 : 

TOOK OUT DIAPRT -- FDR ALL REFERENCES SEARCH FOR ;MJT(SDI) 

FIXED MAX RING LEN NOT CLEARING RING AREA PROBLEM 

FIXED WRAP FEATURE, LEDS FLASH ;MJT1 

U0AS2 NEW BOARD CHANGES 

UDAS2 NEW BOARD CHANGES - NOW IT WORKS 

CHANGE DCRTST TO REPORT BOARD 2 ERROR 

COMMENTED OUT U80 CR TESTS AS CODE REDUCTION ; IU52EC1] 

SPLIT UP U ANO D PROC DIAGNOSTICS 

START CHANGING CODE FOR REAL QDA 

CONTINUE TO CHANGE FOR REAL QDA 

CONTINUE TO CHANGE FOR REAL UOA/QOA 

SOI PORT WRAP TEST 8 DFAIL U-CROM TEST 

MAKE HOST SEE SA DATA AT BEGINNING OF TEST (BLOI 

SET OB, MP BITS IN STEP 1 S 0>SRUN BEFORE READING (UDS) 

IMPLETMENTED DMA TEST TO HOST MEMORY 3 NOW USING PURGE 

SIGNAL TO DETECT SA REG WRITE FROM HOST IN STEP 1. 
PUT '.ORG 700' AT END OF DIAGNOSTIC SECTION. 
CONDITIONED OUT 1 SECOND TIMEOUT LOOP IN UDIAG. (BL2) 
FIXED PROBLEM IN DMA TEST (BL3I 

ADDED LOOP-DN-TEST CODE, VERIFIED 8 CORRECTED ERROR CODES 
ADDED SA ERROR COOES TO ROUTINES 3 ERROR CALLS 
GENERAL ROUTINE CLEAN-UP 3 ADDING CSTYPE CONDITIONAL 

FOR BOA DEVELOPMENT 
FIX ODA MAXIMUM BURST RATE TO 16. WORDS 
GENERAL ROUTINE CLEAN-UP 3 ADDED PRELIMINARY BDA CODE. 



r 
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.'16-0CT-1984 
; 1B-0CT- 1984 
; 22-0CT- 1984 

; 30-0CT- 1984 

, OS-NOV- 1984 

;08-N0V- 1984 
; 26 -JUL- 1 985 
; 21 -AUG- 1985 
I06-SEP- 1985 
; 28-0CT- 1985 

; 1 3 - NOV - 1 985 

; 20-N0V- 1985 
; 1 1 -DEC- 19SS 
; 1 6- JAN- 1986 

; 03-0EC- 1986 
; 29 -JAN- 1988 



BOB E 


Add 


MIKE 


IMPL 


MIKE 


AOOE 




INI 


MIKE 


MOD I 


MIKE 


ADO 




CHA 


MIKE 


SOME 


MIKE 


KDB 


MATT 


ADDE 


MIKE 


CHAN 


MATT 


ADOE 


MIKE 


CHAN 




S R 


MIKE 


SKIP 


MIKE 


REMO 


MIKE 


FIXE 




ADD 


LESLIE 


MANU 


MATT 


MOD 



ERR03 for Alog/Log check error. 

EMENT ODA DEFAULT BURST RATE OF 8 WORDS (4. LONGWOROS) 

SA WRAP MODE FIX AND 

T UBURST TO 2 IN SO DMA DOESN'T FAIL 

FIED SA WRAP MODE FIX 

COMMENT TO ERROR ROUTINE DESCRIPTION 8 

NGE LITERAL IN RAM BUFFER TEST 

COMMENT 8 RAM BUFFER TEST CHANGES 
UCOOE FREEZE HERE . . . 

D A LINE TO SAVE HARDWARE REVISION [ in j t S 1 

GE CODE FOR STOP CMO HAROWARE [mrlOOl] 

D RTOEVEN WITH BICSREN IN POLTST ImjtOSl FOR HAROWARE CHANGE WITH RTO 
GE SOME KDB COMMENTS 
EPLACED IOC CCEF WITH CDONE and NO MERR [mrl002] 

BISTOP TEST, PROBLEM CAUSED BV CCEF HARWARE CHANGE (mr1003] 

VE BISTOP TEST [mr!004] 

THE BI MASTER RESET TIMING PROBLEM WHEN VECTORING TO 

RESSES 7771 8 7772. [mrlOOSl 

FACTURING BUS TEST [lthOOU 

IS of CODVER in STEP 4 
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DIAGNOSTIC SPECIALLY USED REGISTERS 



oooooo 
oooooi 

000040 
0001 00 
000200 
000400 
000400 
00 1000 

000400 

00 1000 
100000 



LT400 = 
UDA1 : I 



B0ARD2 
ERRBIT 



= 8IT05 

: BIT06 

= BIT07 

= BIT08 

= BIT08 

: BIT09 

= BIT08 

= BIT09 

: B I T 1 5 



.0 s OLD CODE 

; 1 = NEW UDA1 ETCH 

;STEP1 SPECIAL MODE 

;STEP1 MAPPING SUPPORTED 

;STEP1 000 BVTE ADDRESSING SUPPORTED 

;STEP1 ENHANCEO DIAGNOSTICS SUPPORTED 

.STEP1 ENHANCED DIAGNOSTICS SUPPORTED 

;STEP! 22 BIT ADDRESSING SUPPORTED 

;STEP4 SPECIAL FUNCTION BIT 

.0 z BOARD #1,1= BOARD *2 
;0 s NO ERROR, I -. ERROR 



[mr 100 1 ] 



DIAGNOSTIC EQUATES 



< 

O 

II 

s 

oc 
o 



00030S 
022000 
176O0O 

0000 1 1 
0000 1 1 



ECSUML 
ECSUMH 
ECCMSK 

SCLR 
RCLR 



: = 305 

: = 22000 

: = 176000 

: = 11 

: = II 



.ECC SUM LOWER BYTE 
;ECC SUM UPPER BYTE 
J ECC MASK 

; xBUS - SET/RESET XBUS INFC I/O CLEAR 
; XBUS - SET/RESET XBUS INFC I/O CLEAR 



o 

(0 



KDB50. MICROCODE., 22- APR-19 8 8 11:18:48.97 



KOBUP DIGITAL EQUIPMENT CORP., 2901 

KDB U-PROC DIAGNOSTICS S INITIALIZATION CODE 



ASSEMBLER VERSION 32 



PAGE 074 



******** 



******** 



*************** 



Diagnostic test sequence, 
U-PROC (TEST LABEL) 



with respect to time and each processor 
D-PROC (TEST LABEL) 



U.RSTRT : 



SEQUENCER RELIABILITY 
SEOUENCER STACK TEST 
ALU TEST IALUTST) 
CONTROL REG TEST (UCRTST) 
DFAIL TEST 



D.RSTRT : 



o 



SEOUENCER RELIABILITY 
HANG ON t INSTRUCTION (TSTHNG) 
HANG D-PROC (TSTHNG) 
" (TSTHNG) 
RUNS THROUGH ALL OF U and D ROM 



If an error occurs here, the D-PROC will continue to run 
thru the U or D ROM, while the U-PROC reports the error. 



RELEASE 0-PROC (RELES) 
HANG U-PROC (RELES) 
DISPLAY LBOS (OSLEDS) 
ROM PE TEST IUROMPE) 
RELEASE 0-PROC (RELES) 
HANG U-PROC (RELES) 
" (RELES) 
" (RELES) 
" (RELES) 
" (RELES) 
" (RELES) 
" (RELES) 
RAM PE TEST (URAMPE) 
BI FAST SELF-TEST ENABLED 
IF SO, 

RELEASE D-PROC, 

GOTO FAST TEST (FSTST) 

RELEASE D-PROC (RELES) 

HANG U-PROC (RELES) 

(RELES) 

RAM BUFFER TEST (RAMTSTI 

RELEASE 0-PROC (RELES) 

HANG U-PROC (RELES) 

" (RELES) 

" (RELES) 

" (RELES) 

" (RELES) 



SEOUENC 

RELEASE 

HANG 



ER S 
U-P 

D-P 



ALU TES 

DISPLAY 
ROM PE 
BOARD 2 
CONTROL 
RAM PE 
RELEASE 
HANG 



T (A 

LED 

and 
TES 
REG 

TEST 
U-P 
-P 



BI FAST 
IF SO, 

GOTO 
HANG D- 
RAM BUF 
RELEASE 

HANG 

SOI TES 
SEROES 

SEROES 
ECC TES 
RELEASE 



SEL 



TACK TEST 
ROC (RELES) 
ROC (RELES) 

(RELES) 

(RELES) 
LUTST) 
S (DSLEOSI 
TIMEOUT (OROMPE) 
T (B2TST) 
TEST (DCRTST) 
(DRAMPE) 
ROC (RELES) 
ROC (RELES) 

(RELES ) 

(RELES ) 
F-TEST ENABLED? 



FAST TEST (FSTST) 
PROC (RELES) 
FER TEST (RAMTST) 

U-PROC (RELES) 

D-PROC (RELES) 
(RELES) 
T (SDITST) 
WRITE (SOWRT) 
READ (SDRD) 
T (ECCRO) 

U-PROC (RELES) 



Cont i nue . 
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U-PROC (TEST LABEL) 



D-PROC (TEST LABEL) 



FSTST : 

SET BI 
BCAI BU 
BI PE T 
BIIC BU 
GET BI 
SET BI 
BIIC BU 
POLL TE 
BI MEMO 
LOAO 81 
CLEAR B 
SET STE 

U.END: 



LOOPBACK MODE 

FFER TEST (BCATST) 

EST (BIPE) *PART MFG* 

FFER TEST (SIITST) 

NODE ID (GETID) 

NORMAL MODE 

FFER TEST (SIITST) 

ST (POLTST) 

RY TEST (BIMEM) *MFG* 

DTYP REGISTER 

ROKE BIT IN BICSR 

P 1 IN SA REGISTER 



Q 
< 

D 

a 
ii 
s 

a. 
O 

LL. 

to 
o 
co 



WAIT 50ms FOR HOST RESPONSE 

REDO DIAGNOSTIC ??? 

IF SO , 

SET FLAG, RELEASE D-PROC, 
GOTO RESTART (U.RSTRT) 

GOTO INITIALIZATION 

STEP. 1 , 

STEP .2, 

STEP. 3, 

DMA TEST (DMATST) , 

STEP .4, 

GOTO U-PROC IDLE LOOP. 



HANG 0-PROC (RELES) 

" (RELES) 

" (RELES) 

" (RELES) 

" (RELES) 

" (RELES) 

" (RELES) 

" (RELES) 

(RELES) 

(RELES) 

(RELES) 

" (RELES) 



(RELES) 



IF SO , 

GOTO RESTART (D.RSTRT) 



GOTO D-PROC IDLE LOOP 
INITIALIZE ORIVES 



***************** 



************** 



************************* 



************ 



'U 
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LEV05 *« USES THE ENTIRE STACK ** 



The 2911 sequencers are tested with CONTINUES, JUMPS, CALLS and 
RETURNS to make sure they are functioning properly. The STACK is 
tested to make sure that it's 4 locations can be wrapped around. 

When the diagnostic is restarted, the D-PROC will be within 2 cycles 
of the U-PROC. If it isn't, a race with the registers may occur and 
cause an error . 

REGISTERS USED: 

(TSTCNT) is used as the test counter. 

R3 (HANG) holds the SA register STEP bits until the 0-PROC 
hangs. Then, this register becomes a hand shaking mechanism 
between the U-PROC and the 0-PROC, to coordinate the HANG/ 
RELEASE process. 

R7 (UERJ is used as the U-PROC error register. 

R17 is used as the STACK counter. 



000000 1204S7 007637 10000 

000001 013740 006310 010000 

000002 0344S7 0O4O17 130005 



**********************************,***»;;*,:,» 
INC R17\0, , BAR (PSCLR 
MOV #<B . NRTYtB . LOOP+B . BAD> ,BREG 
U.RSTRT: CLR R17,,UCR0 %CALL JMPTST 



;WHEN RESET, INCREMENT R17 AND DISPLAY ON 

; DATA BUS. FALL THROUGH TO RESET TIMERS 

;LOAD BREG WITH ABORT CMO , LOOPBACK MODE, 

; SI BAD, ON POWER-UP OR WHEN SST IS ENABLED 

;CLEAR UCRD, R17 

; PUSH SEOERR ADDRESS ONTO STACK FOR 

; POTENTIAL PARITY ERRORS. 



******** 



*********** 



000003 013740 006310 



000004 034444 004004 10O003 



THE SEOUENCE ERROR CODE IS EXECUTED IN AN ATTEMPT TO CONTROL A FATAL 
SEOUENCER ERROR. 

NOTE: Fatal sequencer errors, try to display 1O4000 somewhere. 

****;**************************»«******»**«»,«,*,»,*,»»»*,»»,,*,*,,»»,,,,»,,,,» 

SEOERR: MOV #< B . NRT Y + S . LOOP + B . BAD> . BREG XCALL . ♦ 1 ;LOAD BREG WITH ABORT CMO, 

; LOOPBACK MODE a BI SAD / 
; SEOUENCER ERROR 
CLR CRI..UCRD %JMP SEOERR :OISPLAY ALL THE LEDS / 

; JUMP TO SEOUENCER ERROR. 
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000005 










ASS 


O00005 


034443 


000603 


0OO003 


JMPTST : 


CLR 


000006 


01 3440 


oooooo 


030003 




NOP 


00O0O7 


O04240 


ooosso 


100015 




CLR 


OOOOI 


133750 


0002 10 


1 30003 




MOV 



HANG GPRUPF %JUMPN SEOERR ;ERROR IF THIS JUMP WORKS / 

; RESET U-PROC FLAG TO INOICATE 
; NO LOOP ON TEST. 
%CUMPN SEOERR ;ERR0R IF THIS CALL WORKS 
tPRSCAI %JMP JUMP .CLEAR TSTCNT(Q) / RESET BCAI VALID BITS 
; TRY FIRST JUMP . 
#ERROO,UD0I %CALL SEOERR ; ERROR JUMP OID NOT WORK 



OOOOI 1 
0000 12 
00O01 3 



013440 

1337S0 
01 3440 



OOOOOO 
00021O 
OOOOOO 



127777 
100003 
OOOOOO 



TSTCNT 
V 

******XX****xXXXX*****XX*XX**XX*X***XXX**xXX*******x»x»x 
LOAD UDD (SA REG) WITH STEP DATA 8 RETURN ROUTINE 

xxx*x**xx***x***x*x*x*****xx*****xxx***x****** xxxxxxxxx* 
STEP 



SXXxxxxx 



txxxsxx* 



NOP 
MOV 
NOP 



"RET ;TRY FIRST RETURN. 

#ERROO,UDDI 7.JMP SEOERR ;ERROR IF RETURN 010 NOT WORK. 

; ; To Mis-align 0-PROC & U-PROC code 



0000 14 013440 OOOOOO 137777 



0000 15 
OOOOI 6 



013440 
034443 



OOOOOO 

000003 



1 2001 1 
OOOOOO 



xx*»*x«xxxxx**x*xxx*x*»*x*xx**»xx*x»»» 
CROM PARITY ERROR 

«XXXXX*X*XXXXXX*«X*SXXXX»X**XXXXXXXXXX 

TSCRPE; WORD 13440,0, 137777 

XX*X*XXXXXXXXX**XXXXXX**XXXXXX*XXXX» 

TEST RETURN 

XXSX*XXXXXXXX**XX«XX»*XXXXXX**XXXXXX 

JUMP . NOP %CALL 



«*xxxxxx 



sxxxxxx* 



ixxxxxs**** 



xxxxxxxx 



NOP 

CLR 



HANG 



**«XXXXXX»X*XXXXXXXXX* 

jFORCe CROM PARITY ERROR 

«*XXXX«XXXX«XXXXXX«*XXXXXXXX*X« 



.SEE IF RETURN WORKS 
; RETURN WORKED 
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; ; ********************************** 

TEST STACK WRAP AROUND 

; : ********************************** 
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********** 



******** 



000017 0337S7 000004 110022 



00O020 
00002 1 



000022 
OO0023 



031477 
030SS7 



0314S7 

01 6557 



10017 
0000 10 



000017 
010070 



070020 
137777 



130020 

100003 



SEOTST : 
1$ : 
2$: 



OEC\T 
ADO 



OEC 
XOR 



R17 

#8 . , R17 



R1 7 

CSS . 



OO0024 033753 010004 037777 



000025 0314S3 000013 13007S SE001: 



%JMP 


2$ 


%CNZR0 
%RET 


1$ 


%CALL 


1$ 


%JZRO 


SEOERR 


7.RNZR0 





*************** 



********************* 

;IF WE GET HERE, BOTH JMP , CALL a RET 

WORKED, ELSE 

ALU ERROR WILL RETURN TO 'SEOERR'. 
;SET STACK PUSH COUNT 

LOOP HERE FOREVER IF ALU 

STACK OR NZRO FAILED. 
;PUSH '.+1' ON STACK 3 TIMES. 
;RETURN HERE 3 TIMES, THEN 

RETRUN TO '2$+1 ' . 
;PUSH REAL RETURN ADDRESS 

STACK TEST RETURN HERE 
;ERR0R IF R17 IS ZERO / 

GO THRU HERE TWICE, 

ISt R17« 32. 8 2nd R17= 59. 
.TEST STACK WRAP-AROUND 

EOUALS RETURN TO '1$+1' 

STAY THERE 3 TIMES UNTIL STACK 

WRAPS AROUND. 

IF WE GET HERE, WRAP-AROUND WORKS 

WORKS, ELSE RETURN TO 'SEOERR'. 
;PUSH STACK FULL OF ERROR 

RETURN ADDRESSES. 






) 
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LEVOO WILL HANG HERE 
ERROR ROUTINES 



Q 
< 

a 

ii 

2 

cc 

O 

u_ 

01 

o 



********* 



******* 



Red LED codes displayed; 

9 (Hex) : BOARD 1 BAD 

A (hex) = BOARO 2 SAO 

Yellow LSD codes displayed; 

ON * NODE PASSED SELF-TEST 

OFF : NODE FAILED SELF-TEST 

Format of error code that will Be put into t he SA r eg i St er ; 

IS 14 13 12 11 10 9 8 7 6 5 4 3 2 1 



0= Board 1 tPROC) at fault 
1= Board 2 (SDI1 at fault 



-PROC detected error 
-PROC detected error 



00002S 004240 OOOOOO 000000 



000027 
000030 



OO0O3 1 
OO0032 

000033 



033747 

133547 



033747 
01374O 
133547 



000040 
0000 10 



OOO240 
OO7047 
00O040 



O 10000 

1 1004S 



130075 
135577 
1 10045 



ERRB1 A 
ERRB1 Z 
ERRB1E 



t***************** 
; ;BOARD 1 ERRORS 
CLR TSTCNT 



**************************************** 
RAMPE/CROMPE/TIMEOUT RETURN ADDRESS 



MOV 
BIS 



#ERR01 ,UER 
#STEP1 . UER 



;;STEP 3 OR DMA ERRORS 



MOV 
MOV 

BIS 



iKERROS.UER 
#TEMP2, \N, BAR 
#STEP3.UER 



%CALL 
%CALL 
%JMP 



CLRTST 
S . LDR5 
ERRB1 



;ALU TEST ERROR/TSTCNT MAY HAVE GARBAGE 
;SPECIAL LABEL FOR ALG * LG RAM TABLE ERROR 
{CONTROL PE/ALU TEST/CR TEST ERRORS 
;SET STEP ONE TO REPORT BRO 1 ERROR 



;CLEAR TSTCNT(0] 

;RESET INTERRUPT / VECTOR IN RS 

iSET STEP 3 ERROR 



V- 
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; ;STEP 1 IHIT ERROR 



000034 033747 000200 1 2007S ERRS 1 L : MOV 

000035 133547 0000 10 110045 BIS 



#ERR04, UER 
#STEP1 , UER 



•/.CALL 
%UMP 
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CLRTST ;STEP 1 INITIALIZE ERROR 
ERRB1 ;SA REG OATA WAS NOT CORRECT 



;;STEP 2, 3 OR 4 INIT ERROR 



^000036 033647 000300 120045 ERRB10: BIS 



v» 



*ERR06 , TSTCNT. UER 7.CALL ERRB 1 



;STEP 2.3 OR 4 INITIALIZE ERROR 
;SET RETURN AOOR IF VECTOR 



;SI TEST ERRORS 



000037 


1 1 4544 


000002 


010000 


ERRB1M: 


BIT 


#INDIAG,CRI 






OOOO40 


033767 


010144 


142071 




MOV\T 


#ER.MER,UER 


%JZRO 


U . UERR 




003740 


000037 


1OO043 




MOV 


#37. TSTCNT 


%JMP 


ERRB1B 




004240 


OOOOOO 


1OO043 


ERRB1T : 


CLR 


TSTCNT 


%JMP 




000043 


033747 


000340 


010000 


ERRB IB: 


MOV 


#ERR07, UER 






00O044 


133547 


000010 


1 10045 




BIS 


0STEP1 , UER 


%JMP 


ERRB1 



000045 133744 000144 



000O46 
O00O47 
000050 


033747 
133547 
133744 


OOOIOO 
OOOOI 2 
0001 24 


OIOOOO 
OOOOOO 
1O0O5 1 


ERRB2E : 


MOV 
BIS 
MOV 


00005 1 


133547 


000204 


130052 


ERRSET: 


BIS 


000052 
000053 
000054 


033047 
034443 
033451 


0OOOO7 
000003 
000007 


OOOOOO 
OOOOOO 

120243 


IS: 


BIS 
CLR 
MOV 



; IN DIAG M00E7 

;BI MASTER ERROR IN PUNC MOOE , ELSE 

;BI MASTER ERROR IN DIAG MOOE 

;BI SELF-TEST FAILEO OR CMO TIMEOUT ERROR 

:BI TEST ERROR CODE 

;SET STEP ONE TO REPORT BRD1 ERROR 

; : BOARD 1 ERRORS 

MOV #<LED4+LE02+DFAIL> ,CRI 7.JMP ERRSET ;LEDS '0110' 9 (hex) OsON 

; : BOARD 2 ERRORS 

#ERR02,UER ; RAM PE, RAM BUFFER or RAM ERROR ANY PROCESSOR 

#<STEP1*B0AR02>,UER ;SET STEP 1 1 BRD2 TO REPORT BOARD #2 ERROR. 

#<LE04+LE01+OFAIL> .CRI %JMP ERRSET ;LEDS 'OIOI' A (hex) OsON 

ERRSET is the diagnostic error trigger point... 



#ERRBIT+BIT10,UER 

TSTCNT, UER 

HANG 

UER.OER %C 



"/.CALL 1$ 



SET ERROR « U-PROC BITS IN ERROR REG / 

SETUP RETURN ADOR IF VECTOR. 
SET TSTCNT(O) IN ERROR REG 
CLEAR HANG REG SO 0-PROC CAN CONTINUE. 
SEND ERROR STATUS TO 0-PROC ERROR REG / 

WAIT, BI SELF-TEST MAY NOT BE COMPLETE. 



; ; Th i s rout i ne 



000055 

000056 
000057 



013740 
013740 
033444 



006310 
0063 1 1 
004004 



01OO00 
OOOOOO 
125633 



used to help the D-PROC send the error code to the SA REG 

MOV #<B.NRTY+B.LOOP+B.BAO>,BREG :L0AO BREG WITH ABORT CMD 

MOV #<B . NRTY+B . LOOPtB . BAO+B .NABO> , BREG ;L0AO BREG WITH NO ABORT CMD 

MOV CRI..UCRD '/.CALL UNB . RS ;SET LEDS ON BOARD 1 / RESET BUS 
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0IND1AG.CRI 
#ERRBIT.UER 
#SAREG,RO %CALL LRG 

#BIWRCM, RO 

RO, , BCAID (PLCOM 

UER, R1 , BCAID (PWRFST 

UER,, BCAID 0LBWR %CALL 1$ 



000060 


133544 


OO0OO2 


OIOOOO 


UHANG : 


BIS 


00OO6 1 


133547 


OO02OO 


Ol 0000 




BIS 


000062 


033740 


000364 


130272 




MOV 


0OO063 


033740 


O0O004 


OOOOOO 




MOV 


000064 


033440 


OO5540 


OOOOOO 




MOV 


000065 


03344 1 


005527 


OOOOOO 




MOV 


OO0O66 


034447 


005747 


130070 




CLR 


0O0067 


033447 


00000 1 


100072 




MOV 


O00O70 


037140 


OOOOOO 


OOOOOO 


IS: 


XNO 


00007 1 


031 440 


OIOOOO 


010071 


2$: 


DEC 


000072 


033444 


004004 


OOOOOO 


3$: 


MOV 


000073 


013740 


0063 10 


OIOOOO 




MOV 


000074 


01 3447 


000007 


1 10072 




TST 



R1 , UER 
RO , RO 



%JMP 
5SJNZR0 



3$ 
2$ 



CRI , , UCRO 

#<B. NRTY+B. LOOP+B.BAD>, BREG 

UER %JMP 3$ 
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SET 'INDIAC- MODE TO RETURN FROM BCAI 

SET ERROR BIT 

OFFSET TO SA REGISTER (BI GPR 1] / 

GO LOAD BIIC REGISTER ADDRESS. 
DO WRITE COMMAND 
LOAD COMMAND 
SAVE UER IN R1 / 

WRITE ERROR TO R1 S FIRST BUFFER 
CLEAR UER INCASE OF VECTOR / 

WRITE LAST BUFFER AND DO THE WRITE 

SETUP VECTOR RETURN ADDRESS 
RESTORE OLD UER VALUE AFTER VECTOR 
INITIALIZE WAIT LOOP COUNT (91ms) 
WAIT FOR PARITY ERROR VECTOR 
RESTORE LEOS ON BOARD I 
LOAD BREG WITH ABORT CMO 
TEST U-PROC ERROR REG / 

LOOP HERE FOREVER . . . 



c 
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********** 



********** 



******** 



CLEAR TSTCNT(O) BECAUSE IT COULO BE FILLED WITH GARBAGE AT TIME 
OF INIT OR DMA ERROR 



; ; ************************************ 

000075 004240 000000 127777 CLRTST: CLR TSTCNT %RET 

; ; ************************************ 
'; PUSH STACK FOR STACK WRAP TEST 

; ; ************************************ 

000076 OOOOS7 10017 050025 PSTACK: ADD\P R17, TSTCNT 



C/J 

o 



ITSTCNT(O) > (COULD BE GARBAGE) 

******************************** 



o 



********** 



************************ 



•/.JNZRO SE001 ;JUMP BACK UNTIL STACK FULL, ELSE 
; INCREMENT TSTCNT(O). 
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********* 



******************************** 
The U-PROC calls Its BOARD 1 diagnostics 



********* 



******* 



********* 



OO0077 
OOOIOO 
OOO10 1 



037140 
013460 
014467 



OOOOOO 
010000 
060007 



130373 
05021S 
140077 



U .DIAG : 
TO: 



OOO102 133760 010020 170456 T1: 



000 103 

0001 04 



013460 
014467 



010000 
060007 



050215 
140102 



XNOR 

NOP\T 

CLR\T 



NOP\T 
CLR\T 



RO.RO 


'/.CALL 


ALUTST 




%JN2R0 


U .END 


UER, \N 


XJUPF 


TO 


#< 1024 . *4> , RO 


%CZRO 


UCRTST 




%JNZRO 


U . END 


UER, \N 


'/.JUPF 


T1 


*********************** 


******* 



INITIALIZE RO TO -1 / 00 ALU TEST 

JUMP IF ERROR 

LOOP IF U-PROC FLAG SET 

INIT RO WITH 4K COUNT / 

00 CONTROL REG DATA INTEGRITY TEST 
JUMP IF ERROR 
LOOP IF U-PROC FLAG SET 



******** 



******** 



***** 



THE FOLLOWING CODE IS USED TO TEST THE OFAIL FUNCTION IN THE U-PROC'S CONTROL 
REGISTER ANO THE CONTROL ROM PARITY ERROR FLAG. THIS CODE ALSO CHECKS FOR ANY 
BAD PARITY LOCATIONS WHICH MAY EXIST IN ROM. 

OFAIL PART 1 

The D-PROC will be forced from the hang routine ITSTHNG) in D-PROC ROM and 
go back when done. The D-PROC will increment thru the 0-CROM, and then go 
across a Known BAD PARITY location (TSCRPE), which will set the control ROM 
Parity error. When OFAIL test PART 1 is complete, the 0-PROC will execute 
the instruction at SEOTST-3 in the D-PROC ROM. 

NOTE: Errors in this routine display the following in the SA register; 
106040 - OFAIL test error 
106042 - CROM parity error 



:******** 



********* 



000105 
000 106 



0001 07 
OOOI lO 



0001 1 1 

0001 12 
OOOI 1 3 



133544 
131540 



031440 
033757 



004240 
01 3440 

1 15544 



004006 
120003 



10000 
120377 



120000 
1 20620 
004OO4 



10000 
050027 



010107 
010027 



1 10027 
010027 

120455 



BIS 
SUB\F 



DEC 
MOV 



#<DFAIL+INDIAG>,CRt.UCRO 



RO 

#377, R17 



■/.JNZRO 
%JCPE 



CLR 


TSTCNT 


%JNCPE 


ERRB1E 


NOP 




PRCLR %JCPE 


ERRB1E 


BIC 


#OFAI I 


CRI\N,UCRD %CALL 


INCRTN 



****************************** 

SET DFAIL BITS TO SEND 0-PROC THRU THE D-CROM. 
ERROR! 106042) IF CPE SET HERE, ELSE 

SET RO COUNTER TO 7775. 
WAIT HERE TIL D-PROC TESTS D-CROM PE. 
ERROR! 106042) IF CPE IS SET HERE, 

STUFF R17 WITH HIGH VALUE JUST 

INCASE D-PROC IS IN SEOUENCE TEST NOW. 

THIS WILL FORCE THE D-PROC TO 

STAY IN THAT LOOP. 
ERROR! 106040) IF CPE NOT SET HERE / 

CLEAR TSTCNT(O) . 
ERROR! 106040) IF CPE IS SET HERE, ELSE 

RESET I/O CLEAR. 
RELEASE 0-PROC FROM OFAIL TEST / 

INCREMENT TSTCNT(O) / RETURN. 
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;************************»******** 
DFAIL PART 2 
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000114 133740 00002O 120455 



000 1 15 
000 1 16 
000 1 17 



000 1 20 
000121 



000122 
000123 



000124 
OOOI 25 
0001 26 



00013 1 
000132 
000133 
OOOI 34 
0OO135 



033544 
131540 
013440 



03 1440 
004240 



013440 
033443 



035544 
013440 
135544 



004 1 00 
000003 
000620 



010000 
120000 



1 20000 
120637 



004 1 00 
000000 
004004 



010000 
000000 
100OO 



010120 
050027 



1 10027 
000027 



O10000 
000000 

000000 



003760 
013760 
033761 
01 3460 
014467 



010030 
0170O1 
013001 
010000 
060007 



170455 
I 60455 
1 7047 1 
050215 
1 40 132 



000136 013460 10000 



The D-PROC will be forced from the hang routine ITSTHNG) in D-PROC ROM and 
go back when done. The D-PROC will increment thru the U-CROM, and then go 
across a Known BAD PARITY location (TSCRPE), which will set the Control ROM 
Parity error. When DFAIL test PART 2 is complete, the 0-PROC will execute 
the instruction at SEOTST-1 in the D-PROC ROM. 

NOTE; Errors in this routine display the following in the SA register; 
106040 - DFAIL test error 
106O42 - CROM parity error 



BIS 
SUB 
NOP 



DEC 
CLR\F 



#<1024 . *4> ,R0 



#USK,CRI , 

#3, RO 



NOP 
MOV 



BIC 
NOP 
BIC 



RO 

TSTCNT 



R17.HANG IPRCLR 



%JNZRO 
%JCPE 



•/.JNCPE 
%JCPE 



2$ 
ERRB IE 



ERRB1E 

ERRB1E 



000127 013443 010623 010127 3$: 



000 130 133744 004362 120236 



#U8K, CRI , UCRD 

0OFAIL , CRI , UCRD 

HANG PRCLR 7.JNZR0 3$ 



; INIT RO WITH 4K COUNT / 

i INCREMENT TSTCNT(O) / RETURN. 

;SET U8K BIT TO SEND D-PROC THRU THE U-CROM. 

;SET RO COUNTER TO 7775. 

/RESET CPE WITH I/O CLEAR, 

; Just incase CPE was generated while 

; switching DFAIL test from D-CROM to U-CROM. 

WAIT HERE TIL D-PROC TESTS U-CROM PE. 
ERROR! 106042) IF CPE IS SET HERE, ELSE 

CLEAR TSTCNT(O) . 
ERROR! 106O40) IF CPE NOT SET HERE 
ERROR! 106040) IF CPE IS SET HERE / 
RESET CPE WITH I/O CLEAR / 
SET HANG REGISTER SO WE CAN WAIT FOR 
THE 0-PROC TO RESET HANG LATER. 
CLEAR U8K BIT TO RETURN 0-PROC TO 0-CROM 
WASTE A CYCLE BEFORE 0-PROC RESTARTS 
RELEASE D-PROC FROM OFAIL TEST TO START 

EXECUTING IT'S SEQUENCER TEST. 
WAIT HERE TIL D-PROC GETS TO 'RELES*2' / 
RESET CPE WITH I/O CLEAR, 
Just incase CPE was generated wh i 1 e 
Switching D-PROC from U-CROM to D-CROM. 



MOV 

MOV\T 
MOV\T 
MOV\T 
NOP\T 
CLR\T 



#<LEDS+INDIAG> , CRI , UCRD "'.CALL DSLEDS 



#30, TSTCNT 
#1 , \N, BAR 
#1 , R1 , BUF 



HU . T3 

HU . T4 

HU. TS 

HU. T6 



%CZRO 

%CZRO 

%CZRO 

%JNZRO 

%JUPF 



INCRTN 

INCRTN 

UROMPE 

U.ENO 

T2 



;TURN ALL LEDS OFF / 

; ROTATE LEO DISPLAY. 
^INITIALIZE TSTCNT(Q) FOR NEXT TEST. 
;LOCATION OF RAM PE / INC TST CNT / RTN 
; CLEAR RAM PE / ROM PE TEST 
;JUMP IF ERROR 
;LOOP IF U-PROC FLAG SET 



; HANG U-PROC, RELEASE D-PROC TO DO BOARD 1 DIAGS 
; AND RAM PE TEST. 
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0001 37 
0001 40 
000141 
000142 

000143 
OOO 1 44 



0001 46 
000147 
OOO 1 50 
000 1 5 1 
0001 52 
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*************** 



******* 



The U-PROC calls its BOARD 2 diagnostics 



***************** 



013460 
013460 
014467 
034443 

132444 
01 345 1 



010000 
010000 
060007 
100003 

000004 
0000 1 1 



1 70475 
0502 15 
1S0136 
150145 

10000 
100153 



NOP\T 
NOP\T 
CLR\T 
CLR\F 


UER, \N 
HANG 


NEG 
TST 


CRI 
DER 



000145 013460 010000 170232 HU.T7: 



01 3460 
000660 
01 3460 

I 4467 

01 3460 



10000 
1000 1 
OIOOOO 
060007 
010000 



1 70505 
170455 
0502 IS 
1 401 48 
170232 



**************** 

%C2R0 URAMPE 
%JNZRO U .END 
%JUPF HU.T6 
7.JNFTEST HU . T7 



NOP\T 




7.CZR0 


RELES 


NOP\T 




\CZRO 


RAMTST 


AOD\T 


#1 . TSTCNT 


%CZRO 


INCRTN 


NOP\T 




•-JNZRO 


U . END 


CLR\T 


UER, \N 


%JUPF 


T8 


NOP\T 




%CZRO 


RELES 



******************************** 

;RAM PE TEST 

.JUMP IF ERROR 

;LOOP IF U-PROC FLAG SET 

iJUMP IF NOT BI FAST SELF-TEST, ELSE 

; RELEASE 0-PROC 

ilNDICATE BI FAST SELF-TEST TO THE 0-PROC 

;JUMP TO COMPLETE BI TESTING / 

: DID THE D-PROC HAVE AN ERROR? 

;HANG U-PROC, RELEASE D-PROC TO 00 RAM BUFFER TEST. 

; RAM BUFFER TEST. 

INITIALIZE TSTCNT(O) FOR NEXT TEST. 

.JUMP IF ERROR 

;LOOP IF U-PROC FLAG SET 

; HANG U-PROC, RELEASE 0-PROC TO DO REST OF 

; 80AR0 2 DIAGNOSTICS. 



c 
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******************* 



************* 



******** 



*********** 



The U-PROC calls its SI diagnostics 

************************************* 



000153 
0OO154 



01 3440 
033746 



10000 
000321 



010215 
010000 



T9 : 
FSTST : 



000155 015546 IISOOI 05E237 



NOP 
MOV 



BIC\F 



7.JNZR0 U.END 
#<B.NRTY-fB.LOOPfB.LEO + B.NABO>,RS 



BIIC SELF-TEST OK, 



OOOI56 
000157 
000160 
00016 1 



033446 
133745 
013740 
1 13740 



006006 
000100 
007266 
003140 



010000 
120501 
000000 
010000 



#B. NAB0,R6\N,BREG 7.JST0P BI.STP 
R6, , BREG 



0OO162 003740 000001 120530 



0001 63 
OO0164 
O00 165 
000166 



O33760 

114561 
013447 
003760 



010004 
O 100 10 
010007 
010002 



1603 13 

140165 
150042 
170630 



MOV 

MOV #<1024 . * 1 6 . >,UBAR "/.CALL RAMZAP 

MOV #BAORH, \N, BAR 

MOV #<LW*IOACC> . \N , BUF 



; ; Do BI testing in LOOPBACK mode 
MOV #1, TSTCNT 7.CALL BCATST 

ROCMD 



ImrlOOII 



MOV\T #BICSR,RO 

BIT\T #<STS>,R1 

TST\F UER 

MOV\T #2,TSTCNT 



00O167 003760 010003 160751 



000170 033766 010221 



MOV\T 



#3, TSTCNT 



7.CZR0 

7.TZR0 

7.J2R0 ERRS1T 

7.CZR0 BIPE 

7.C2R0 BIITST 



;;Do BI testing in NORMAL mode 

MOV\T #<B.NRTY*B. LEO*B .NABO> ,R6 7.CZR0 



000171 
000172 



033466 
003760 



01 6006 
010004 



1 602S2 
170751 



00O173 003760 010005 171014 



0O01 74 
000175 



1 00260 
100260 



10000 

10000 



170252 
171026 



MOV\T 
MOV\T 



INC\T 
INC\T 



R6, , BREG 
#4, TSTCNT 



#5, TSTCNT 



TSTCNT 
TSTCNT 



%CZRO 
%CZRO 



7.C2R0 
7.C2R0 



TSTRTN 
BI ITST 



TSTRTN 

BIMEM 



*********************** 



;JUMP IF ERROR 

;STORE BREG VALUE IN R6, 

; NO ABORT CMD , ASSUME THAT 

; LOOPBACK MODE I NO RETRY 

JUMP IF BI STOPPED, ELSE 

ABORT BI COMMAND (RESET BIIC) 
LOAD BREG 

CLEAR 16K RAM BUFFER AFTER SFT50 
POINT TO HI WORD OF BI BASE AORS IN RAM 
STORE LONGWORO DATA LENGTH 8 10 ACCESS ENABLED 

IN HI WORD OF BI BASE ADDRESS 



LOAD TEST COUNT / 

DO BCAI REGISTER FILE TEST 
READ BI CONTROL REGISTER 
SELF-TEST SUCCESSFUL SET? 
ERROR IF STS NOT SET 
LOAD TEST COUNT / 

DO BI PARITY TEST 
LOAD TEST COUNT / 

DO BIIC BUFFER TEST 



ETIO ;STORE BREG VALUE IN R6, 

; LOAD BREG WITH NO RETRVS, 
; SELF-TEST OK 8 
; GET NODE ID 
LOAD BREG 
LOAD TEST COUNT / 

DO BIIC BUFFER TEST 
LOAD TEST COUNT / 

DO POLL TEST 
LOAO TEST COUNT 
LOAD TEST COUNT / 



ABORT CMD / 
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;;Write tne uCODE VERSION 8 DEVICE TYPE to the BIDTYP register 



OO0176 
000177 
000200 
000201 
OO0202 
000203 
OO0204 
000205 



013460 
O33740 
135542 
013740 
133542 
033741 
133541 
033740 



10000 

oooooo 

000377 
007275 
000023 
OOOOI 6 
000O01 
OOOOOO 



050215 
120313 
OOOOOO 
135621 
10000 
010000 
10000 
120302 



NOP\T 

MOV 

BIC 

MOV 

BIS 

MOV 

BIS 

MOV 



7.JN2R0 
#BI0TYP,RO %CALL 
#HIBYT, R2 

#BUFP49,BAR "'.CALL 
#<C00VER>*256 . , R2 
#<B. DTYP>*LOBYT, R1 
#<B . DTYP>SHIBYT,R1 



U .END 
RDCMD 



#BIOTYP , RO 



7.CALL WRCMO 



JUMP IF ERROR 

READ BI DEVICE TYPE REGISTER 

INIT UCODE VERSION BITS 

SAVE THE HARDWARE VERSION NUMBER [mjt06l 

LOAD HI BITS OF DEV REV FIELD (uCODE VERSIONI 

LOAD LO BITS 8 

HI BITS OF DEVICE TYPE FIELD 
WRITE BI DEVICE TYPE REGISTER 



000206 033740 0OOO04 130313 

000207 114541 000020 010000 
000210 033760 010004 070302 



000211 O33740 000054 130313 

000212 114542 0OOO40 O 1 0000 

000213 133741 010011 050215 



000214 033541 000140 130365 



;;Cl>ar BROKE bit in BICSR register 

%CALL RDCMD 
%CNZRO WRCMO 
End diagnostics if HOST WROTE to SA REG, else WRITE STEP 1 data to SA REG 

7.CALL RDCMD 



MOV *BICSR,RO 
BIT #BR0KE,R1 
MOV\T #BICSR,RO 



;REAO BI CONTROL REGISTER 

; IS BROKE BIT SET? 

IIP SO, GO RESET BROKE BIT 



MOV 
BIT 
MOV\F 



#BIWSTA, RO 
#<GPR1> ,R2 
#<STEP1+DI> , R1 %JNZRO U.END 



#<MP+SM> , Rl 



READ BI WRITE STATUS REGISTER 

WAS SA REG WRITTEN BY HOST? 

JUMP IF DATA RECEIVED FROM HOST, ELSE 

LOAD Rl WITH STEP 1 DATA - 

(DON'T SET 22 BIT AODR ON BI) 

ENHANCED DIAGNOSTICS, 

MAPPING-fSPECIAL MODE BITS 8 

SEND STEP DATA TO HOST SA REG IN LOOPBACK MODE 
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********* 
U END. . . 






*********** 



******** 



0002 IS 
0002 1 S 



013451 
013447 



000O1 1 
10007 



OOOOOO 

0400S5 



**x 



0002 17 033746 01O00S 04O045 



TST 
TST\F 



MOV\F 



DER 
UER 



%JNZRO 
7.JNZR0 



UHELP 
ERRB1 



DID THE D-PROC HAVE AN ERROR? 

IF SO, LET U-PROC HELP REPORT ERROR TO HOST 

DID THE U-PROC HAVE AN ERROR? 
IF SO, REPORT SOMETHING WENT WRONG WITH BD 1, ELSE 

INITIALIZE HOST RESPONSE WAIT COUNT. 



000220 
000221 
000222 

O00223 
O00224 
000225 

OO022S 
000227 
000230 
00023 1 



033740 000054 130313 

114542 000040 10000 

0344S3 010003 0S1147 

013440 OOOOOO 120243 

03 1446 000006 OOOOOO 

034443 010003 040220 

13440 OOOOOO OOOOOO 

004240 OOOOOO 120252 

013440 OOOOOO 120252 

013440 OOOOOO 1 000O2 



; ; End 


d i agnost ics 


MOV 
BIT 
CLR\T 


#BIWSTA,RO 
#<GPR1 > ,R2 
HANG 


NOP 

DEC 
CLR\F 


R6 
HANG 


NOP 
CLR 
NOP 
NOP 


TSTCNT 



HOST WROTE to SA REG, also RESTART DIAGNOSTICS again... 

SCALL ROCMD ; READ BI WRITE STATUS REGISTER 
WAS SA REG WRITTEN BY HOST? 
IF SO, RELEASE 0-PROC / 

JUMP TO STEP.1 TO START INITIALIZATION 
WAIT 10ms 

SHOULD WE LOOK AT SA REG AGAIN? 
JUMP IF VES, ELSE 

RELEASE D-PROC TO BE WITHIN 2 CYCLES 

OF THE U-PROC WHEN REDOING THE DIAGNOSTICS. 
RELEASE D-PROC / WASTE AN INSTRUCTION, 

AN SOME MORE INSTRUCTIONS 

SO D-PROC CAN RESTART IN SEOUENCE WITH U-PROC. 

GO REDO DIAGNOSTICS... 



%JN2R0 


STEP. 1 


7.CALL 


WAIT 


%JNZRO 


1$ 


"/.CALL 


TSTRTN 


•/.CALL 


TSTRTN 


%JMP 


U . RSTRT 
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********* 



RELEASE THE D-PROC FROM HANGING AND LET U-PROC HANG 
WHEN THE HANG REGISTER IS CLEARED 



RETURN WILL OCCUR 



O00232 


034443 


000003 


120252 


RELES : 


CLR 


HANG 


-.CALL 


TSTRTN 


000233 

00023a 
OOOZ35 


033743 
01 345 1 
013443 


OOOOOI 
01001 1 
000003 


OOOOOO 

1 37777 
1 10234 


1$: 


MOV 
TST 
TST 


#1 . HANG 

DER 

HANG 


%RZRO 
%JMP 


1$ 



-PROC ERROR REGISTER (R7| will Be tested on return. 

***********************************,««*»,*» ******** 



.RELEASE D-PROC AND 
; WASTE ONE INSTRUCTION 
;K£EP SOMETHING IN HANG 
; IF ZERO. TEST 0-PROC ER 
;SEE IF PROC SHOULO LEAV 

!****************«*** 



DISPLAY LEDS 

TO SHOW THAT THEV 00 FLASH AND THAT THE CODE IS WORKING 



ROR/RETURN 
LOOP? 



6 


4 


2 


1 


Off 


off 


off 


on 


off 


off 


on 


off 


off 


on 


off 


off 


on 


off 


off 


off 



CALLS WA I T 



CR HAS LEDS SET OFF & IN DIAGNOSTIC MODE 



**«*««** 



**«*»**« 



********* 



O00236 
000237 
000240 
000241 
000242 



133742 
013467 
035 144 
033144 

073442 



000020 OOOOOO 

030007 167777 

004002 120243 

004002 OOOOOO 

000002 1 10237 



OSLEDS : 


MOV 


#<LED1 > , R2 






;START WITH LEO/M 


1$: 


TST\T 


UER 


%RNEG 




.JUMP IF DONE, ELSE 




BIC 


R2, CRI ,UCRD 


%CALL 


WAIT 


.LED ON 




BIS 


R2, CRI ,UCRD 






.LED OFF 




SHF\L 


R2 


%JMP 


1$ 


•NEXT LEO 
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WAIT 

WAIT APPROXIMATELY 10ms, 

Input : 



BASED ON 346nS SEQUENCER CLOCK 



none 



Tlo***^ 



Out put : 











; RO is changed. 










; ; ************************************ 


0OO243 
000244 
00024S 


133740 
03144O 
013440 


0001 SI 
O1OO00 
000000 


000000 
000244 
127777 


WAIT: MOV #70400 , RO 
IS: DEC RO %JN2R0 
NOP %RET 



INITIALIZE LOOP TO 1 O . ms COUNT 

KEEP LOOPING TIL DONE 

RETURN 



Q 

< 

a 

ii 
i 

cc 
o 

LU 

CO 

o 
w 

-1 



********* 



******* 



WAITS 

WAIT APPROXIMATELY 177US, BASED ON 34SnS SEQUENCER CLOCK 

I nput : 

none 
Output : 

RO is changed. 



000246 


133740 


00OO02 


OIOOOO 


WA 


TS : 


MOV 


000247 


031440 


OIOOOO 


000247 


1$ 




DEC 


0002S0 


013440 


000000 


127777 






NOP 



#1000, RO 
RO 



%JN2R0 

%RET 



LEVOI OR LEV02 
CLRERR 

; ********** 
034447 000007 127777 CLRERR: CLR 



************************ 

CLEAR THE ERROR REG ( R7 ) 

****************************** 
UER %RET 



INITIALIZE LOOP TO 177. US COUNT 

KEEP LOOPING TIL DONE 

RETURN 

****************************** 



i****************** 
;CLEAR AND RETURN 



KDB 50. MICROCODE. .22-APR-I988 I 1 : 16:48.37 



)f~"\ 



KOBUP DIGITAL EOUIPMENT CORP., 2901 ASSEMBLER VERSION 32 

KDB U-PROC DIAGNOSTICS & INITIALIZATION CODE 

******************************** 
TSTRTN ROUTINE 
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********* 



************************** 



******** 



000252 013447 OOOO07 127777 TSTRTN: TST 



RETURN 
THIS RETURN IS USED BY OTHERS 
FOR THE SAME PURPOSE: SET RETURN STATUS 
TO SEE IF THE NEXT TEST IS EXECUTED 



*************** 



e*x****** 



********* 



********* 



GET NODE ID FOR NORMAL MODE TESTING 

I nput : 

(Entered at GETID) 
none 

(Entered at SHFIOI 

R1 contains NODE ID to be Shifted into the 81 BASE ADDRESS 
LOCATION in RAM. 
Output : 

RAM location BADRL will have the LO word of the BI BASE 

ADDRESS with the shifted NODE ID value. 
RAM location BADRH will have the HI word of the BI BASE. 
ADDRESS with the shifted NODE ID value, longword DATA 
LENGTH s ID ACCESS enabled. 

********************************************************** 



:*********** 



0002S3 
0002S4 
000255 
000256 
000257 

000260 
O0026I 
OO0262 

0OO263 

000264 



03374O 000004 

00424O OOOOOO 

034541 000017 

033740 000O15 

063441 OIOOOI 



003660 
035541 

031440 

01 3740 

1 03 G40 



030O01 
00OO01 
OOOOOO 

007265 
OO3 140 



130313 
OOOOOO 
OOOOOO 
OOOOOO 

1 50263 

140261 
OOOOOO 
1 10257 

135620 
100252 



GETID: 
SHFID : 



MOV 
CLR 
AND 
MOV 



#BICSR,RO 


#N0DEID, R1 
#13. ,R0 



ROTXLOF R1 



BIS\T 

BIC 

DEC 

MOV 
BIS 



#BIT0O,0 
#BIT00,R1 



•/.TMSB 
T.JMP 



• BADRL ,\N. BAR 54CALL S.STR1 
#<LW+IOACC> ,«,BUF °/.JMP TSTRTN 



READ BI CONTROL REGISTER 

INIT VALUE 

SAVE NODE ID 

# OF SHIFTS FDR ID 

JUMP IF DONE SHIFTING, ELSE 

SHIFT S R1 LEFT AGAIN 
IF MSB OF R1 SET, THEN SET LSB OF 
CLEAR BIT ROTATED FROM MSB TO LSB 
COUNT DOWN SHIFTED BITS / 

CONTINUE 'TIL DONE 
STORE LD WORD OF BIIC BASE AORS IN RAM 
STORE HI WORD OF BIIC BASE AORS IN RAM / 

TEST UER S RETURN. 



r 
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LOAD 81 
Input 



REGISTER ADDRESS (WITH NODE ID) 



RO contains offset 
RAM locat ion BADRL 
( i nc 1 udes NODE 



to the BI REGISTER to be accessed. 

contains the LO word of the BI BASE ADDRESS 

ID if NORMAL mode) . 



00026S 
O00266 

000267 
000270 
0O027 1 



013740 
033500 

033440 
013740 
013700 



007265 
000003 
005560 
007266 
0OS763 



000000 
01O000 
10000 

oooooo 

1 27777 



Out put : 



MOV 
BIS 
MOV 
MOV 
MOV 



X X X * *XX X : 
LOAD BI 
I nput : 
Output : 



RAM location BAORH contains the HI word of the BI BASE ADDRESS 
(includes NODE ID if NORMAL mode). 



********* 



#BADRL, \N, BAR 
(BUF ) , RO 
RO, , BCAID 
#BADRH, \N,BAR 
(BUF) , \N.BCAID 



POINT TO LO WORD OF BI BASE ADRS IN RAM 
GET LO WORD OF ADRS WITH NODE ID / 
LOAD LO WORD OF ADDRESS 

POINT TO HI WORD OF SI BASE ADRS IN RAM 
GET HI WORO OF ADRS WITH NODE ID, DATA 
LENGTH & 10 SPACE ACCESS CODE / 
LOAD HI WORD OF ADORESS / RETURN 



********* 



******** 



********* 



REGISTER ADDRESS (without NODE ID for error routine) 

RO contains offset to the BI register to be accessed. 
none 



000272 
00O273 

000274 



033440 

1 33740 
033440 



005560 
0001 40 
0OS76O 



01O000 
OOOOOO 

1 27777 



* * * * : 

LRGADR: 



*********** 



XXX******* 



MOV 

MOV 
MOV 



RO, , BCAID 
#<LW+IOACC> ,R0 
RO, , BCAID 



************************ ********** 

WASTE TIME ROUTINE 
xxx***xxxx************xxx**x***xx» 



000275 


013440 


OOOOOO 


OOOOOO 


WASTE : 


NOP 


000276 


Ol 3440 


OOOOOO 


OOOOOO 




NOP 


O00277 


013440 


OOOOOO 


OOOOOO 




NOP 


000300 


O13440 


OOOOOO 


OOOOOO 




NOP 


000301 


013440 


OOOOOO 


127777 




NOP 



LOAD LO WORO OF ADRS. 

GET DATA LENGTH 8 10 SPACE ACCESS CODE 

LOAD HI WORD OF ADRS / RETURN 

****************************** 



****************** 

; WASTE SOME TIME 

;WASTE SOME TIME 

;WASTE SOME TIME 

;WASTE SOME TIME 

;WASTE SOME TIME 
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SUBROUTINE WRCMO 



********** 



WRCMD 
Input : 



will issue a write command in BI LOOPBACK or NORMAL mode 

RO contains BI WRITE command literal. 

R1 contains data to be loaded into the LO word of a BI REGISTER. 
R2 contains data to be loaded into the HI word of a 81 REGISTER. 
Output : 

RAM location RGOATL will get data from R1. 
RAM location RGDATH will get data from R2 . 

BREG will nave LOOPBACK enabled if this routine was entered 
at locat ion WRLCMO . 

Errors in this routine display the following in the SA register; 
1OS340 - BI COMMAND TIMOUT error 



**************** 





000302 


013440 


OOOOOO 


130265 WRCMD: NOP 


%CALL 


BRGADR 






033740 


0000O4 


OOOOOO 


MOV 


#BIWRCM,RO 




Q 
< 

a 


000304 


033440 


00S540 


OOOOOO 


MOV 


RO, , BCAID PLCOM 




000305 


013740 


007271 


OOOOOO 


MOV 


#RGOATL , \N, BAR 






033441 


003OO1 


135621 


MOV 


R1..BUF %CALL 




000307 


01 3740 


007271 


OOOOOO 


MOV 


#RGDATL , \N, BAR 




0003 lO 


1 3700 


005523 


OOOOOO 


MOV 


(BUF) , BCAID (PWRFST 




M 

5 
cr 


0003 1 1 


013740 


1 17272 


O06237 


MOV 


#RGDATH, \N. BAR %JSTOP 


BI STP 


0003 12 


01 3700 


005743 


1 10323 


MOV 


(BUF), BCAID (PLBWR %JMP 


WTCMDO 


O 

u. 

V) 
O 
W 

















:**************x**x*X******x*** 

GO LOAD BIIC REGISTER ADDRESS 

GET WRITE COMMAND 

LOAD COMMAND 

POINT TO LO REG DATA LOC IN RAM 

STORE REGISTER DATA 

POINT TO LO REG DATA LOC IN RAM 

WRITE FIRST BUFFER 

JUMP IF BI STOPPEO / [mrlOOl] 

POINT TO HI REG OATA LOC IN RAM 
WRITE LAST BUFFER AND DO THE WRITE / 

GO WAIT FOR CMD COMPLETE 8 ERROR FREE / 

RETURN 
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0003 1 3 
0OO3 14 
000315 

00031 6 

0003 17 
0O032O 

00032 1 



013440 
033740 
033440 
013440 

013740 
013440 
O33701 



000000 
OO0O01 
1 1SS40 
OO0420 

007271 
OOOSOO 
00371S 



000322 O33702 003015 



************ 



**************************** 
SUBROUTINE ROCMD 

ROCMO will issue a BI READ COMMANO in SI LOOPBACK or NORMAL mode. 
Input : 
Output 



RO contains read command literal. 



o 



130265 
OOOOOO 
OOS237 
130323 

OOOOOO 
OOOOOO 
01OO0O 



R1 will have data of 1st buffer read. 
R2 will have data of NXT buffer read. 

Errors in this routine display the following in the SA register; 
106340 - BI COMMAND TIMOUT error 

******************************** 

GO LOAD SIIC REGISTER ADDRESS 
GET READ COMMAND 

JUMP IF BI STOPPED / LOAD COMMANO 
DO THE READ / 

GO WAIT FOR CMC COMPLETE 8 ERROR FREE 
POINT TO LO REG DATA LOC IN RAM 
READ 1ST BUFFER 
GET DATA FROM 1ST BCAI SUFFER / 

READ NEXT SUFFER. 
GET DATA FROM NEXT BCAI BUFFER / 

RETURN. 



******* 


************************* 


****** 


NOP 


•'.CALL 


BRGAOR 


MOV 


#BIRDCM, RO 




MOV 


RO..BCAI0 (PLCOM %JSTOP 


BI .STP 


NOP 


6>G0RD 7.CALL 


WTCMDD 


MOV 


#RGDATL , \N. BAR 




NOP 


(PROFST 




MOV 


(SCAIS) , R1 , BUF IFRDNXT 





(BCAIS) , R2.BUF 7.RET 
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************************************************** ********************** 

WAIT FOR COMMANO COMPLETE AND ERROR FREE 

This routine will wait approxi mat ely 10. seconds before flagging a SI 
COMMAND TIMEOUT error. 

Upon entering this routine, MERR is checked before issuing a BI READ 
or WRITE COMMAND. If MERR is set, the command is never started. If 
MERR is clear, waft for NCDONE (Command Not Done), which indicates the 
BI COMMAND has started. If this does not occur within a certain amount 
of time, then retry the command once. If NCDONE is not true after one 
retry, then a BI CMD TIMEOUT error is reported. When NCOONE is true, 
then wait for CDONB ( Command Done) to be asserted. If CDONE is not 
detected within 10. sec, a BI CMD TIMEOUT error is reported. If CDONE 
is detected, the routine checks MERR (Master Error) and exits. 



000323 
000324 

000325 

00032 6 

0OO327 

000330 

00033 1 
000332 



0OO334 
000335 



Input : 
Output : 



RO contains the 81 COMMAND literal (BIRDCM or BIWRCM), 
Rl & R2 will be destroyed. 



Errors in this routine display the following in the SA register; 
106340 - BI COMMAND TIMOUT error 



033741 140200 000037 WTCMDD: 
03 3 7 42 160002 100337 

03 144 1 1 60001 140337 1$: 

031442 010002 050325 

114544 010002 010331 

033742 010002 050042 



1 1 2540 000004 
033741 010200 



OOOOOO 

010334 



000333 13440 0006 40 1 10325 



112540 OOOOOI OOOOOO 
0137 60 016310 050334 



000336 1344O 000 4 20 



******************************** 


********* 


MOV 


#128. ,RI 


7.JMERR 


ERRB1M 


MOV 


#2,R2 


7.JNCD0NE 


4$ 


;Start 


BI START COMMAND 


t imeout 




DEC\F 


Rl 


7.JNCD0NE 


4$ 


OEC\F 


R2 


7.JN2R0 


1$ 


BIT 


OINDIAG , CRI 


°/.JNZRO 


2$ 


MOV\F 


#2,R2 


7.JNZR0 


ERRB1T 


CMP 


#BIWRCM, RO 






MOV 


#128 . , Rl 


%JNZR0 


3$ 


NOP 


ffGOWR 


%JMP 


IS 



***** 



c******** 



ERROR IF MASTER ERROR / 

SETUP TIMeOUT COUNT TO BE SHORT 
JUMP IF BI COMMAND STARTED / 

SETUP COMMAND RETRY COUNT 



JUMP IF BI COMMAND STARTED / 

DONE WITH CMD START WAIT LOOP VET? 
JUMP IF NOT, ELSE 

LAST COMMAND RETRV ? 
RETRY COMMAND IF NOT, ELSE 

ARE WE IN DIAG MODE? 
DIAG MOOE CMD START TIMEOUT ERROR, E 

SETUP COMMAND RETRY COUNT 
WAS IT A SI WRITE COMMAND ? 
JUMP IF NOT / 

SETUP TIMEOUT COUNT TO BE SHORT 
RETRY BI WRITE CMD 



[mr 1002] 
[mr 1002] 



[mr 1002] 



CMP 
M0V\T 



#BIRDCM,RO 

#<8 . NRTY + B . LOOP + B . BAD> ,BREG 7.JNZR0 3$ 



0>G0RO 7.JMP 



WAS IT A BI READ COMMAND ? 
HANG IF NOT (COMMAND?) 

LOAD BREG WITH ABORT CMD 
RETRY BI READ CMD 



8 



;Start BI COMMAND COMPLETE 10 second timeout 



000337 133742 160002 000346 4$: MOV #1000, R2 
KOBUP KDB50. MICROCODE ., 22-APR- 1983 11:16:48.97 



%JCDONE 6$ 



;JUMP IF CMD DONE / 



[mrl002] 
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000340 031441 160001 050346 5S: 

000341 031442 O100O2 0S0340 



'"?, 0003 6 2 133741 010161 010340 



§■ 300343 
^r 000344 



000345 
0OO346 

000347 



1 1 4544 
013440 
013440 
013440 
13440 



000002 
O 1 OOOO 

oooooo 

1 40000 
OOOOOO 



1 OOOO 
1 10337 
1 10042 
010037 
127777 



OEC\F 


Rl 


DEC\F 


R2 


MOV 


#70400, R 1 


S I T 


• INO I AG . CRI 


NOP 




NOP 




NOP 




NOP 





•'.JCOONE 


6S 


7.JNZR0 


5S 


X J N 2 R 


5S 


%J2R0 


4$ 


%JMP 


ERRS IT 


%JMERR 


ERRB 1M 


%RET 
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SETUP CMO CMPL OUTER TIMEOUT COUNT 
JUMP IF CMO DONE / 

DONE WITH CMO CMPL INNER WAIT LOOP 
JUMP IF NOT. ELSE DEC OUTER COUNT / 

DONE WITH CMD CMPL OUTER WAIT LOOP 
JUMP IF NOT / 

SETUP INNER LOOP AGAIN (10ms) 
ARE WE IN OIAG MOOE-> 
KEEP WAITING IF NOT DIAG MOOE 
ERROR IF CMO TIME OUT 
ERROR IF MASTER ERROR 
RETURN 



Inr 1002 ] 
VET? 

Imr 1004 ] 

veT? 



[ flip I0O2 ] 
tmr 10021 



Q 

< 

D 

a 

II 

5 
cc 

o 

u. 

vt 
o 
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PACE 097 



********* 



******** 



********** 



RESET BIIC BUS ERROR REGISTER 

I nput : 



000350 137742 

000351 033741 

000352 033740 



000200 
000007 
OOOO 1 O 



10000 
1 OOOO 
100302 



RS.BER: MOV 
MOV 
MOV 



*********** 

#77777, R2 

#7,R1 

#8 IBER, RO 



GET HI 3, 

LO WORDS FOR BUS ERROR REG ERROR MASK 
WRITE BI 8US ERROR REGISTER 

RETURN FROM WRITE COMMANO ROUTINE. 



O 
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*********** 



i******** 



i** ****** 



PAGE 093 



************************* 



CHECK BI PARITY 



000353 
0003S4 
000355 
00035S 
000357 
000360 

000361 
00O362 

000363 



034442 
013740 
033701 
033141 
013740 
036501 

1 30462 
053441 
1 35541 



000002 
007265 
000003 
000000 
007266 
000003 

040002 
000001 
01O20O 



000000 
000000 
010000 
000000 
000000 
000000 

O40362 
010000 
O10361 



I nput : 
Out put : 



CLR 
MOV 
MOV 
BIS 
MOV 
XOR 

INC\T 
ROT\R 
BIC 



RO contains offset of BIIC register to access. 
Test result of R2 . 



%i^r 



**************** 



**************** 



:********** 



R2 

#BADRL , \N,BAR 

(BUF) , R1 

R0.R1 

#BAORH. \N, BAR 

(SUP) ,R1 

R2 

R1 

#BIT1S,R! 



130442 00OO02 127777 



%TLSB 

%JNZRO 

%RET 



ADDR 
NODE 



ADDR 
NODE 



ID 



RAM 



RAM 
/ 



INIT BIT SET COUNTER 
POINT TO LO ORDER BASE 
GET LO AOORESS WORD W/ 
GET OFFSET OF REGISTER 
POINT TO HI OROER BASE 
GET HI ADDRESS WORD W/ 

IS LSB BIT SET IN LO WORD? 
INCREMENT BIT SET COUNT 
DONE ALL BITS IN WORD yET? 
CHECK NEXT BIT POSITION IF NOT DON 

IS LSB BIT SET IN LO WORD? 
INC R2 TO ACCOUNT FOR BI RD OR WRT 

ARE ODD NUMBER OF BITS SET? / 

RETURN 



LSB SET 



******* 



******* 



****** 



WRITE SA REG IN LOOPBACK MODE or WRITE SA REG IN CURRENT MODE 

This routine takes the data from R1 and writes it to the LO WORD of the 

SA REGISTER (BIGPR1). R2 will be ZEROED and written to the HI WORD of 

the SA REGISTER. BI BUS xfers will be executed in LOOPBACK mode to 
avoid setting the GPR1 status bit in the BIWSTA register. 



000365 

0O0366 

000367 
000370 
000371 
000372 



013740 
013740 

O33740 

03344O 
034442 
033740 



006321 
00631 1 

000364 
005560 
005762 
000004 



100367 
000000 

000000 
010000 
O100OO 

100304 



WRTSA : 
WRTERR: 



I nput : 
Output : 



MOV 
MOV 

MOV 
MOV 
CLR 
MOV 



R1 contains DATA for the LO WORD of the SA REGISTER. 



BI BUS will be in LOOPBACK mode. 
R2 will have ZEROS . 



************** 



******** 



#<B . NRTY+B . LOOPtB . LEDtB .NA80> , BREG 7.JMP .+2 ;LOAD BREG TO WRITE TO SA REG 
#<B . NRTY + B . LOOP+B . BAD + S . NABD) , BREG ;LOAO BREG TO WRITE ERROR TO 

SA REGISTER 



#SAREG, RO 

RO, , BCAID IPLADD 

R2, , BCAID IPHADD 

#BIWRCM,RO %JMP 



OFFSET TO SA REGISTER (BI GPR 1) 
LOAD LO WORD OF ADRS . 
INIT HI WORO OF GPR 1 
GO DO WRITE COMMAND 
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**************** 



TEST DESCRIPTION: 

The 2901 routine tests the internal 2901 registers, ALU functions, 
SHIFT/ROTATE functions and ALL ALU associated flags (2ER0, CARRV, 
NEGATIVE, LSB, OVERFLOW) . 



I nput : 



; RO s FFFF NEG/LSB SET 



All registers are used in verifying register integrity 8 
some registers are used in the ALU functionality. 

If any ERROR is detected within the 2901 test, the processor will report 
immediately and Stop any further execution. 

NOTE: Errors in this routine display the following in the SA register; 
106040 - ALU test error 



****** 



********** 



000373 


136540 


040200 


1 40026 


ALUTST 


XOR\F 


#BIT1S. 


RO 


000374 


03S540 


03OOO1 


140026 




BIC\F 


#BITOO, 


RO 


000375 


004240 


04OOOO 


050026 




CLR\F 







000376 


033441 


OIOOOO 


050026 




MOV\F 


RO, Rl 




000377 


020140 


0170O1 


1 40026 




ADO\F 


R1 \0 , RO 


, BAR 


000400 


100240 


030000 


040026 




INC\F 







000401 


102240 


020OOO 


150026 




NEG\F 







000402 


00004 1 


04000 1 


1 40026 




ADD\F 


R1\0,0 




OOO403 


007240 


020000 


050026 




COMVF 







000404 


004260 


03OOOO 


050405 




CLR\T 







OOO405 


101640 


030002 


050O26 




SUBYF 


#2.0 




000406 


033240 


040000 


040026 




MOV\F 


0, RO 




000407 


I 1 6540 


010200 


150026 




XOR\F 


#BIT1S, 


RO\N 


0OO4 10 


033741 


1001 7 


050026 




MOV\F 


#15. , R 1 




0004 1 1 


043440 


01OO0O 


1 50413 


1$: 


SHf \ROF 


RO 




0004 12 


031441 


OOOOOI 


1004 1 1 




DEC 


Rl 




0004 1 3 


013440 


OOOOOO 


OOOOOO 


2$: 


TST 


RO 




0004 1 4 


013240 


04OOO0 


140026 




TST\F 







0004 15 


043440 


040000 


1 40026 




SHF\ROF 


RO 




0004 1 6 


013440 


OOOOOO 


OOOOOO 




TST 


RO 




0004 17 


1 14640 


0302O0 


040O26 




BIT\F 


#8IT15 





000420 


003740 


030017 


140026 




MOV\F 


•IS . ,0 





7.JNLSB 

%JNEG 

%JLSB 

7.JNZR0 

XJZRO 

7.JNNEG 

%JCRV 

%JNLSB 

%JNCRY 

%TNNEG 

%JNNEG 

I'.JLSB 
•'.JZRO 
•iJNZRO 
•/.JZRO 

7.JMP 



ERRB1A 
ERRB1A 
ERRB1A 
ERRB 1 A 
ERRB1 A 
ERRB1A 
ERRB1A 
ERRB1A 
ERRB1A 



ERRB1A 
ERRB1A 
ERRB1A 
ERRB1A 
2$ 



1$ 



%JNLSB ERRB1A 



7.JNLSB ERRB1A 



7.JNMSB 

%JMSB 



ERRBIA 
ERRB1A 



* 7FFF NEG CLEARED 
: 7FFE LSB CLEARED 
i ZERO SET 
= 7FFE ZERO CLEARED 



= 2 / RO = FFFC / NEG SET 
1 CARRY CLEARED 
FFFF LSB SET 
7FF0 CARRY SET 
S002 NEC SET 
DO NOT EXECUTE AN INSTRUCTION / 

SIGNAL CHANGE? 
> 8000 LSB CLEAREO 
RO = 8000 ZERO CLEAREO 
RO = BIT15 ZERO SET 
COUNTER Rl * IS. 

SHIFT RIGHT WITH 0, RO . . . I F ZERO FLAG 
SET HERE... GO CHECK RO AND FOR SWAP 
IF NOT OONE DECREMENT SHIFT COUNTER 
IS LSB SET IN RO? 
ERROR IF NOT 
IS LSB SET IN 0? 
ERROR IF NOT, ELSE 

SHIFT RO * RIGHT ONCE MORE 
SET HERE... GO CHECK RO AND FOR SWAP 
IS MSB SET IN RO? 
ERROR IF NOT 

IS MSB SET IN 0? 
ERROR IF VES 



i t; 
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J" 



******** 



********* 



If NOT 0, then hang otherwise load with 1S., for checking rest of 
registers. Loop to check all registers by walking a bit from carry to 
carry with a register and writing and comparing it with the rest of 
the registers. Any stuck bits will propagate and be detected. 

RO should be 100000 now 

This loop should Start with RO equal to 1 00000 



NOTE: Errors in this routine display the follow 
106040 - ALU test error 



in the SA 



******** 



******** 



00042 1 
O00422 
000423 
000424 
000425 
000426 
000427 
000430 
00043 1 
000432 
000433 
000434 
OO0435 
000436 
000437 
000440 
00044 1 

000442 

000443 

000444 



073440 

03344 1 
033442 
033443 
033444 
03344S 
033446 
0334S7 
0334SO 

03345 1 
033452 
033453 
033454 
033455 
033456 
033447 
036 147 

OOI 240 

OS3440 

1 33744 



oooooo 
oooooo 

000001 
000OO2 
000OO3 
000OO4 
000005 
000005 
000017 
0000 10 
0000 1 1 
000012 
00OO13 
000014 
000015 
OOOOI 6 
OOOOOO 



OOOOOO 

oooooo 

010000 

oooooo 

oooooo 
oooooo 

01OOO0 

otoooo 
oooooo 
oooooo 

O1OO00 

oooooo 

oooooo 
oooooo 

10000 

O 1 oooo 
oooooo 



010000 050026 
OIOOOO 040421 
030362 100026 



ROT\L 


RO 


MOV 


RO. Rl 


MOV 


R1 ,R2 


MOV 


R2.R3 


MOV 


R3.R4 


MOV 


R4.R5 


MOV 


RS.R6 


MOV 


RS.R17 


MOV 


KIT. RIO 


MOV 


RIO , R1 1 


MOV 


R1 1 . RI2 


MOV 


R12, RI3 


MOV 


Rl 3. R14 


MOV 


R 14 , Rl 5 


MOV 


R15 , Rl 6 


MOV 


Rl 6 , R7 


XOR 


RO, R7 



OEC\F 7.JNZR0 ERRB1A 

ROT\RF RO XJNZRO SFT20 

MOV #<LEDS+INDIAG> ,CRI %JNEG ERRB1A 



ROTATE RO 


Rl iRO 


R2 = R1 


R3 = R2 


R4:R3 


R5 = R4 


R6:R5 


R17sR6 


RtOsRIT 


Rt 1 iRIO ' 


R12=R1 1 


RI3=R12 


RI4:RI3 


R1S"R1 » 


Rl 6 = R15 


RI7SRI6. . 


HERE COMP 


SUPPOSEDL 


ERROR IF 


DECREMEN 


LOOP IF 


CHECK TO 


ERROR IF 


ALL LEDS 



E RO LEFT WITH BIT I5->BIT O 



. LINKS ALL REGISTERS 

ARE RO (IMAGE) WITH LAST REGISTER 

Y CONTAINING THE SAME INFO AS RO 

NOT EQUAL, ELSE 

T SHIFT COUNTER. 

NOT ZERO, ELSE 

SEE NEG ISN'T SET. 
STILL NEG AFTER RIGHT ROTATE / 

OFF a SET DIAG MODE. 
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******************************************************************* 

FORCE THE PAR (pipeline address register) INTO THE VECTOR TABLE 

R7 (UER) IS PRE-LOADED WITH THE RAM PARITY ERROR SHIFTED VALUE. 

RETURN IT SHOULD EQUAL THE RAM PARITY ERROR. 

PAR WILL HOLD THE ADDRESS IN THE VECTOR TABLE WHERE THE PROC WILL 

GO TO. 

CRI IS TESTED IN THE VECTOR. OPM BIT HAS TO BE CLEAREO. 

Errors in this routine display the following in the SA register; 
106040 - ALU test error 

******************************************************************* 



O00445 
000446 



000374 
000447 



000450 
000450 



0004S1 
00045 2 



O000O3 
O00453 



00O454 
000454 



173747 
036547 



1 73747 
036547 



000040 
000004 



0OOO40 
000004 



120447 
1 00450 



013740 002374 



O13440 OIOOOO 010027 



120453 
1 10454 



O13740 002003 



O13440 OIOOOO OIOQ27 



HI .OFF 
1$: 



MOV\L 
XOR 



#ER. SAP.R7 
#ER.RAP,R7 



= HIPAR - 7400 

MOV #HI . OFF ,\N,PAR 



ASSUME HI .OFF, EQ, 374 
NOP 



MOV\L 
XOR 



#ER . SAP , R7 
#ER . RAP , R7 



= LOPAR - 7400 

MOV #L0 . OFF, \N, PAR 



ASSUME LO.OFF.E0.3 
NOP 



%CALL 

"/..IMP 



7.UNZR0 ERRB1E 



"'.CALL 
%JMP 



3$ 

4$ 



%JNZRO ERRB1E 



;LOAO R7 VALUE / SET RETURN IN STACK 
;TEST RESULTS OF R7 OURING PAR VECTOR. 



.LOAD PAR OFFSET TO VECTOR TO HI AOORESS / 
; ERROR IF PAR NOT FORCED TO HI VECTOR ADR 



ERROR IF INCORRECT RESULTS OURING 

VECTOR ROUTINES 
LOAO R7 VALUE / SET RETURN IN STACK 
TEST RESULTS OF R7 OURING PAR VECTOR. 



;LOA0 PAR OFFSET TO VECTOR TO LO ADDRESS / 
; ERROR IF PAR NOT FORCED TO LO VECTOR ADR. 



.ERROR IF INCORRECT RESULTS OURING 
, VECTOR ROUTINES 



100240 OOOOOO 



a*************************************** 
INCREMENT TEST (TSTCNT. Ql ANO RETURN 

I:*************************************** 
INC TSTCNT T.JMP TSTRTN 



****************************** 
; INCREMENT TSTCNT(0] 41 RETURN 
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CONTROL REGISTER OATA INTEGRITY TEST 

Loop data around th« u-PROC Control Register . 

Don't test the DFAIL bit, it has already been tested and testing the 
DFAIL bit would be FATAL at this time. Setting the DFAIL bit would 
cause the 0-PROC to start LOOPING thru it's CROM. 



REGISTERS USED : 

R1 is a temporary register. 

This routine starts at bit position BITO&, 
Skips over bit position BIT10 (DFAIL) 
and ends at bit position BIT15 ( LED8 j . 

The 1o byte of this register is WRITE ONLY, so the routine will 
always ignore the 1o byte of the control register. 

Errors in this routine display the following in the SA register; 
106041 - Control register test error 



o 



*************** 



0004SS 


133741 


OOOOOI 


OOOOOO 


UCRTST: 


MOV 


#BITOS. R1 


0O0457 


03344 1 


004001 


OOOOOO 


1$: 


MOV 


R1 , ,UCRD 


000460 


033702 


00001 4 


01OOOO 




MOV 


(UCRS) ,R2 


00O461 


035542 


000377 


100OO 




SIC 


#377, R2 


00O462 


016141 


000002 


OOOOOO 




XOR 


R2, R1\N 


000463 


073441 


010001 


040027 




ROT\LF 


R1 


0OO464 


1 16541 


030004 


15045S 




XOR\F 


#OFAIL , R1\N 


000465 


073461 


010001 


150466 




ROT\LT 


R1 


000466 


01 3440 


OOOOOO 


1 10457 




NOP 





•'.JN7RQ 
7.JMSB 



XTZRO 
7.JMP 



ERRB1E 
INCRTN 



[******************************* 

;LOAD R1 WITH STARTING POINT 

;LOAO CONTROL REGISTER 

;GET OATA PROM CONTROL REG 

; IGNORE LO BYTE 

;HAS OATA BEEN DESTROYED'' 

;ERROR IF SO, ELSE SHIFT OATA 

;EXIT IF LAST BIT TESTEO. ELSE 

; IS THIS THE DFAIL BIT? 

^ROTATE LEFT IF VES , ELSE 

, CONTINUE. 

;00 NEXT BIT POSITION 
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******************* 



**************** 



TEST ROM PARITY ERROR 

I nput : 

STACK set for return. 

NOTE: Errors in this routine display the following in the SA register; 
106072 - ROM parity test error 



000467 
000470 



013440 
01 3440 



OOOOOO 
OOOOOO 



120014 
1 10027 



NOP 
NOP 



************************** 
LEV01 



XCALL 
%JMP 



TSCRPE 
ERRB1E 



************ 



A CONTROL ROM PARITY ERROR/SET U-PROC 
ERROR IF IT DOESN'T VECTOR, 
SHOULD VECTOR BEFORE JUMPING TO ERROR ROUTINE. 

****************************** 



U-PROC RAM PE, CONTROL ROM PE TEST 

VECTOR UP IN CROM MEMORY WHEN EACH ERROR OCCURS. 
SERVICE THE ERROR THEN CHECK TO MAKE SURE THE 
PROPER ERROR CODE WAS RECORDED. 

REGISTERS USED: 

R7 (UER) HOLDS THE VECTOR ERROR COOE 

CROM PE 

CALLS 



TSCRPE 
TSTRTN 



> A KNOWN BAD PARITY LOCATION. 
ONE INSTRUCTION (RET) FOR TIMING AND SETTING THE STACK 



Errors 
106072 



i this routine display the following in the SA register 
ROM parity test error 



00047 1 
000472 
000473 



013440 
036547 
133744 



OOOOOO 
000005 
014362 



120467 
OIOOOO 
000027 



********* 

UROMPE: NOP 
XOR 
MOV 



****** *s 



****** 
■iCALL 



t********* 
TSBRPE 



<****** 



******* 



******* 



000474 013440 OOOOOO 100455 



;A CONTROL ROM PARITY ERROR 
#ER.R0P,R7 ;TEST RESULTS OF R7 DURING ROM PARITY VECTOR. 

#<LE0S+INOIAG> , CRI ,UCRD %JN2R0 ERRB 1 E ; ERROR IF INCORRECT RESULTS DURING 

; VECTOR ROUTINES / ALL LEOS OFF+OIAG MODE. 
%JMP INCRTN ;JUMP TO INCREMENT TEST NUMBER 8 RETURN. 



****************************** 
END OF ALL BOARD 1 TESTING 



********** 



******* 






******** 
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********** 



******** 



USES RO, R7 (UER), BAR S BUF LOCATION 
0-PROC MUST ENABLE PARITY ERROR 



RO IS A TEMPORARV REG 



VECTORS INTO HIGH CROM MEMORY WHEN BAR « O. THIS CONDITION IS SET 
BY THE D-PROC WHEN IT RAN ITS RAM PARITY TEST 



Errors in this routine display the following 
107103 - RAM parity error 



n the SA register; 











; ;***** 


****** 


***************** 


********** 


****** 


000475 


014440 


0O7O00 


120476 


URAMPE: 


CLR 


, \N, BAR 


•/.CALL 


1$ 


000476 


036547 


OOOO04 


OOOOOO 


1$: 


XOR 


#ER.RAP, R7 






000477 


013440 


10O00 


000046 




NOP 




7.JNZR0 


ERRB2E 


000500 


035544 


004 100 


1 10455 




BIC 


#U8K,CRI , UCRO 


%JMP 


INCRTN 



************ 



******** 



SET STACK FOR RETURN / 

CLEAR BAD PARITY LOCATION THAT 

WAS SET BY D-PROC. 
TEST RESULTS OF R7 DURING RAM PARITY VECTOR 
ERROR IF INCORRECT RESULTS DURING 

VECTOR ROUTINES. 
MAKE SURE U6K BIT IS CLEAR IN CRI 

RESET LEDS & REENABLE SIGNALS / 

INCREMENT TSTCNT(O) « RETURN. 



000501 
OOOS02 
000503 
000504 



031445 
01 6545 
034442 
033442 



007005 
030O34 
010002 
003002 



O1000O 
127777 
175575 
1 10501 



******************************************************** 

ROUTINE TO SAVE LAST FAILURE AND ZAP CONTROLLER RAM 
******************************************************** 
: DEC UBAR..8AR 

XOR #FAILUR,UBAR\N %RNEG 

CLR\F R2 %CZRO S.LDR2 

MOV R2..BUF %JMP RAMZAP 



*********** 



LOAD RAM ADDRESS / 

DONE ZEROING RAM? 
RETURN IF DONE / 

IS UBAR (R5| = FAILUR? 
SAVE BUFFER DATA IN R2 , ELSE 

CLEAR R2. 
LOAD R2 INTO BUFFER / NEXT RAM LOCATION 



KDB50. MICROCODE. 22-APR-I9SS 



: 1 6 : 43 . 97 



c 



KDBUP 

KDB U 



DIGITAL EQUIPMENT CORP., 2901 ASSEMBLER VERSION 32 
PROC DIAGNOSTICS « INITIALIZATION CODE 



*************** 



*x*c**xxxx*»*x* 



EXX«XX*X***X 



RAM BUFF 
I nput : 
Output 



!R TEST (Duration 3.3 sec ) 



NONE 

Each location in RAM 



ill be ZERO 



REGISTERS USED: 

RO has OLD buffer value 

Rl has NEW buffer value 

R5(UBAR) has BAR value 

R6 is the increment value (1 or -1) 

R10 saves the starting value 

TEST DESCRIPTION: 

The Algor ittim; 

1. Fill the RAM with all leros. 

2. Starting with the lowest address, read a location, 
verifying the previous write, write a one in a single 
bit position (starting at the LSB), and read the same 
location, verifying the write. 



Repeat step 2 
is reached. 



until the highest address in the RAM 



4. Starting again at the lowest address, repeat steps 2 
and 3 for every bit of the data word. 

5. Starting again at the lowest address , repeat steps 2, 
3 , and 4 , but this time putting zeros back into each 
bit , 

6 . Now, starting with the highest address, repeat steps 
2, 3, 4, and 5, but stepping through the memory in 
reverse order, from highest address to lowest 
address . 

Errors in this routine display the folio wing in the SA register; 
107107 - RAM buffer error 



; X****X**XXXXX 



***xx***xxxx**«**s* 



KXXXXXXX* 
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OOO505 


033746 


000001 


1 30455 


RAMTST 


MOV 


#1 ,R6 


•/.CALL 


INCRTN 


000508 


133745 


0OO100 


120501 




MOV 


#< 1024 . * 1 6 . > 


UBAR %CALL 


RAM2AF 


000507 


034440 


000000 


OOOOOO 




CLR 


RO 






0005 10 


133750 


000100 


100526 




MOV 


#< 1024 . > 1 6 . > 


RIO %JMP 


4$ 


0005 1 1 


01 6542 


000034 


010000 


1$: 


XOR 


#FAILUR,R2\N 






0005 12 


033445 


017005 


150517 




MOV\F 


UBAR, , BAR 


XJZRO 


2$ 


0OO5 1 3 


01 6500 


030003 


1 10522 




XOR 


(BUF) , RO\N 


%JNEG 


3$ 


0005 14 


03344 1 


013001 


040046 




MOV\F 


R1 , , BUF 


7.JNZR0 


ERRB2E 


0005 1 S 


033445 


007005 


OOOOOO 




MOV 


UBAR, , BAR 






0005 IS 


016501 


000003 


10000 




XOR 


(BUF) ,R1\N 






0005 17 


030145 


010006 


040046 


2$: 


ADD\F 


R6.UBAR 


7.JN2RO 


ERRB2E 


000520 


033442 


000005 


OOOOOO 




MOV 


UBAR.R2 






000521 


135542 


O0030O 


1 1051 1 




BIC 


#BIT15(BIT14 


R2 7.JMP 


1$ 


000522 


033440 


000001 


OOOOOO 


3$: 


MOV 


R1 ,R0 






000523 


17654 1 


010200 


O10S27 




XOR\L 


itMOOOOO.RI 


7.JNZR0 


5$ 


000524 


132446 


000006 


10000 




NEG 


R6 






O0O525 


137750 


030300 


010455 




MOV 


#< 1024 . » 1 6. > 


1 , RIO 7.JNNEG INCR 


OOOS26 


033741 


000001 


OIOOOO 


4$: 


MOV 


#1 , R1 






000527 


033445 


007010 


10051 1 


5$: 


MOV 


RIO, UBAR , BAR 


%JMP 


1$ 



INITIALIZE R6 VALUE / 

INCREMENT TSTCNT(O) 8 RETURN. 
GO INITIALIZE RAM 

INITIALIZE OLD BUFFER VALUE 
INITIALIZE R10 VALUE (16K) 

DOES UBAR (RS) < FAILUR? 
JUMP IF IT OOES, ELSE 

IS UBAR (RS) NEGATIVE? 
EXIT LOOP IF DONE / 

IS OLD BUFFER VALUE OK? 
ERROR IF NOT, ELSE 

WRITE NEW VALUE TO BUFFER. 
RESET RAM ADDRESS 
IS NEW BUFFER VALUE OK? 
ERROR IF NOT, ELSE 

SET NEXT RAM ADDRESS. 
SAVE RAM ADORESS IN R2 
GET RID OF JUNK BITS 8 

DO NEXT COMPARE. 
THE NEW 8UFFER VALUE IS NOW THE OLO BUFFER VALUE 
COMPUTE NEXT NEW BUFFER VALUE 
CHANGE SENSE OF RS 

DONE WITH TEST (DID RS GO FROM -1 TO 1) ? 
;RETURN IF DONE / 

RIO HAS NEW ENDING ADDRESS (16k-1). 
INITIALIZE NEW BUFFER VALUE 
RESET STARTING VALUE 



o 



KDB50. MICROCODE., 22- APR-1988 11:16:48. 97 






KDBUP DIGITAL EQUIPMENT CORP., 2901 ASSEMBLER VERSION 32 

KOB U-PROC DIAGNOSTICS a INITIALIZATION COOE 



BCAI REGISTER PILE TEST 

The U-PROC will run this test 



BI 



***** * * * * * 



LOOPBACK mode. 



This test checks the BCAI register file buffers from 
the 2901 processor side (II side) of the internal BDA 
bus. A walking ONE'S and ZERO'S data pattern will be 
written and read across all the BCAI buffers used by 
the BDA. The BCAI buffers will be written with data , 
then read back to verify data integrity. 

In order to read the BCAI command/ address buffers, the 
U-PROC must set BITOO in the UCR. BITOO set allows 
the BCAI command/address buffers to be read back with 
the same IOC that was used to load the buffer. 

The BDA uses 2 octaword data wrap-around buffers and 3 
command/address buffers on the II side of the BCAI. 



I nput ; 
Out put : 



Errors 

10634 1 
106341 
106341 



R6 contains 
none 



va 1 ue for BREG . 



T this routine display the following in the SA register; 
CMO OONE error 
CMQ NOT OONE error 
BCAI BUFFER error 



0OO530 


013740 


007050 


135624 


BCATST. 


MOV 


00053 1 


01S546 


1 1 6001 


056237 


1$ : 


BIC\F 


000532 


03344S 


006006 


010000 




MOV 


OOOS33 


176547 


O0O20O 


OOOOOO 




XOR\L 


000534 


01 3S64 


01 4O01 


040S37 




BIS\T 


OOOS35 


015544 


004001 


12O3S0 




BIC 


000536 


013440 


OOOOOO 


t 10252 




NOP 


OO0537 


033740 


000025 


13 1077 


2S: 


MOV 



#TEMP3, \N,BAR %CALL S.STR6 
#B .NAB0,R6\N,BREG 7.JST0P BI.STP 

R6, , BREG 

#1 00000, R7 

#BITOO,CRI\N, UCRO %JNZRO 2$ 

♦ BITOO, CRI\N, UCRO 7.CALL RS . BER 

XJMP TSTRTN 

#21 . , RO 7.CALL WT .RAM 



STORE BREG IN TEMP3 

JUMP IF BI STOPPED, ELSE 

ABORT BI COMMAND (RESET BIIC) 
LOAD BREG 
R7 = DATA 
JUMP IF NEXT PATTERN, ELSE 

ENABLE BCAI TEST MODE 
DISABLE BCAI TEST MODE / 

GO RESET BI BUS ERROR REGISTER 
TEST UER 8 RETURN. 

;GET » OF ENTRIES IN RAM BUFFER / ■■' 
; GO WRITE BCAI DATA IN RAM BUFFER 



[fir 10O1 1 



c 
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;;Move the data patterns from the RAM buffer to the BCAI GPR 



jffers 



Q 

< 

a 

n 

5 
cc 
O 

u. 

o 

v> 



000540 
OOOS4 1 



OO0543 
000544 
0OO54S 

O00546 
000547 
00O55O 



OO0SS1 
000552 
000553 



033742 
013700 
033750 

013700 
031450 
1 30445 

031442 
013440 
013440 



013440 
015545 
033446 



000002 010OOO 

005523 000000 3$: 

000007 1 10545 

005723 010OO0 4$: 

0000 10 OOOOOO 

017005 010543 5$: 

000002 OOOOOO 

010000 110551 

000640 100541 



MOV 
MOV 
MOV 

MOV 
DEC 
INC 

DEC 
NOP 
NOP 



#2 . , R2 

(BUF) , BCAID CPWRFST 

#7. , RIO V.JMP 



(BUF 

R lO 

UBAR, , BAR 



BCAID (FWRNXT 

7.JNZR0 



7.JZR0 
%JMP 



6$ 
3$ 



OCTAWORD BUFFER COUNT 
WRITE FIRST WORD TO BUFFER 
NUMBER OF NEXT WRITES / 

INCREMENT TO NEXT RAM ADDRESS 
WRITE NEXT WORD 
DONE WRITING BCAI BUFFER? 
JUMP IF NOT DONE / 

INC TO NEXT RAM ADDRESS 
DONE BOTH BCAI BUFFERS YET? 
JUMP IF OONE / 
FLIP TO OTHER BCAI OCTAWORD BUFFER 

BV USING GOWR IOC 



1 100OO 
1660OI 
006OO6 



OOS237 
000043 
130275 



000554 015544 164001 110043 



000555 
000555 
O00557 
OO056O 
0005 6 1 
000562 

000563 
000564 
000565 
000566 
000567 

000570 
00057 1 
000572 
000573 
000574 



000575 
000576 
OOOS77 

000 soo 



137O0 
130445 
0137O0 
130445 
0337O2 
034542 

033445 
O 1 3 7 OO 
130445 
033702 

134542 

033445 
013700 
130445 
O13700 
013544 



033742 
0301 45 
033750 
01 3440 



005563 
007005 
005763 
007005 
OO00O3 
000017 

007005 
0055 4 3 
007005 
000003 
000376 

007005 
005443 
007005 
005763 
00400 1 



10000 
01000O 
OOOOOO 
010O00 
010000 
125621 

OOOOOO 
OOOOOO 
O1000O 
010000 

125621 

OOOOOO 

otoooo 

OIO000 
OOOOOO 

1 3 1 104 



000601 013700 



OO06O2 031450 



;;Move the data patterns from the RAM buffer to the BCAI CMD/ADR buffers 

JUMP IF SI STOPPED 

ERROR IF CMC DONE / ABORT BI COMMAND 

RELOAD BREG / 
WASTE SOME TIME FOR CMO OONE 
1 ;ERROR IF CMD IS NOT DONE / 

; DISABLE BCAI TEST MODE 
WRITE BCAI LO ADDR BUFFER 
INCREMENT TO NEXT RAM ADDRESS 
WRITE BCAI HI ADDR BUFFER 
INCREMENT TO NEXT RAM ADDRESS 
GET COMMAND BUFFER PATTERN FROM RAM 
SAVE BITS 3 - O / 

STORE DATA PATTERN 
RELOAD RAM ADDRESS 
WRITE BCAI COMMAND BUFFER 
INCREMENT TO NEXT RAM ADDRESS 
GET LO NEXT PAGE BUFFER PATTERN FROM RAM 
SAVE BITS IS - 9 

STORE DATA PATTERN 
RELOAD RAM ADDRESS 
WRITE BCAI NEXT PAGE BUFFER 
INCREMENT TO NEXT RAM ADDRESS 
WRITE BCAI HI ADDR IN NEXT PAGE BUFFER 
ENABLE BCAI TEST MODE / 

SETUP BUFFERS TO READ BCAI FILE 

;READ data from BCAI GPR buffers to a RAM buffer 

OCTAWORD BUFFER COUNT 

POINT TO RECIEVEO DATA BUFFER IN RAM 

NUMBER OF NEXT READS 

READ FIRST WORD FROM BUFFER 

FLIP TO OTHER BCAI OCTAWORD BUFFER 

BV USING ROFST IOC 
GET DATA FROM BUFFER / 

READ NEXT WORD . 
DONE READING BCAI BUFFER? 



NOP 






7.JST0P 81 .STP 


BIC 


#B . NABO, R6\N, BREG 


7.JCD0NE ERRB1B 


MOV 


RE, , BREG 




%CALL 


WASTE 


BIC 


#BIT0O,CRI\N, UCRD 


7.JNCD0NE ERRB1 


MOV 


(BUF) , BCAID 


(PLAOO 






INC 


UBAR, , BAR 








MOV 


(BUF) , BCAID 


S>HA0D 






INC 


UBAR, , BAR 








MOV 


(BUF) , R2 








AND 


#17, R2 


%CALL 


S .STR2 


MOV 


UBAR, , BAR 








MOV 


(BUF ) .BCAID 


(PLCOM 






INC 


UBAR, , BAR 








MOV 


(BUF) , R2 








AND 


#177000, R2 


%CAIL 


S .STR2 


MOV 


UBAR, , BAR 








MOV 


(BUF) .BCAID 


OPLNPAC 






INC 


UBAR, , BAR 








MOV 


(BUF) , BCAID 


PHADD 






BIS 


#BIT00, CRI\N 


, UCRD 


%CALL 


S . BUFR 



!mr 1001 1 



MOV 


#2 


,R2 




ADO 


RO 


UBAR, BAR 




MOV 


#7 


, RIO 




NOP 






(PRDFST 



000002 O100OO 

007000 OOOOOO 

000007 010000 7$: 

OOO50O OOOOOO 



0037 15 010000 8$: MOV (BCAIS) , \N , BUF (PRDNXT 
000010 OOOOOO DEC RIO 
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0O0603 13044S 017005 010601 INC 



00O604 0137OO 
OOOSOS 03 1442 
000806 1 30445 



003015 
OOOO02 
O 1 7005 



OOOOOO 
OOOOOO 
000S77 



MOV 
DEC 
INC 



ASSEMBLER VERSION 32 

UBAR, , BAR %JNZRO 8$ 

(BCAIS ) , \N , BUF 

R2 

UBAR, .BAR % J N Z R 7 $ 



JUMP IF NOT DONE 

INC TO NEXT RAM AODRESS 
GET DATA FROM BCAI BUFFER 
OONE BOTH BCAI BUFFERS YET'' 
JUMP IF NOT DONE / 

INC TO NEXT RAM ADDRESS 
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000607 
000610 



0006 1 1 
000612 



000613 

000614 



000615 
000616 



00061 7 
000620 



0O0621 
000622 



013440 
013700 



130445 
O1370O 



130445 
013700 



13044S 
013700 



I3044S 
013700 



000560 
003775 



007005 
003555 



007005 
0O3455 



007005 
003775 



007005 
003015 



OOOOOO 
10000 



010O0O 
10000 



010000 
OOOOOO 



10000 

OIOOOO 



OIOOOO 
131 104 
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CODE 

;;REAO data from BCAI CMD/ADR buffers to a RAM buffer 

READ BCAI LO ADO 
GET DATA FROM SC 

READ BCAI HI AD 
INCREMENT TO NEX 
GET OATA FROM BC 

READ BCAI COMMA 
INCREMENT TO NEX 
GET OATA FROM BC 

READ BCAI NEXT 
INCREMENT TO NEX 
GET OATA FROM BC 

READ BCAI HI AD 
INCREMENT TO NEX 
GET DATA FROM BC 

SETUP BUFFERS T 



NOP 

MOV 


(BCAIS) . \N 


BUF 


PLAOO 
IPHAOO 


INC 
MOV 


UBAR, , BAR 
(BCAIS ) , \N 


SUF 


OHCOM 


INC 

MOV 


UBAR. , BAR 
(BCAIS) , \N 


BUF 


(PLNPAG 


INC 
MOV 


UBAR, .BAR 
(BCAIS) , \N 


BUF 


IPHAOO 


INC 
MOV 


UBAR, , BAR 
(BCAIS) ,\N 


BUF 


■/.CALL 



R BUFFER 

AI BUFFER / 

OR BUFFER 

T RAM ADORESS 

AI BUFFER / 

NO BUFFER 

T RAM ADDRESS 

AI BUFFER / 

PAGE BUFFER 

T RAM ADORESS 

UFFBR / 
DR BUFFER 
T RAM ADORESS 
AI BUFFER / 
COMPARE OATA 



\*,,.»F 



;;Compare the EXPECTED 8 RECIEVED data of the BCAI buffers 



0337S0 000025 O 1 OOOO 
033702 010003 140627 



000623 010145 007000 OIOOOO 



000624 

000625 



036502 0O0003 OOOOOO 
130445 017005 010043 



000626 0314SO 0O0O1O 
OOOS27 013440 000700 



1 10622 

1 10531 



MOV 
MOVNF 


#21 . ,R10 
(BUF) , R2 


%J2R0 


10$ ; 


ADD 


RO,UBAR\N.BAR 






XOR 
INC 


(BUF) , R2 

UBAR, , BAR 


7.JN2R0 


ERRB1B ; 


DEC 


R10 


%JMP 


9$ ; 


NOP 


IPRONXT 


%JMP 


i$ ; 



NUMBER OP BUFFERS TO COMPARE 
JUMP IF DONE / 

SAVE EXPECTEO DATA 
ADD RING LENGTH TO BAR 8 

POINT TO RECIEVED OATA BUFFER IN RAM 
EXPECTED DATA SAME AS RECIEVED DATA? 
ERROR IF NOT THE SAME / 

INC TO NEXT RAM ADDRESS 
DECREMENT RING LENGTH. 

DO IT AGAIN / 
FLIP BACK TO ORIGINAL BCAI BUFFER 
BACK BY USING RONXT IOC 
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******** 



BI PARITY TEST 

The U-PROC will run this test in BI LOOPBACK mode. 
Force WRITE PARITY ERROR 2 (RAM to BCAI buffer write). 



test will verify that parity detection is 
from BOA RAM to the BCAI. Data being xfered 
to the BCAI has parity associated with it. 

from the BCAI (during the write to the BIIC) 
y I s checked for correctness. To force the 
ector, Data with bad parity is written from a 
(which does not have parity associated with 
the BCAI. The data is read from the BCAI 
(during the write to a BIIC GPR). This will 
e U-PROC and D-PROC to vector to high memory, 
will result in this test if the U-PROC 
o an incorrect address in ROM or if no vector 



The first 
correct 
from RAM 
When read 
the par it 
par i t y v 
2901 GPR 
it) to 
r eg i star 
cause th 
An error 
vectors t 
occurs . 

NOTE: The data will be passed from the BCAI to the 
BIIC, regardless of the parity error. This 
will be verified in the BIIC to BCAI parity 
test . 

Force BCI PARITY ERROR 1 (BCAI to RAM buffer write). 



The second 
correct 
from a 8CA 
the RAM in 
the BCAI. 
this test , 
PAGE AODRE 



IOC. 



The 



BCAI comma 
same IOC 

NEXT PAGE 
LNPAG IOC 
high r 
U-PROC vec 
vector occ 



test will ver 
rom the BCAI t 
I register to ; 
t er face and i s 

If not correc 

an all 1 ' s da 
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DIGITAL EQUIPMENT CORP., 2901 ASSEMBLER VERSION 32 
PROC DIAGNOSTICS S INITIALIZATION CODE 



Force READ PARITY ERROR 2 (BIIC READ DATA cycle). 

The third test will verify that parity detection is 
correct from the BIIC (read data) to the BCAI. The 
BCAI generates byte parity based on data coming from 
the BIIC and compares it to the parity line from the 
BIIC. If they do not agree, an error results. To 
cause the parity error, the U-PROC sets BITOI in the 
UCR to enable BI parity test. The data with bad 
parity is read from a BIIC GPR . This will cause the 
U-PROC and D-PROC to vector to high memory. An error 
will result in this test if the U-PROC vectors to an 
incorrect address in ROM or if no vector occurs. 

NOTE: The BIIC GPR data with parity was previously 
written during the RAM to BCAI PARITY TEST. 

Force PARITY ERRORS (BIIC COMMAND/ ADDRESS cycle). 

The fourth test is executed in MANUFACTURING ONLY. It 
will verify that pa rity detection occurs during a BIIC 
COMMAND/AOORESS cycle. An error will result if the 
CPE bit (Command Parity Error) is not set in the BI 
BER (Bus Error Reg) . 

Force PARITY ERRORS (BIIC WRITE DATA cycle). 

The fifth test is executed in MANUFACTURING ONLY. It 
will verify that parity detection occurs during a BIIC 
WRITE DATA cycle. An error will result if the SPE 
bit (Slave Parity Error) is not Set in the BI BER (Bus 
Error Reg) . 



BEG [mrl002) 



END [mr 1002] 



I nput : 
Output : 



R6 contains value for BREG. 
none 



Errors in this routine display the following in the SA register; 

106340 - BI COMMAND TIMOUT error 

106342 - BI PARITY error (LOOPBACK MODE) 



OO0630 
0OO631 



033740 000370 120353 BIPE: 
030540 040004 040632 



MOV 

ADD\F 



#8IGPR2, RO 
#4, RO 



000632 013440 OOOOOO 130265 



%CALL 
7.TLSB 



%CALL BRGADR 



GET OFFSET TO BIIC GPR 2 / 
GO CHECK PARITY 

CONTINUE IF ODD # OP BITS ARE SET, 
FOR THE BI COMMAND/ADDRESS CYCLE, ELSE 
INC TO NEXT GPR ADRS TO MAKE BITS ODD, 
ALLOW CORRECT C OMMAN D / AOD RESS TO BIIC 

GO LOAD BIIC REGISTER ADDRESS. 



;;Test WRITE PARITY ERROR 2 (U-PROC vectors to 7772, D-PROC vectors to 7762) 
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KDBUP DIGITAL EQUIPMENT CORP., 2901 ASSEMBLER VERSION 32 

KDB U-PROC DIAGNOSTICS 8 INITIALIZATION CODE 

000 633 033740 000OO4 OOOOOO 

000634 033440 005540 OOOOOO 

000635 033440 005520 OOOOOO 
000638 037140 005740 130640 



000637 036547 OO0003 100642 

000 640 031440 01000O O0O84O 1$: 

000641 013440 OOOOOO 100043 

000642 033446 016006 010043 2$: 



MOV 


#BIWRCM,RO 






MOV 


RO, , BCAI D 


(PLCOM 




MOV 


RO. , BCAIO 


(PWRFST 




XNOR 


RO , RO, BCAIO 


0LBWR 7.CALL 


IS 


XOR 


#ER.WP2,R7 


%JMP 


2$ 


DEC 


RO 


%JNZRO 


1$ 


NOP 




XJMP 


ERRBIB 


MOV 


RS, , BREG 


•'.JNZRO 


ERRB IB 



00 WRITE COMMAND 
LOAO COMMAND 
WRITE FIRST BUFFER 
INITIALIZE WAIT LOOP COUNT / 
WRITE LAST BUFFER AND DO THE WRITE 
SETUP VECTOR RETURN AODRESS 
TEST RESULTS OF R7 DURING BI PARITY 
WAIT FOR PARITY ERROR VECTOR 
ERROR IF NOT FORCEO TO VECTOR TABLE 
ERROR IF INCORRECT RESULTS DURING 
VECTOR ROUTINES / RELOAO BREG 
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KDB U-PROC DIAGNOSTICS (INITIALIZATION CODE 



;;Test BCI PARITY ERROR I (U-PROC vectors to 7773) 



000643 

000644 

000645 
000646 
000647 



013740 
037140 

01 3544 
013440 
013700 



007050 
005440 

004001 

O0044O 
0030 15 



10000 

oooooo 

000000 

oooooo 

130651 



3$: 



000650 036547 000003 100653 

000651 031440 OtOOOO 000651 

000652 013440 OOOOOO 100043 
00Q653 015544 014001 000043 4$: 



000S54 033740 O0037O 120353 
000655 030540 040004 050656 



000656 013544 0O4OO2 130265 

000657 033740 00000 1 OOOOOO 

000660 033440 005540 OOOOOO 

000661 037140 OOO420 120663 



MOV 
XNOR 

BIS 
NOP 
MOV 

XOR 
DEC 
NOP 
SIC 



#TEMP3, \N, BAR 
RO.RO. BCAID IPLNPAG 

#BITOO,CRI\N,UCRD 

IPLNPAG 
(BCAISI , \N. BUF %CALL 



#ER.8P1 , R7 
RO 



%JMP 


4$ 


%JNZRO 


3$ 


7.JMP 


ERRB1B 



#BIT0O,CRI\N, UCRD 7.JNZR0 ERRB1B 



POINT TO TEMP3 AOOR IN RAM AS TEMP BUFFER 
INITIALIZE WAIT LOOP COUNT / 

WRITE BCAI LO NEXT PAGE BUFFER 
ENABLE READ OF BCAI CMD ( ADDR REGISTERS 
READ BCAI LO NEXT PAGE BUFFER 
GET DATA 8CAI LO NEXT PAGE BUFFER / 

SETUP VECTOR RETURN ADDRESS 
TEST RESULTS OF R7 DURING BCI PARITY VECTOR 
WAIT FOR PARITY ERROR VECTOR 
ERROR IF NOT FORCED TO VECTOR TABLE 
ERROR IF INCORRECT RESULTS DURING 

VECTOR ROUTINES / 

DISABLE READ OF BCAI CMD ( ADDR REGISTERS 



;;TeSt READ PARITY ERROR 2 (U-PROC vectors to 7771, D-PROC vectors to 7761] 



MOV #BIGPR2,R0 
A00\F #4,RO 



'/.CALL 
%TLSB 



CHKPAR 



BIS #BIT01 ,CRI\N,UCRD 7SCALL BRGAOR 

MOV #BIRDCM,RO 

MOV RO, , BCAID IPLCOM 

XNOR RO.RO PGORD 7.CALL 5$ 



OOOS62 


036547 


000003 


100665 




OOOG63 


031440 


OIOOOO 


010663 


5$ 


000664 


013440 


OOOOOO 


100043 




000665 


015544 


01 4002 


000043 


6$ 


000666 


033446 


006006 


130350 





XOR 
DEC 
NOP 

BIC 



%JMP 6$ 
5SJNZR0 5$ 
%JMP ERRB1B 
#BIT01 ,CRI\N, UCRD 7.JNZR0 ERRB1B 



#ER.RP2,R7 
RO 



GET OFFSET 

GO CHECK 
CONTINUE I 
FOR THE B 
INC TO NE 
ALLOW COR 
ENABLE SI 

GO LOAD B 

GO DO READ 

LOAD COMMA 

INITIALIZE 

DO THE RE 

SETUP VEC 

TEST RESUL 

WA I T FOR P 

ERROR IF N 

ERROR IF 

VECTOR RO 

DISABLE B 

RELOAD BRE 

GO RESET 



TO BIIC GPR 2 / 
PARITY 

F OOD * OF BITS ARE SET, 
I COMMAND/AODRESS CYCLE, ELSE 
XT GPR ADRS TO MAKE BITS OOD, 
RECT COMMAND/ADDRESS TO BIIC 
PARITY TEST / 
IIC REGISTER ADDRESS. 

COMMAND 
NO 

WAIT LOOP COUNT / 
AO / 

TOR RETURN ADDRESS 
TS OF R7 DURING BI 
ARITY ERROR VECTOR 
OT FORCEO TO VECTOR TABLE 
NCORRECT RESULTS DURING 
UTINES / 
I PARITY TEST. 
G / 
BI BUS ERROR REGISTER 



PARITY VECTOR 
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KDB U-PROC DIAGNOSTICS ( INITIALIZATION CODE 



;** THIS IS A MANUFACTURING TEST ONLY «* 

;Forc« PARITY ERROR during BI COMMAND/ADDRESS Cycle 



000667 
000670 
000671 
0O0672 



013440 
013440 
013440 
033740 



050000 
OSOOOO 
O5OO00 
000370 



1 10671 
000252 
1 10252 
120353 



000673 030540 040004 140674 



000674 013544 004002 



000675 
000676 
000677 

0O070O 
000701 
O00702 

000703 

000704 
000705 
000706 

000707 
000710 
0007 1 1 

000712 
000713 
000714 
00071S 
0007 1 6 
0007 1 7 



033740 
033440 
013440 

037140 
03144O 

013440 
013440 

013440 
013740 
0337O1 

013740 
033702 

015544 

015546 
033446 
033740 
014542 
013440 
013440 



00OO01 
005540 
000420 

OOOOOO 
1 60000 
010000 

oooooo 

000500 
00727 1 
003715 

007272 
003015 
144002 

00600 1 
006006 
000010 
OO02OO 
10000 

oooooo 



oooooo 
oooooo 

120275 

OOOOOO 
O10704 
010701 

1 10042 

OOOOOO 
OOOOOO 
010000 

oooooo 
oooooo 

100043 

oooooo 

10000 

1 30313 
OOOOOO 

1 10043 
1 20350 



NOP 
NOP 
NOP 
MOV 



MOV 
MOV 
NOP 

XNOR 

DEC 
NOP 
NOP 

NOP 
MOV 
MOV 

MOV 
MOV 
BIC 

SIC 

MOV 
MOV 
BIT 
NOP 
NOP 



#BIGPR2, RO 
#4 , RO 



%JNTEST 7$ 

7.JTEST TSTRTN 

7.JNTEST TSTRTN 

•/.CALL CHKPAR 

7.TNLSB 



• BITOI , CRI\N , UCRD "/.CALL BRGADR 

#B I RDCM, RO 

RO, , BCAID (PLCOM 

G>GORD XCALL WASTE 



RO %JCDONE 9$ 

XJNZRO 6$ 
%JMP ERRB1T 

(PRDFST 
#RGDATI. , \N, BAR 
(BCAIS) , R1 , BUF PRONXT 

#RGOATH,\N,BAR 
(BCAIS) ,R2, BUF 
#BIT01 ,CRI\N,UCRD 



7.JNMERR ERRB1B 



#B.NABO. R6\N 


BREG 




R6, , BREG 






#BIBER, RO 


7.CALL 


RDCMD 


#<B .CPE> ,R2 








5SJZR0 


ERRB1B 




%CALL 


RS .BER 



CHECK EXT. TEST L FOR TOGGLE MODE 
RETURN IF EXT. TEST L DID NOT TOGGLE 
RETURN IF EXT.TEST~L DID NOT TOGGLE 
GET OFFSET TO BIIC~GPR 2 / 

GO CHECK PARITY 
CONTINUE IF EVEN # OF BITS ARE SET, 

FOR THE BI COMMAND/AODRESS CYCLE, ELSE 

INC TO NEXT GPR ADRS TO MAKE BITS EVEN. 

ALLOW BAD ADDRESS TO BIIC 
ENABLE BI PARITY TEST / 

GO LOAD BIIC REGISTER ADDRESS. 
00 READ COMMAND 
LOAD COMMAND 
DO THE READ / 

GO WASTE SOME TIME 
SETUP GROSS TIMEOUT LOOP (91fnS) 
WAIT UNTIL COMMAND IS DONE 
DECREMENT TIMEOUT LOOP 
ERROR IF COMMAND TIMEOUT 

READ 1ST BUFFER 

POINT TO LO REG DATA LOC IN RAM 

GET DATA FROM 1ST BCAI BUFFER / 

READ NEXT BUFFER. 
POINT TO HI REG DATA LOC IN RAM 
GET DATA FROM NEXT BCAI BUFFER 
;ERROR IF NO ERROR DETECTED / 
; DISABLE BI PARITY TEST. 
RESET MASTER ERROR 
LOAD BREG 

READ BI BUS ERROR REGISTER 
CHECK FOR COMMAND PARITY ERROR 
ERROR IF CPE NOT DETECTED 
GO RESET BI BUS ERROR REGISTER 
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KDB U-PROC DIAGNOSTICS a INITIALIZATION CODE 



;*« THIS IS A MANUFACTURING TEST ONLY «* 
;Force PARITY ERROR during BI WRITE DATA 



Imp 1002] 






OO0720 
00072 1 



000722 
000723 

000724 
00072S 
000726 
000727 
O0073O 
00073 1 
000732 
000733 
000734 
000735 
000736 
OO0737 
O0074O 



03374O O0037O 
030540 O400O4 



0I3S44 
034441 

133742 
033740 
033440 
013740 
033441 
013740 
01370O 
013740 
013700 
037140 
031440 
013440 
013440 



0O40O2 
000001 

000300 
0OO004 

005540 
007271 
00300 1 
007271 
005523 
007272 
005743 
000000 
1 60000 
010000 
000000 



120353 
040722 



OOOOOO 
130265 

O1O0OO 
OOOOOO 
OOOOOO 
OOOOOO 
135621 
OOOOOO 
OOOOOO 
OOOOOO 
130275 
OOOOOO 
O0O741 
O00736 
1 10042 



000741 015544 144002 100043 11$: 



000742 
000743 
O00744 
00074S 
000746 
000747 
O0075O 



MOV 
ADD\F 



BIS 
CLR 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

XNOR 

DEC 

NOP 

NOP 

BIC 



#BIGPR2,R0 %CALL CHKPAR 
#4,R0 %TLSB 



#BIT01 , CRI\N,UCRD 

R1 %CALL 



BRGADR 



#BIT15+BIT14, R2 

#BIWRCM, RO 

RO, .BCAID IPLCOM 

#RGDATL,\N,BAR 

R1 . . BUF %CALL S .STR2 

#RGDATL, \N.BAR 

(BUF), BCAID (PWRFST 

#RGDATH. \N,SAR 

(BUF), BCAID (PLBWR 7.CALL WASTE 

RO, RO 

RO 7.JC00NE 1 1$ 

%JNZRO lOS 
7.JMP ERRB1T 

#BIT01 ,CRI\N,UCRD %JNMERR ERRB18 



015546 
033446 
03374O 
014542 
013440 
01 3440 
013440 



006001 
006006 
000010 
000100 
010000 
OOOOOO 
OOOOOO 



OOOOOO 
010000 
130313 
OOOOOO 
1 10043 
120350 
1 10252 



BIC 


#B .NAB0,R6\N 


BREG 




MOV 


R6 , , BREG 






MOV 


#BIBER, RO 


%CALL 


RDCMD 


BIT 


#<8.SPE> ,R2 






NOP 




%J2R0 


ERRB1B 


NOP 




7.CALL 


RS . 3ER 


NOP 




%JMP 


TSTRTN 



GET OFFSET TO BIIC GPR 2 / 
GO CHECK PARITY 

CONTINUE IF ODD # OF SITS ARE SET, 
FOR THE BI COMMAND/ADDRESS CYCLE, ELSE 
INC TO NEXT GPR AORS TO MAKE BITS ODO, 
ALLOW CORRECT COMMANO/ADORESS TO BIIC 

ENABLE BI PARITY TEST 

GO LOAD BIIC REGISTER ADDRESS / 
INITIALIZE DATA PATTERNS 
TO ALLOW BAD PARITY DURING BI WRITE DATA. 

00 WRITE COMMAND 

LOAO COMMAND 

POINT TO LO REG DATA LOC IN RAM 

STORE REGISTER OATA 

POINT TO LO REG DATA LOC IN RAM 

WRITE FIRST BUFFER 

POINT TO HI REG DATA LOC IN RAM 

WRITE LAST BUFFER AND 00 THE WRITE / 

SETUP GROSS TIMEOUT LOOP (91ms) 

JUMP WHEN COMMAND DONE 

DECREMENT TIMEOUT LOOP 

ERROR IF COMMAND TIMEOUT 

;ERROR IF NO ERROR DETECTED / 

; DISABLE BI PARITY TEST. 

RESET MASTER ERROR 

RELOAD BREG 

READ BI BUS ERROR REGISTER 

CHECK FOR SLAVE PARITY ERROR 

ERROR IF SPE NOT DETECTED 

GO RESET BI BUS ERROR REGISTER 

TEST UER a RETURN. 
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KDB U-PROC DIAGNOSTICS I INITIALIZATION CODE 



************ 



********** 



BIIC BUFFER TEST 



Errors 
106343 
106344 



The U-PROC will run the BIIC Buffer test in Both BI 
LOOPBACK ana NORMAL modes. This test will write and 
read a walking ONE'S and ZERO'S data pattern across a 
BIIC GPR (General Purpose Register 2). The register 
will be written with data, then read back to verify 
data integrity. All BIIC register xfers are done in 
LONGWORO mode. 



R6 contains value for BREG. 



n this routine display the following in the SA register; 
■ BIIC BUFFER error (LOOPBACK MODE) 
BIIC BUFFER error (NORMAL MODE) 



******** 



********* 



************** 



OO0751 
OO0752 



000753 
000754 



013740 
176547 



013440 
015546 



007050 
1002OO 



O1OO0O 
1 16O0 1 



135624 
0702S2 



0007S6 

056237 



000755 033446 006006 



000756 033740 000O02 131104 



000757 
0O076O 
000761 
000762 
000763 



000764 
000765 
00O766 
000767 
0OO770 
000771 
000772 



033442 
033442 
176542 
130445 
031450 



01 3440 
033740 
033740 
033440 
033445 
013700 
130445 



000007 
013002 
000200 
007005 
000010 



OOOOOO 
000370 

O00OO4 
005540 
0070O5 
OOS523 
1 1 7005 



10000 
140764 
OOOOOO 
10000 
100760 



131 104 
130265 
OOOOOO 
OOOOOO 
OOOOOO 
OOOOOO 
016237 



BI ITST : 
1$: 



2$: 
3$: 



MOV 
XOR\LF 



NOP 

BIC\F 



MOV 

MOV 

MOV\F 

XOR\L 

INC 

DEC 



#TEMP3, \N, BAR 
#1 00000, R7 



7.CALL S.STR6 
XCFTEST TSTRTN 



7.JNZR0 2$ 
#B . NABO, R6\N. BREG %JSTOP BI.STP 



R6 , , BREG 

#2 . , RO 

R7.R2 
R2, ,BUF 
#100000, R2 
UBAR, .BAR 
RIO 



XJMP 
7.CALL 



TSTRTN 
S . BUFR 



;STORE BREG IN TEMP3 

;TEST UER IF FAST SELF-TEST ENABLED. 

; LOAO STARTING OATA 

;JUMP IF NOT DONE YET 

JUMP IF BI STOPPED, ELSE 
i ABORT BI CMD 
;LOAD BREG / TEST UER S RETURN 

GET # OF PATTERNS TO GENERATE / 

SETUP BUFFERS 
MOVE R7 DATA TO R2 

MOVE DATA TO RAM BUFFER IF NOT DONE 
CHANGE VALUE IN NEXT ADDRESS 
INCREMENT TO NEXT RAM ADDRESS 
ALL DONE? LOOP 



(mr 1001 ! 
[mr 1001 I 



7.JMP 3$ 
the data patterns from the RAM buffer to the BCAI buffer 



000773 013700 005743 120323 



NOP 
MOV 
MOV 
MOV 
MOV 
MOV 
INC 

MOV 



S . BUFR 
BRGADR 



%CALL 
#BIGPR2,R0 HCALL 
#BIWRCM, RO 

RO, , BCAID IPLCOM 
UBAR, , BAR 

(BUF) .BCAID IPWRFST 
UBAR,, BAR 7.JST0P BI.STP 

(BUF), BCAID 9HBWR XCALL WTCMDD 



SETUP BUFFERS 

GO LOAD BIIC REGISTER AOORESS 

GET WRITE COMMAND 

LOAD COMMAND 

POINT TO EXPECTED DATA BUFFER IN RAM 

WRITE FIRST BUFFER 

JUMP IF BI STOPPED / 

INC TO NEXT RAM ADDRESS 
WRITE LAST BUFFER AND 00 THE WRITE / 

GO WAIT FOR CMD COMPLETE a ERROR FREE 



[mr 1001 ] 
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CODE 

;;READ data from BCAI GPR buffers to a RAM buffer 



000774 
00077S 
000776 
000777 
OO10O0 
0O1001 

OO10O2 

00 1 003 

00 1004 
001005 



001006 
001007 



O13440 
030S45 
033740 
033740 
033440 
13440 

033445 



130445 
013700 



033740 
033702 



000000 
000002 
000370 
000001 
1 1SS40 
0OO420 

OO7505 

0O37 15 

OO7O0S 
0030 1S 



000002 
010003 



131 104 

010060 

130265 
000000 
006237 
130323 

OOOOOO 

10000 

010000 
OOOOOO 



131 104 

1 10752 



NOP 


"/.CALL 


S.BUPR 


ADD 


#2 . , UBAR 




MOV 


#6IGPR2,R0 %CALL 


BRGADR 


MOV 


#BIR0CM,RO 




MOV 


RO..BCAID PLCOM I'.JSTOP 


BI .STP 


NOP 


(FGORD %CALL 


WTCMDD 


MOV 


UBAR. . BAR (PRDFST 




MOV 


(BCAIS) , \N. BUF (PRDNXT 




INC 


UBAR, , BAR 




MOV 


(BCAIS) , \N. BUF 





;;Conpara the EXPECTED « RECIEVED data 



MOV 
MOV 



001010 010145 007000 OIOOOO 



O010I 1 
001012 



036502 
130445 



OOO0O3 
017005 



OOOOOO 
010O43 



XOR 

INC 



001013 031450 000010 111007 



#2. , RO 
(BUF) ,R2 


•/.CALL 
•iJZRO 


S . BUFR 
1$ 


RO,UBAR\N,BAR 






(BUP) . R2 
UBAR, , BAR 


7.JNZR0 


ERRB1B 


RIO 


7.JMP 


5$ 



SETUP BUFFERS 

POINT TO RECIEVEO DATA BUFFER 

GO LOAD BIIC REGISTER ADDRESS 

GET READ COMMANO 

JUMP IF BI STOPPED / LOAD COMMAND 

DO THE REAO / 

GO WAIT FOR CMD COMPLETE S ERROR FREE 
READ FIRST BCAI BUFFER / 

POINT TO RECIEVEO DATA BUFFER IN RAM 
GET DATA FROM BCAI BUFFER / 

REAO NEXT BUFFER. 
INC TO NEXT RAM ADDRESS 
GET DATA FROM BCAI BUFFER 



of the GPR buffers 



SETUP BUFFERS TO COMPARE DATA 
JUMP IF DONE / 

SAVE EXPECTED DATA 
ADD RING LENGTH TO BAR 1 

POINT TO RECIEVED DATA BUFFER 
EXPECTED DATA SAME AS RECIEVED 
ERROR IF NOT THE SAME / 

INC TO NEXT RAM ADDRESS 
DECREMENT RING LENGTH. 



(mr 1001 ] 



IN RAM 
0ATA7 
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PAGE 119 



******* 



************* 



********* 



************** 



POLL TEST (NORMAL MODE) 

This test issues a read to the IP register (BI GPR 0) 
and checks to see that the POLL test condition is set. 
An error results if the POLL test condition does not 
set . The test then issues a BI abort command and 
checks to see that the POLL test condition is reset. 
An error results if the POLL test condition does not 
reset . 



R6 contains value for BREG. 



Errors in this routine display the following in the SA register; 
106345 - POLL TEST error (NORMAL MODE ) 



******** 



******** 



********** 



<******* 



Q 


001014 


033740 


000050 


120313 


< 


001015 


133541 


OOOO40 


OIOOOO 


_) 

a 

n 


00 10 1 6 
0O1017 


033541 
033740 


O0O2 10 
000050 


OIOOOO 

120302 


? 


001020 


033740 


000362 


1303 1 3 


cc 
O 

Li. 


OO1021 


01 3440 


150000 


1 1 0043 


001022 


015546 


1 16001 


056237 


tf> 


001023 


033446 


006OO6 


130275 


o 

1 










OO1024 


013440 


150000 


000043 




001025 


013440 


OOOOOO 


1 10252 



MOV 
BIS 
BIS 

MOV 
MOV 

NOP 
BIC\F 



NOP 
NOP 



#BCICSR,R0 %CALL 
#STOPEN, R1 
#<BICSREN*RT0EVEN>,R1 



#BCICSR,RO 
#IPREG,RO 



•'.CALL 
%CALL 



WRCMD 
ROCMD 



SJNPOLL ERRB1B 
#B . NAB0,R6\N,BREG %JSTOP BI.STP 



R6, , BREG 



XCALL WASTE 



7.JP0LL ERRB1B 
%JMP TSTRTN 



READ BCI CONTROL REGISTER 
SET STOPEN BIT 8 
BICSREN+RTOEVEN BIT IN BCICSR 

TO ENABLE NODE SELECT FOR STOP CMO . 
WRITE BCI CONTROL REGISTER 
REAO IP REGISTER (BI GPR 0) 

TO SET POLL 
ERROR IF POLL WASN'T SET, ELSE 
JUMP IF BI STOPPED, ELSE 

ABORT BI CMD 
RELOAD BREG / 

WASTE SOME TIME TO ALLOW 

RESET OF POLL SIGNAL. 
ERROR IF POLL WASN'T RESET 
TEST UER a RETURN 



[m.jt OS] 



(mr loot ] 



c 
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"^ 






001026 
001027 
001030 
001031 



001032 
001033 

001034 



00103S 
001036 
001037 
0O1O4O 
0010*1 
001042 



001043 
001044 
001045 
00104B 
001047 



013440 
013440 
013440 
033741 



033740 
1 14S41 
013440 



033742 
033741 
033740 
033742 
033741 
033740 



03374O 

073746 
073752 
176547 
01 6 1 52 



OOOOOO 
OOOOOO 
000040 
0000 10 

OOOOOO 
000044 



000O3O 
0OO34O 
00036O 
00O200 
01O006 



OOOOOO 
OOOOOO 

130302 
10000 
OOOOOO 
120302 



O 10000 
O 10000 
OOOOOO 
OOOOOO 
041051 



001050 030546 010002 141070 



BI MEMORY TEST (NORMAL MODEI 



This test is executed in MANUFACTURING ONLY, 
writes and reads 3 OCTAWORDS in BI MEMORY 
NODE 15.). All 3 OCTAWORDS will be written 
walking ONE'S and ZERO'S data pattern, then 
verify data integrity. 



The test 
(must be 

with a 
read to 



NOTE: Errors in this routine display the Following in the SA register; 
106347 - BI MEMORY error (NORMAL MODE) 



050O0O 101030 BI* 

05OO0O 000252 

05OO0O 1 102S2 1$: 

000017 120254 



00OO04 130313 
OOOOIO 10000 
OIOOOO 1 10043 



;;«« THIS IS A MANUFACTURING TEST ONLY 



XJNTEST 1$ 

%JTEST TSTRTN 

XJNTEST TSTRTN 

"/.CALL SHFID 



NOP 
NOP 
NOP 
MOV 



#15 . , R1 



«»*****» 



CHECK EXT.TEST_L FOR TOGGLE MODE 
RETURN IF EXT.TEST_L DID NOT TOGGLE 
RETURN IF EXT.TEST_L DID NOT TOGGLE 
ASSUME NODE ID 15. FOR BI MEMORY 
GO SHIFT ID INTO CORRECT POSITION 



linr 10O21 



;;Read BICSR in BI MEMORY to check STS bit status 
7.CALL 
%JZRO 



MOV 


#BICSR, RO 


BIT 


#<STS> , Rt 


NOP 





RDCMD 



ERRB1B 



;REAO BI CONTROL REGISTER 
;WAS SELF-TEST SUCCESSFUL? 
TERROR IF NOT 



-Setup STARTING and ENDING BI MEMORY address registers 



MOV 
MOV 
MOV 
MOV 
MOV 
MOV 



#0, R2 
#0,R1 

#BISAOR, RO 
#10, R2 
#0, R1 
#BIEADR,RO 



LOAD HI STARTING ADDRESS 
LOAD LO STARTING ADDRESS 
WRITE BI STARTING ADDRESS RE 
LOAD HI ENDING AOORESS 
LOAD LO ENDING ADDRESS 
WRITE BI ENDING ADDRESS REG 



;;Setup OCTAWORO count, starting SI MEMORY address a starting DATA pattern 



MOV 

MOV\L 

MOV\L 

XOR\L 

XOR\F 



#<S . «3>. RO 
#<700/2>, IUAR 
#<740/2>, R12 
#100000, R7 
IUAR,R12\N 



AOO\F #2, IUAR 



4$ 

6$ 



;SETUP FAKE RING LENGTH (3 OctawordS) 

,'SETUP STARTING BI MEMORY ADDRESS (700) 

;SETUP LAST STARTING BI MEMORY AOORESS (740) 

;R7 = DATA 

;JUMP IF DATA NON-ZERO, ELSE 

. DID WE 00 LAST STARTING BI ADDRESS? 

;EXIT IF YES, ELSE 
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NEXT STARTING BI MEMORY ADDRESS 
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001051 013740 007050 13SS24 4$: 

001052 013740 007 140 010OO0 

001053 013740 003002 121077 

001054 033741 OOO 1 05 136245 

001055 O33440 O 1 OO 1 000043 



2901 ASSEMBLER VERSION 32 PAGE 122 

CODE 

;;Setup to WRITE from a RAM buffer to HOST memory 



MOV 
MOV 
MOV 



#TEMP3, \N, BAR 

#U8URST. \N, BAR 
#2. \N, BUF 
#E0SEED.R1 



"/.CALL 
%CALL 



WT . RAM 
WT . 1 AG 



7.JNZR0 ERRB1S 



;POINT TO TEMP3 ADOR IN RAM / 

; SAVE BI MEMORY ADDRESS 

IPOINT UBURST IN RAM 

; GO WRITE DATA IN RAM BUFFER 

iSETUP EDC SEED AND 

; GO WRITE DATA TO HOST MEMORY. 

;ERROR IF NOT O / 

; RESTORE RING LENGTH TO RO 



o 



;Setup to REAO from HOST memory to a RAM buffer 



001056 013440 

001057 0301 45 



000000 
007000 



131 104 

oooooo 



001060 033741 000105 125640 

001061 033440 010010 000043 



NOP 
ADO 


RO, UBAR 


BAR 


%CALL 


S .BUFR 


MOV 


#BOSEED 


R1 


7.CALL 


RO .DIAG 


MOV 


RIO, RO 




%JNZRO 


ERRB1B 



SETUP SUFFERS TO DO DMA REAO 
ADO RING LENGTH TO BAR 8 

LOAD RECIEVED DATA BUFFER TO RAM 
SETUP EDC SEED AND 

GO REAO DATA FROM HOST MEMORY. 
ERROR IF NOT O / 

RESTORE RING LENGTH TO RO 



;;Compare the EXPECTED 8 RECIEVED stored in RAM 



001062 013440 OOOOOO 

001063 033702 010003 



131 104 

141046 



001064 010145 007000 O 1 OOOO 



OO 1065 
001086 



036502 000003 OOOOOO 
130445 017005 01O043 



NOP 
MOV\F 



KOR 

INC 



(BUF) ,R2 

RO, UBAR\N, BAR 



•/.CALL 
%JZRO 



S . BUFR 

3$ 



(BUF ) , R2 
UBAR, , BAR 



001067 O31450 0O0O10 
001070 033751 006321 



O01071 013740 006221 



101063 
120253 



DEC 
MOV 



7.JNZR0 ERR81B 
RIO %JMP 5$ 

#<B~.NRTY + B . LOOP+S . LED + B . NABO> ,R1 1 ,BREG 7.CALL GETID 



SETUP BUFFERS TO COMPARE OATA 
JUMP IF DONE, ELSE 

SAVE EXPECTED DATA. 
ADO RING LENGTH TO BAR 8 

POINT TO RECIEVED DATA BUFFER IN RAM 
EXPECTED OATA SAME AS RECIEVED DATA? 
ERROR IF NOT THE SAME / 

INC TO NEXT RAM ADDRESS 
DECREMENT RING LENGTH. 



#<B . NRTYtB . LEO+B . NABO> , BREG 7.JMP TSTRTN 



RELEASE D-PROC FROM SPECIAL WA I 

CALLED "TSTXL'. / 

PUT CONTROLLER IN LOOPBACK MOD 

TO REAO CORRECT NODE ID 
PUT CONTROLLER IN NORMAL MODE / 

TEST UER 8 RETURN 
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************************** 



PAGE 124 



...* 



001077 
OOI 10O 

001 10 1 

001 102 
OO! 103 



- 



c 



********* 



*************** 



******* 



INITIALIZATION SUBROUTINES 

THESE ROUTINES ARE U5ED BY THE INITIALIZATION PROCESS 



; ****************** 



********* 



********* 



SUBROUTINE TO PRESET THE SOI CONTROL BLOCKS 



001072 


033743 


000004 


12SS22 


S . SSDI : MOV 


OO1073 


010545 


17000 


137777 


SSSDIA: ADD 


001074 


1 13740 


003174 


oooooo 


MOV 


001075 


030S45 


0OO120 


oooooo 


ADD 


001076 


031443 


000003 


1 1 1073 


DEC 

; ; ************** 
; DMA ROUTINES 



#NSDI , R3 



"/.CALL S.S0I1 



;R3i# OF SDI CONTROL SLOCKS 

; UBAR (RS)HST SDI CONTROL BLOCK PTR 

#SDI .ST, UBAR\N, BAR %R2R0 ;BAR.PTR TO SDI STATUS 

#<ERRIPtDRVOL*0RAVL*SLATtDROUP>,\N,BUF MNDICATE DRIVE OFFLINE 

#SOIB.L,UBAR ;UPDATE UBAR ( R5 I 

R3 %JMP SSSDIA ;OECR LOOP COUNTER 



This routine will write data to RAM, which will be used to write the ring 
area in host memory. 



033442 
033442 

13044S 
176S42 
03 1 450 



0O0OO7 
1 3002 

0O70O5 

0O020O 
OOO0 1O 



121 104 
1 5 1 104 

010000 
OOOOOO 
1 1 1 100 



Input : 
Output : 



WT.RAM: MOV 
1$: MOV\F 



R7 = DATA 

WRITE DATA TO RAM 

R2 = TEMPORARV DATA REGISTER 

RIO : RING LENGTH; WILL * O WHEN DONE 

***************************** ********** 



************ 



INC 

XOR\L 

DEC 



R7.R2 
R2, , BUF 

UBAR, , BAR 
# 1O000O, R2 
RIO 



%CALL 
%JZRO 



, BUFR 
. BUFR 



MOVE R7 DATA TO R2 / SETUP BUFFERS 
RETURN IF DONE, ELSE 

STORE DATA IN RAM BUFFER. 
INCREMENT TO NEXT RAM ADDRESS 
CHANGE VALUE IN NEXT ADDRESS 
ALL DONE? LOOP 
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PAGE I2S 



****************** 
S .BUFR 



************** 



********** 



This routine will setup the ring length, the lo address bits of a ring area 
in host memory and the starting address of a buffer in RAM. 



1 nput : 
Output : 



RO t r i ng 1 engt h 

TEMP3 s lo address bits of ring area in host memory 



RIO 
IUAR 
UBAR 
BAR 

******************* 



s r i ng 1 engt h 

* lo address bits of ring area in host memory 

s starting RAM buffer address for DMA xfer 



********** 



00 1 104 

001 105 

00 1 106 

00 1 1 07 



033450 
013740 
033745 
13354S 



OOOOOO 
007050 
000272 
007013 



OOOOOO 
135600 
OOOOOO 

137777 



MOV RO , R 10 

MOV OTEMP3. \N. BAR %CALL S.LDIU 

MOV »<BUFR2 . >«LOBYT. UBAR 

SIS »<BUFR2 . >*HIBVT. UBAR, BAR %RET 



LOAD RIO WITH RING LENGTH. 

LOAD IUAR (R6) WITH RING LO AORS BITS. 
SET LO BITS < 
HI BITS OF DATA BUFFER IN RAM 



a 
< 

a 

n 

5 
cc 
O 

LL 
</> 

o 

V) 
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*********************** ********** 



********* 



SEND DATA TO HOST DURING A STEP, 

RECEIVE DATA FROM HOST DURING STEP AND 

IN STEP 4. THE PROCESSOR WILL WAIT FOR THE GO BIT FROM HOST. 

Input : 

R3 : STEP FLAG USED IN STEP 

9 = ECHO DATA 
Out put : 

9 . DATA FROM THE HOST AND IS TESTED TO SET FLAGS ON RETURN 

R2 USED AS A TEMPORARY REG 

R1 USED AS A TEMPORARY REG 

RO DESTROYED IN U.INTR 

RIO USED IN STEP 

ROUTINES CALLED: 

DIINTR (CALLS U . INTR) 

STEP (LOADS SEND DATA INTO UDO ISA REG]) 



o 



;************ 



************* 



************* 



00 1 1 10 
001 1 1 1 



001 1 12 
001 1 13 



1 13740 

133743 



1 13740 
133743 



004320 010000 SENDS2: 
O00O20 111115 



004300 000000 
000040 111115 



001114 113740 004270 OOOOOO 



001 I IS 

001 1 IS 
001 1 17 
001 120 



033250 
033150 
033441 
013740 



000010 1O0OO 

00OOO3 OOOOOO 

000010 1303SS 

006221 121134 



SENDS4 : 
STEP . X: 



OOI121 003443 000003 130245 1$: 



MOV 
MOV 

MOV 

MOV 

MOV 

MOV 
BIS 
MOV 
MOV 

MOV 



#<LE0S*LE04 
#STEP2, R3 



+LED1 >,\N, UCRO 

%JMP STEP. 



#<LE08+LED4 
#STEP3,R3 



> , \N,UCRD 

XJMP STEP. 



;TURN ON STEP 2 LEO. 

;SETUP STEP BIT / GO LOAD SA REG. 



;TURN ON STEP 3 LEOS. 

;SETUP STEP BIT / GO LOAD SA REG. 



#<LE08+LE02+LED1+DRINIT>, \N, UCRD ; TURN ON STEP 4 LED. 



O.UDDI 
R3, UDDI 
UODI , R1 
#<B . NRTYtB 

R3, TSTCNT 



001 122 

001 123 

001 124 

00 1 125 

00 1 1 26 

001 127 

001 130 

001 131 

00 1 132 
OOI 133 

KDBUP 



033740 

1 14S42 
O13440 

033740 
033740 
003442 

1 14543 
001 240 

013740 

033607 



000054 130313 
000040 010000 
010000 10112 1 



00OOS4 
000364 
000002 



130302 
130313 
010000 



000 100 OOOOOO 
010000 167777 



047170 051 121 
000003 127777 
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MOV 


0BIWSTA, RO 


BIT 


#<GPR1 > ,R2 


NOP 




MOV 


#BIWSTA,RO 


MOV 


*SAREG, RO 


MOV 


R2.0 


BIT 


#STEP4,R3 


DEC\F 





MOV\F 


#CON.ST,\N, 


BIS 


(BUF) ,0,R7 


- 1988 1 1 


: 1 6 : 48 . 97 



7.CALL 
LEO + B .NABO> 



7.CALL 
%CALL 



BAR %JLSB 



iLOAD UDDI SEND DATA FOR NEXT STEP 
,SET STeP BIT FOR SA REG 
WRTSA ;SENO STEP BIT TO HOST SA REG IN LOOPBACK MODE 
BREG %CALL DIINTR ;BI BACK TO NORMAL MODE / 

; GO GENERATE AN INTERRUPT IF REQUIRED 
; LOAD CURRENT STEP / 

; WAIT 8EF0RE ACCESSING BI AGAIN 
;READ BI WRITE STATUS REGISTER 
;WAS SA REG WRITTEN BY HOST? 
;WAIT TO RECEIVE DATA FROM HOST 
;RESET GPR1 STATUS BIT 
;WRITE BI WRITE STATUS REGISTER 
; READ SA REG (BI GPR 1 ) 
;GET DATA FROM SA REG 
; LOAO DATA INTO REGISTER. 
;SEE IF WE ARE IN STEP 4, 
;RETURN IF NOT, ELSE 
; DECREMENT REG . 
;JUMP IF GO BIT NOT SET, ELSE 
;LOAD CONTROLLER STATUS POINTER TO BAR. 
; R7 GETS Purge Interrupt BIT 8 



WAITS 



ROCMD 



WRCMD 
ROCMD 



1$ 



if" 

1L 
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; ************ 










LEV01 










DI INTR 










I nput : 










Output 










; ************ 


001 134 


014545 


000200 


010000 


JIINTR; BIT 


001 135 


013440 


10000 


137777 


NOP 


001 136 


013440 


OOOOOO 


102030 


NOP 



RECEIVE OATA. 

************** 



DO AN INTERRUPT IN DIAGNOSTIC 

R5 has the IE bit 8 interrupt vector address/4. 
If U.INTR is called, 0, RO, 8 R1 ara altered. 

************************************************** 

#IE, R5 

%R2R0 

INTR 



%R2R0 
%JMP 



IS Interrupt Enable SET? 
RETURN IF NOT, ELSE 
00 INTERRUPT 8 
00 RETURN IN U.INTR ROUTINE 



o 
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SET VALUES FOR LIMITS FOR THE 2 WORDS (4 bytes) THAT PRECEDE 
THE RING AREA FOR ALL SYSTEMS or FOR THE ADDITIONAL 2 WORDS 
(4 bytes) FOR A SYSTEM WITH VAX PURGE SET. 



THIS ROUTINE WILL CALL THe ERROR ROUTINE IF THE 32 
MAKES UP THE PHYSICAL ADDRESS IN HOST MEMORY: 



IIT ADDRESS THAT 



1) IS < 4 FOR ALL SYSTEMS op < S FOR SYSTEMS WITH VAX PURGE SET 

2) IS LOCATED AT A HIGH PHYSICAL ADDRESS S THE RING LENGTH IS 

TOO LARGE FOR HOST MEMORY. 

3) IS LOCATEO IN THE SYSTEM I/O PAGE (last 4k of memory) 

REGISTERS USED : 
Input : 

has hi order word of the physical address ( r i ngbase+O] or 

[ringbase-4] if VAX Purge Interrupt bit is set. 
RO has length of the ring 

R2 has lo order word of the physical address [ringbase+Ol or 
[ringhase-4] if VAX Purge Interrupt bit is set. 
Out put : 

may need to be Decremented. 

RO will be Incremented by 2. 

R2 gets lo order word of the physical address [ringbase-4] or 

[ringbase-Sj if VAX Purge Interrupt bit is set. 
RAM location SAVUAR gets HI WORD of the physical address 

I r i ngbase-4 1 or [pingbasa-8] if VAX Purge Interrupt is set. 

Errors in this routine display the following in the SA register; 
122240 - DMA test error 



********* 



001 137 
001 140 


105640 
131542 


000300 
0O0O04 


010000 SETLIM: AND 
000000 SUB 


#BA,0 
#4, R2 








OOI 141 


001260 


020000 


051 142 


DEC\T 







%TNCRY 




001 1 42 


133743 


020340 


04003 1 


MOV\F 


#1 60000 


R3 


%JNCRV 


ERRB10 


00 1 1 43 
OOI 1 44 


1 17640 
035 1 63 


000300 
010002 


010000 
151 145 


XOR 

BIC\T 


#BA,0\N 
R2, R3 




7.TZR0 




OOI 145 


030540 


O1OO02 


10003 1 


ADD 


#2, RO 




7.JZR0 


ERRB10 


OOI 1 46 


01374O 


007262 


115613 


MOV 


•SAVUAR 


\N. BAR 


%JMP 


S STOO 



SAVE EXTENDED ADDRESS BITS 
DECREMENT LO ADDRESS BITS. 

WILL RING ADDRESS FIT IN LO ADDRESS SPACE? 
CONTINUE IF SO, ELSE 

DECREMENT HI ADDRESS BITS, 

ARE WE SOMEWHERE IN HI MEMORY? 
ERROR IF RING ADDRESS TOO LO OR HI IN MEMORY, ELSE 

SETUP TO CHECK FOR RING ADDRESS IN I/O PAGE 
ARE ALL THE EXTENDED AORS BITS SET 7 
CONTINUE IF NOT, ELSE 

IS RING ADDRESS IN SYSTEM I/O PAGE? 
ERROR IF RING ADDRESS IS IN SYSTEM I/O PAGE / 

ADO 2 TO RING LENGTH. 
STORE (Extended adrs Oitsl IN A 

RAM LOCATION FOR LATER 1 RETURN. 
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STEP 1 INIT CODE 

DATA RECEIVED FROM HOST 

BIT 1 5 is always SET 

Wrap mode bit (BIT14J 

Command ring length (BIT13-11) 

Response ring length (BIT10-08) 

Interrupt Enable bit (BIT07) 

Interrupt vector address/4 (BITOS-00) 



REGS USED: 
I nput : 



has the RECEIVE data from STEP 1. 

gets SEND(ECHO) data for STEP 2. 

RS gets SEND(ECHO) data for STEP 3. 

RAM location RSPLEN gets RESPONSE ring length. 

RAM location CMDLEN gets COMMANO ring length. 



S . S T R2 
S . LDR2 
S .RRR1 
S .RLR1 
S .RRR7 
S .STRO 



NOTE : 
NOTE : 



If WRAP data is set, U-PROC will loop until r 

Errors in this routine display the following 
106200 - STEP 1 data error 



i n i t ed . 

n the SA 



001 1 47 

001 1 50 

001 151 

001 152 



033740 
033740 
003442 

1 1 4640 



000054 
000364 
000002 
030100 



130302 
I 30313 
1000O 
010034 



001153 013740 016221 111165 



********* 

STEP . I : 

MOV 
MOV 
MOV 
BIT 

MOV 



» « * * * 



««*»*»«* 



%CALL 

•'.CALL 



WRCMO 
RDCMD 



;RESET GPR1 STATUS BIT 
;WRITE BI WRITE STATUS REGISTER 

; READ SA REG (BI GPR 1 ) 
.GET DATA FROM SA REG 
;ERROR IF NEG NOT SET, / 
; WRAP REOUESTED? 
#<B . NRTY + B. LEO*B.NABO> ,BREG %JZRO 3$ ,' JUMP IF NOT WRAP MODE / 

; BI BACK TO NORMAL MODE 



#BIWSTA, RO 
#SAREG,RO 
R2.0 
»BIT14,0 



%JNNEG ERRB1L 



:;Turn on LED #8, read SA REG source 8 write SA REG destinat 



on 



001 154 

001 155 

001 156 



1 13740 
033740 
033441 



004 160 
000364 
000002 



01OO0O 
130313 
130365 



MOV 
MOV 
MOV 



»<IE04*LED2+LE01 >, \N, UCRD 
#SAREG,RO %CALL ROCMO 

R2, R1 7.CALL WRTSA 



LED: 08H ON BOARD #1 / 
READ SA REG (BI GPR 1 ) 

WRAP DATA FROM SA REG SOURCE TO SA REG OEST 
IN LOOPBACK MOOE. 
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;;Wait for SA REG to be written again by HOST 



001 1S7 O13440 000000 120246 

001 ISO 033740 0OO0S4 130313 

001161 114542 000040 10000 

©01162 013740 016221 101157 



001163 033740 000054 1 3O302 

001164 013440 OOOOOO 101154 



00116S 033247 000007 121072 3$: 



NOP 

MOV 
BIT 
MOV 



MOV 
NOP 



#BIWSTA.RO 
#<GPRI>,R2 



•/.CALL 
•/.CALL 



WAITS 
ROCMD 



;WAIT BEFORE ACCESSING BI AGAIN 
; READ BI WRITE STATUS REGISTER 
;WAS SA REG WRITTEN BV HOST? 



#<B.NRTYOB . LED<-B.NABO> , BREG T.JZRO 2$ ; WA I T TO RECEIVE OATA FROM HOST / 

; BI BACK TO NORMAL MODE 
;RESET GPR1 STATUS BIT 
;WRITE BI WRITE STATUS REGISTER 
; LOOP UNTIL REINITED 



JBIWSTA, RO 



•/.CALL 
%JMP 



WRCMO 
IS 



o 



;SAVE STEP 1 RECEIVED DATA IN R7 , 

; INIT EACH SOI STATUS TO REFLECT DRIVE OFFLINE 
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******* **************** N 



S ******** 



******************** 



Make sure that the CLR HANG instruction and the CALL S.SSOI do not 
occur on the same line. The 0-PROC may not be released if they do. 
R5 must be NON-ZERO to continue. 

Do not store anything in R7 until after the U-PROC has returned from 
S.SSOI. A NON-ZERO value in Rl will hang the D-PROC as long as R7 is 
the UER. 

After this point the D.PROC is running and the U . PROC can use only 
registers Q, RO, Rl, R2. R3, R5, R6, R7 and R10. The D.PROC owns R11, 
R12, R13, R14, R15, R16 and R17 from now on. 

U.PROC will use R4 (CRI) if an error occurs. 

*********************************************************************** 



001 1 66 

001 167 
OOI 170 
001 17 1 

001 172 

001 173 

001 174 

001 17S 



034450 
013740 
003740 
013740 
003740 
033445 

003740 
004547 



00OO1O 
007020 
OOOOIO 
0O7O26 
00OO13 
000007 

000010 
000377 



OOOOOO 
OOOOOO 

131176 
OOOOOO 
131176 
OOOOOO 

12S503 
101202 



CLR 


RIO 










MOV 


#RSPLEN 


\N 


BAR 






MOV 


#8 . , 






•/.CALL 


GRNGLN 


MOV 


#CMOLEN 


\N 


BAR 






MOV 


#1 1 . .9 






•/.CALL 


GRNGLN 


MOV 


R7.RS 










MOV 


#8. ,Q 






7.CALL 


S .RRR7 


ANO 


#377, R7 







%JMP 


STEP. 2 



************ 



GET RING LENGTH 

ISOLATE THE RING LENGTH LOG 



CLEAR RIO / USED TO STORE LENGTH 

BAR -> RESPONSE RING LENGTH 

GET RING LENGTH / Q = # OF BITS TO SHIFT 

BAR -> COMMANO RING LENGTH 

GET RING LENGTH 

R5 GETS STEP 3 SEND(ECHO) DATA 

(IE 8 INTERRUPT VECTOR/4). 
SWAB R7 FOR ECHO VALUE 
STRIP OFF GARBAGE, Q GETS STEP 2 SENO(BCHO) OATA 8 

JUMP TO STEP 2. 



2 AND GET THE ACTUAL RING LENGTH 



Q has # of bits. 

R7 has RECEIVE data from STEP 1 . 

RIO has total ring length. 

BAR has some RAM location. 

R1 is used in S . RRR1 . 

Rl gets loaded into a RAM location. 

R10 gets ring length added to it. 

************************************ 



******* 



,****** 



***** 



001 176 037441 

001 177 004541 
OO12O0 033741 



000007 
00OOO7 
010200 



135501 
10000 
025501 



GRNGLN: COM 
AND 
MOV 



R7.R1 
#7,R1 ,0 
#BIT07,R1 

R1\0, RIO, BUF 



%CALL S.RRR1 
%CNZRO S.RRR1 
%RET 



Rl GETS COMPLEMENTED OATA 
ISOLATE THE RING, STORE IN Q 
INITIAL VALUE IN Rl / 

CALL ONLY IF RING VALUE IS > 7 
STORE IN BUFFER / ADD TO TOTAL LENGTH 



V- 
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******** 



STEP 2 INIT CODE 

DATA SENT TO HOST 

Step 2 bit (BIT12) 

Port type (BIT10-OS) 

Command ping length echo (SIT05-031 

Response ping length echo (BITO2-00) 

DATA RECEIVED FROM HOST 

Lo order wopd of the physical address [ringbase+O] (BIT15-01) 
VAX Pupge Interrupt bit (BITOO) 

REGS USED: 
Input : 

has the SENO(ECHO) data fop STEP 2. 

R5 has the SENO(ECHO) data fop STEP 3. 
Out put : 

gets the RECEIVE data from STEP 2. 

RO used in U.INTR routine. 

RS still has the SEND(ECHO) data fop STEP 3. 

RAM location INTVEC gets interrupt vector address/4. 

RAM location RCSRW1 (temp storage) gets total ring length. 

RAM location CON. ST gets VAX Purge Interrupt bit. 

RAM location RNGBSL gets LO WORD of the physical 
address [ r i ngbase+o] . 

Calls OIINTR for interrupts if requested. 

****************************************** 



0O12O2 
00 12O3 
00 12O4 
00120S 
001206 
001207 



034545 
013740 
014S45 
073440 
013740 
033440 



001210 013740 

00121 1 01 4640 

001212 013740 

001213 005640 



000377 
0071 64 
003177 
OO001O 
0O7O2S 
0O30OO 

007170 
0O3001 
007 160 
003001 



10000 
OIOOOO 
1 OOOO 
OIOOOO 

OOOOOO 
121110 

OIOOOO 
OIOOOO 

OOOOOO 
OIOOOO 



AND 

MOV 

AND 

MOV\L 

MOV 

MOV 

MOV 
AND 
MOV 
BIC 



#377, R5 

#INTVEC, \N, BAR 
#177,RS\N, BUF 
RIO, RO 

#RCSRW1 , \N,BAR 
RO, , BUF 

#CON . ST, \N, BAR 
#BITO0.0\N, BUF 
•RNGBSL , \N, BAR 
#BI TOO, 0, BUF 



****************************** 

SAVE IE a INTERRUPT VECTOR 

BAR* INTERRUPT VECTOR STORAGE LOC 

STORE INTERRUPT VECTOR/4 

CHANGE RING LENGTH TO WORDS 

POINT TO TEMP RING LENGTH STORAGE IN RAM 

SAVE RING LENGTH (WORDS! AND 

CALL STEP#2 SEND ROUTINE. 
LOAD CONTROLLER STATUS POINTER TO BAR. 
SAVE VAX Purge Interrupt BIT IN CON. ST 
POINTER -> LO RNG BASE ADDR 
STORE LO ADDRESS IN RAM 
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STEP 3 INIT CODE 



OATA SENT TO HOST 

Step 3 bit (BIT13) 

Interrupt Enable bit echo (BIT07) 

Interrupt vector address/4 echo (BIT06-0O) 

OATA RECEIVEO FROM HOST 

Purge/Poll test bit (BIT15) 

Hi order word of the physical address [ r i ngbase+o 1 (BIT14-00) 



REGS USED: 
I nput : 



R5 has the SEND(ECHO) data for STEP 3. 

Rio has the ring length. 

RAM location CON.ST has VAX Purge Interrupt bit. 

gets Extended Address bits for the routine SETL1M. 

RAM location TEMP2 gets R5 [the SENO(ECHO) data for STEP 31 

RAM location RNGBSH gets HI WORD of the physical 

address [ringbase+O], 
RAM location TEMP3 gets LO WORD of the physical address 

[ringbase-4] or [ r i ngbase- 8 1 i f PI is set. 

SETLIM 
S.STRI 
UNB . RS 
SETLIM, WHICH SAVES THE EXTENDED ADDRESS BITS 



001 2 1 4 


003445 


000005 


131112 


001215 


013740 


007047 


125623 


00121 6 


013740 


0071 62 


125613 


00121 7 


013440 


030000 


Ol 1 226 


0O1220 


03444 1 


000001 


1203S5 


001221 


013740 


006221 


1302 4 3 



Errors 
1 22240 



MOV 

MOV 



n this routine displ- 
DMA test error 



y the following in the SA register. 



001222 
001223 



001224 
KDBUP 



013440 
013740 



150000 
1 1 6220 



1 10031 
056237 



MOV 
NOP 



CLR 
MOV 



NOP 
MOV\F 



********************************* 


R5.0. 


5SCALL 


SENDS3 


#TEMP2, \N.BAR 


XCALL 


S.STR5 


#RNGBSH, \N , BAR 


7.CALL 


S.STOO 




7.JNNEG 


1$ 


R1 


SCALL 


WRTSA 



********* 



******* 



013740 006221 



;RESTORE SEND(ECHD) DATA TO REG AND 

CALL STEP#3 SEND ROUTINE. 
;SAVE R5, IT WILL BE DESTROYED 

DURING THE DMA TEST. 
;SAVE HIGH BASE ADDRESS 

iSKIP PURGE/POLL TEST IF PP BIT ISN'T SET / 
BAR -> RING BASE LO ADOR 

;CLEAR SA REG FOR PURGE/POLL TEST IN 
; LOOPBACK MODE. 
#<B . NRTV+B. LED + B .NABO> . BREG %CALL WAIT ;WASTE 10 MILLISECONDS / 

; BI BACK TO NORMAL MODE 
;THE SCAN/PURGE SIGNALS SHOULO HAVE 8EEN 
; SET BV THE HOST AT THIS TIME. 
%JNPOLL ERRB10 i ERROR IF POLL WASN'T SET 

#<B . NRTY+B.LED>,BREG 7.JST0P BI.STP ; JUMP IF BI STOPPED. ELSE ImrlOOU 

; ABORT BI CMD 
#<B. NRTV + B. LE0+B.NAB0>,6R£G '/.CALL WASTE ;LOAD BREG WITH NO ABORT CMD / 
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00122S 013440 1 SOOOO 00003 1 
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001226 
001227 
001230 

00 123 1 

001232 

001233 



013740 
013740 
O33702 

013740 

034447 

O13740 



007025 
007160 
000003 

007 170 

040007 

007050 



13SS73 
OOOOOO 

121137 

125601 
031 137 

135521 



NOP 






'iJPOLL 


eRRBIO 


MOV 
MOV 

MOV 


#RCSRW1 ,\N 
#RNGBSL AN 
(BUFI , R2 


BAR 
BAR 


'/.CALL 
%CALL 


S . LDRO 
SETL IM 


MOV 


#CON.ST, \N 


.BAR 


"'.CALL 


S. LDR7 


CLP. 


R7 




7.CLSB 


SETLIM 


MOV 


#TEMP3. \N, 


BAR 


'/.CALL 


S . STR2 



; ERROR 



WASTE SOME TIME TO ALLOW 
RESET OF POLL SIGNAL. 
POLL WASN'T RESET 



RESTORE RING LENGTH TO RO 
BAR -> RING BASE LO ADDR 
LOAD R2 WITH RINGBASE+O / 

SET LIMITS, R2 GETS RINGBASE-4 
LOAD CONTROLLER STATUS POINTER TO BAR / 

R7 GETS Purge Interrupt BIT. 
R2 GETS RINGBASE-8 IF PI BIT IS SET / 

INIT R7 USEO IN DMA TEST. 
STARTING ADDRESS OF RINGS, 

(LO WORD of the physical address [rlngbase- 

[ringbase-8] if VAX Purge Interrupt is set 



< 

o 

II 

s 

o 
ii- 
c/j 
o 

w 

_i 
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* ******:> 
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********* 



************** 



DMA TEST 

Fop each location in the ring buffer do the following: 

Write the moving ONE'S and ZERO'S patterns 

Clear the location 

Check to make sure the increment works properly 



Input : 



Output 



RO has length of ring area 

RAM location UBURST gets initialised to 2 words for burst rata 

RAM location TEMP3 has LO WORD of the physical address 

[ r ingbase- 4 ] or [ringbase-8] if VAX Purge Interrupt is set 
RAM location SAVUAR has HI WORD of the physical address 

[ringbase-4] or [ringbase-8] if VAX Purge Interrupt. is set 

UDR gets changed by WT.DIAG ft RD.DIAG routines 

UAR » " " 

RING AREA in host memory will be initialized to data (Oj 



REGISTERS USED: 



Ri used when compar ing read/write data 

R7 starting data pattern 

RIO used as t empor ary storage for ring length 

0, R2 . R3 are used in WT.DIAG a RD.DIAG routines 

BUFR2. is a buffer in RAM that is used to store data 

that will be written to the ring area in host memory. 

BUFR2 . +S16. is a buffer in RAM that is used to Store data 

t hat will be r ead from the ring area in host memory. 

ROUTINES USED: 

WT . RAM 
S.BUFR 
WT.DIAG 
RD . DIAG 
S. ZBUF 

NOTE: Errors in this routine display the following in the SA register; 
122240 - DMA test error 

I****-***********************.************************************************ 
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001234 176547 0O02OO OOOOOO 

001235 01374O 017140 111253 



XOR\L 
MOV 



#100000, R7 
#UBURST. \N,BAR 



7.JZR0 SFT134 
;;Setup to do DMA WRITE from a RAM buffer to host 



;R7 = DATA 

;JUMP IF DATA ZERO. 



nemory 



301236 

001237 



013740 003002 121077 
033741 000105 136245 



MOV 
MOV 



#2, \N, BUF 
#EDSEED.R1 



'/.CALL 
%CALL 



WT . RAM 

WT . 1 AG 



001240 033440 010010 000031 



001241 01344O OOOOOO 131104 

001242 030145 O0700O OOOOOO 



001243 033741 00O105 125640 

001244 033440 01O010 00003 1 



001245 013440 OOOOOO 131104 

001246 033702 010003 151234 



001247 010145 007000 OIOOOO 



%JNZRO ERRB10 



GO WRITE DATA IN RAM BUFFER 
SETUP EDC SEED AND 

GO WRITE DATA TO HOST MEMORY. 
ERROR IF NOT O / 

RESTORE RING LENGTH TO RO 



;Setup to do DMA READ from host memory to a RAM buffer 



NOP 






"/.CALL 


S . BUFR 


ADO 


RO, UBAR 


BAR 






MOV 


#EDSEEO 


R1 


•/.CALL 


RO.OIAG 


MOV 


R10.R0 




•/.JNZRO 


ERRB10 



SETUP SUFFERS TO 00 DMA READ 
AOO RING LENGTH TO BAR & 

LOAD RECIEVSD DATA BUFFER TO RAM 
SETUP EDC SEED AND 

GO READ DATA FROM HOST MEMORY. 
ERROR IF NOT O / 

RESTORE RING LENGTH TO RO 



;Compare the EXPECTED & RECIEVEO data from DMA xfer 



001250 036502 

001251 1 3044S 



000003 
O 1 700S 



OOOOOO 
01003 1 



001252 03145O 000010 101246 



NOP 
MOV\F 


(BUF) , R2 


%CALL 

%JZRO 


S BUFR 
DMAT.ST 


ADD 


RO, UBAR\N, BAR 






XOR 
INC 


I BUF ) ,R2 
UBAR , , BAR 


'/.JNZRO 


ERRS 10 


DEC 


R10 


XJMP 


1$ 



SETUP BUFFERS TO COMPARE DATA 
JUMP IF DONE, ELSE 

SAVE EXPECTED OATA. 
ADO RING LENGTH TO BAR I 

POINT TO RECIEVEO OATA BUFFER IN RAM 
EXPECTED DATA SAME AS RECIEVEO DATA? 
ERROR IF NOT THE SAME / 

INC TO NEXT RAM ADDRESS 
DECREMENT RING LENGTH. 
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: ; c 1 ear 


RAM buffers 


6 initial* 


ie RING a 


001253 


01 3440 


OOOOOO 


131 104 


SFT 134: 


NOP 






%CALL 


S . BUFR 


OO 1 254 


073440 


OOOOOO 


OOOOOO 




ROT\L 


RO 








001255 


033441 


000005 


1 25544 




MOV 


UBAR.RI 




%CALL 


S . ZBUF 


001 256 


033440 


0000 10 


1 3 1 104 




MOV 


RIO, RO 




'.CALL 


S . BUFR 


001 257 


033741 


OOOIOS 


136245 




MOV 


VEOSEEO. Rl 




".CALL 


WT .01 AG 


001 260 


034440 


10O00 


00003 1 




CLR 


RO 




"-JNZRO 


ERRB10 












; ; F i 1 1 


RAM with ECC 


data 




OOl 26 1 


03374 1 


00000 1 


10000 




MOV 


#1 ,R1 








OOI 262 


137745 


030374 


1 1 1 273 


1$ : 


COM 


# ! 76O0O, R5 




V.JNEG 


3S 


00 1 2 63 


1 13540 


O07070 


1 35620 




BIS 


OALGAOR. RO\N, BAR ".CALL 


S . STR1 


001 264 


1 13541 


007074 


1356 16 




BIS 


#LGA0R , Rl \N 


BAR 


%CALL 


S .STRO 


001265 


07344 1 


OOOOOI 


OOOOOO 




ROT\L 


Rl 








OOI 266 


1 14541 


000004 


10000 




BIT 


0BIT10, Rl 








001267 


03654 1 


1 OOI 1 


14 1271 




XOR\F 


#1 1 ,R1 




%JZRO 


2$ 


00 1 270 


135541 


000004 


10000 




BIC 


OBIT 10. Rl 








OOI 27 1 


1 30440 


OOOOOO 


OOOOOO 


2$: 


INC 


RO 








001272 


112 140 


00OOO5 


101262 




CMP 


R5 , RO 




%JMP 


V 


001273 


01 3740 


007276 


125623 


3$: 


MOV 


•LGCKSV, \N. BAR 


"-CALL 


S . STR5 


001274 










ASSUME 


STEP . 4 , EO, . 
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ea in host memor y 

SETUP BUFFERS TO CLEAR RAM BUFFERS. 

RING LENGTH*2 

POINT TO BEGINNING OF BUFFERS USED 

DMA TEST / ZERO THE BUFFERS 
RESTORE RING LENGTH / 

SETUP BUFFERS TO DO DMA WRITE 
SETUP EDC SEED / 

GO WRITE OATA (O) TO HOST MEMORY. 
ERROR IF NOT O, ELSE 

INIT RO TO WRITe ECC OATA TO RAM 



;FILL RAM WITH ECC OATA 



INITIALIZE LOG/ANTILOG CHECK 



c 
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STEP 4 INIT CODE 

DATA SENT TO HOST 

Stsp 4 bit (BIT14) 

controller modal (BIT07-04) 

Controller nlcro-code version (BIT03-00) 

DATA RECEIVEO FROM HOST 

Burst rate (BIT07-02) 
Last Fail bit (BIT01) 

GO bit (BITOO) 

REGISTERS USED: 
Input : 



^H^^ 



Output : 



BAR is pointing to RAM location CON. ST 

RAM location TEMP2 has R5 (the SEND(ECHO) data from STEP 31 

RAM location CON. ST has VAX Purge Interrupt bit 

RO is a temporary reg used in U.INTR 

RAM location CON. ST gets Last Fail bit a VAX Purge 

Interrupt bit 
RAM location UBURST gets burst rate 



001274 003740 000043 000000 STEP. 4: MOV 



001275 
O01276 
001277 



00 1300 
00 130 1 

001 302 

001 303 

O01304 
0O13OS 
001306 



001307 
0013 10 
00131 I 



103640 
013740 
133743 



1 14640 
1 13740 

037743 
035545 

133S44 

1 1 4544 
044441 



004640 

043241 
133544 



000001 
007047 
000 100 



0OO00 1 
014360 

OOOOOO 
0OO2O0 

0OO202 

000200 
010401 



000037 
000001 
040200 



OOOOOO 
13SS77 
131114 



OOOOOO 
15 13 15 

OOOOOO 
121115 

OOOOOO 
010000 
051305 



OOOOOO 
OOOOOO 

05 1313 



BIS 
MOV 
MOV 



BIT 
MOV\F 



******************************** 

#<M00NUMt<C00VER*17>>aL0BYT ,0 

#<MOONUM+CODVER>AHIBYT,0 
#TEMP2, \N,BAR %CALL S.LDR5 
#STEP4,R3 7.CALL SENDS4 



#SF,0 
*LEOS,\N,UCRO 



COM #0,R3 

BIC #IE,RS '/.CALL 

BIS SPLOCK-tlNDIAG, RLL 

BIT #PLOCK,RLL 

CLRXRQF R1 6>SUPF 7.JNZP.0 



AND #37,0 

MOV\RO 0.R1 

BIS\F *PLOCK,RLL 



013440 OOOOOO 



%JLSB 
1.CALL 



2$ 

P . LOCK 



****************************** 

GET LO BITS (make sure that Imjt E12S] 

code version # doesn't go over 4 bit boundary SEmj 

HI BITS OF CONTROLLER MODEL #/uCOOE VERSION 
RESTORE RS, IE 8 INTERRUPT VECTOR ADDRESS/4 
SETUP STEP BIT FOR UDD (SA REG) AND 

CALL STEP 4 SEND ROUTINE. 

SPECIAL FUNCTION MODE? 
JUMP IF NOT, ELSE 

ALL LEDS OFF. 
SETUP HOST DATA 
MAKE SURE NO INTERRUPT OCCURS / 

GO LOAD SA REG WITH SF DATA. 
UNLOCK OPROC+DIAG MODE. 
TEST PLOCK BIT 
WAIT FOR 0-PROC TO UNLOCK, ELSE 

INIT R1 S GET RIO OF GO BIT / 

SET LOOP-ON-TEST FLAG. 
SAVE TEST+PROCESSOR BIT. 
WILL IT BE U-PROC OR D-PROC TEST? 
JUMP IF U-PROC TEST, ELSE 

UNLOCK 0-PROC. 
WAIT FOR D-PROC TO UNLOCK ME. 
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001313 

001 3 1 4 



001 3 1 5 

001 3 1 6 
0013 17 
001320 
001321 



001323 
001324 



001325 
001500 



133544 
010640 



OS4641 
003740 
1 14547 
013740 

030541 



013740 
01344O 



000200 
002026 



000374 
000010 
003003 
007140 
000002 



OOS221 

OOOOOO 



01OO0O 

010000 



OOOOOO 

1 25503 
OOOOOO 
010000 
1 35620 



010000 
101500 



BIS 
ADD 



AND\R 
MOV 

AND 
MOV 

ADD 



#PLOCK,RLL 
#TESTBL ,0\N.PAR 



#374,Q,R1 

#8. ,0 %CALL S . RRR7 

#<LFAIL+VAX.PG>,R7\N,BUF 

#UBURST , \N, BAR 

#2,R1 7.CALL S.STR1 
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UNLOCK 0-PROC 

HAS TEST NUMBER / 

FORCE PAR TO TEST TABLE 

; ISOLATE / SAVE BURST INFO IN R1 
;ROTATE FLAGS INTO UPPER BYTE 
;SAVE LFAIL 8 VAX PURGE 
;BAR:BURST SAVE AREA 
;SAVE BURST RATE / START U.PROC 



;Clear SA REGISTER and enter BI NORMAL MODE 



MOV #<B. NRTY+8 . LEO+B .NABO> , BREG 
NOP "/.JMP U.STRT 

.FILL 13440,0, <BIT1S*BIT12*SEQERR> 

.ORG 1500 

ASSUME U .STRT.EO, . 



CLEAR SA REG IN NORMAL MODE 

SELF-TEST OK 8 NO ABORT CMD . 
LOAO BREG WITH NO RETRV, 
JUMP TO FUNCTIONAL START-UP COOE. 

;JUMP TO SEOERR 

;MAKE SURE U.STRT IS NEXT 
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SBTTL U.PROC IDLE LOOP, PORT ROUTINES, SEEK ORDERING 

ROUTINE NAME: 
U.STRT 

FUNCTIONAL OECRIPTION: 

THIS CODE PERFORMS THE UNIBUS PROCESSOR STARTUP FUNCTIONS 
(AFTER POWERUP.BUS INIT.IP WRITE, OR RECEIPT COMMAND). THE 
FUNCTIONS INCLUDE THE FOLLOWING: 

1. CLEAR ALL SOI STATUS WORDS 

2. SET UP SOI SYNC CODE 

3. CLEARS ALL SOFTWARE TIMER STORAGE 

4. CLEARS ALL SDI CONTROL BLOCKS 

5. SETS UP THE SUFFER STACK 



001500 
001501 
001502 
001S03 
001S04 
OOISOS 
O01506 

00 1507 
001S1O 
00151 1 
001512 

001 5 1 3 
001 5 14 



0015 15 
0OI5 I 6 
O01517 
001520 

00152 1 
0015 22 

001523 
001524 
001 525 
0O1526 



001527 
001530 
001531 
001532 
001533 
001534 
001535 

KSBUP 



013740 
013740 
1 13740 
013740 
01374O 
01374O 
033741 
133541 
01374O 
013740 
013740 
10374O 
013440 



033741 
133744 
0331 44 
033742 

Ol 3440 
13 154 1 
030040 
031442 
030540 
013740 



133740 
01374O 
013740 
013700 
01O545 
013740 
01054S 



007174 
007 176 
003224 
007200 
003074 
0072O2 
000274 
003046 
007 142 
003024 
0070O2 
00300 1 
000000 



007257 
OOO200 
000001 
00005 1 

OO3O0O 
007002 
OOOOOO 
000002 

010015 
007242 



000002 

0O7170 
017034 
OOOO03 
O17O10 
13000 
007003 



135631 
122027 
OOOOOO 
OOOOOO 
OOOOOO 
10000 
1OOOO 
10000 
OOOOOO 
OOOOOO 
OOOOOO 
10OOO 
131572 



010000 
OOOOOO 
10000 
135530 

OOOOOO 
010000 
OOOOOO 
OOOOOO 
011521 
135616 



135522 
135603 
101537 
010000 
1 1 1537 
101537 
OOOOOO 



MOV 


#TMR.MC,BAR 


%CALL 


INIT1 


MOV 


#TMR.BS, BAR 


%CALL 


U . VAXR 


MOV 


^SECOND , BUF 






MOV 


0HOSTMO . BAR 






MOV 


#MINUTE , BUF 






MOV 


#SYNC , BAR 






MOV 


#SYNCL ,R1 






BIS 


#SYNCH, R1 , BUF 






MOV 


*CLIMIT,BAR 






MOV 


#CMOLIM,BUF 






MOV 


0DMREG2, BAR 






MOV 


#SECSZ,0, BUF 






NOP 




'/.CALL 


U . CINT 



SET UP BUFFER POINTER STACK »** 



MOV 
MOV 
BIS 
MOV 

MOV 
SUB 
ADD 
DEC 
ADO 
MOV 



OBUFP42, R1 , BAR 

#PLOCK,RLL 

R1 , RLL 

#NBUFR,R2 5SCALL S . FMB 1 

RO.BUF 

#2, R1 , BAR 

0,RO 

R2 

#<BUF DL-400) ,R0 '/.JNZRO USTRTA 

#CMPBUF,BAR '/.CALL S.STRO 



[16KISET MSCP TIMER FOR 1 SECOND 

[16K]BAR=PTR TO TMR.BS/RESET VAX PURGE 

INIT MSCP TIMER 

[16K]BAR:PTR TO HOSTMO 

SET HOST TIMER FOR 1 MINUTES 

[16K]BAR=PTR TO SYNC SAVE 

R1=L0 BYTE OF SDI SYNC CHAR 

(16K1SET UPPER BYTE OF SDI SYNC 

M 6K]BAR=C0MMAN0 LIMIT WORD 

MSK1SET IN COMMAND LIMIT 

I16K]BAR:PTR TO OM REG 2(SAVES SECTOR SIZE 

I16K1ST0RE SECTOR SIZE IN BUF 3 

IODAIINIT PTE CACHE POINTERS 



[ 16K] [US2EC1 1R1 .BARsPTR TO 1ST STK ENTRY 

I 16K1SET IN PLOCK 

[16K10R IN STACK POINTER 

[16K1R2=# BUFFERS/ROsADDR OF 1ST BUFR 

[16K1ST0RE BUFFER AOOR IN STACK 

[ 1 SK1UP0ATE R1 AND BAR 

I16K1AD0 SECTOR SIZE TO RO 

116KI0ECR BUFR CNTRL BLK CNTR 

[16K1ADD DIFFERENCE FROM BUF.OL 

[ch04]USE THE 42N0 BUFFER AS A OEOICATED COMPARE 



CHECK FOR LAST FAILURE ERROR LOG DESIRED «*« 



7.CALL S.SDI1 
"/.CALL S.BITO 
7.JZR0 U . IDLE 



MOV #LFAIL.RO 

MOV #C0N.ST,8AR 

MOV #FAILUR,BAR 

TST (BUF) 

ADD #SDI . IT, UBAR\N,BAR 7.JZR0 U.IDLE 

MOV #FM.CNT,BUF %JZRO U.IDLE 

ADD #SOI ,SW,UBAR\N, BAR 



UBARiADORESS OF S0I.1 

IF LAST FAILURE PKT NOT DESIRED 

THEN SKIP [raeOS] 

IF LAST FAILURE = |rae«9] 

THEN DON'T SEND IT (rae091 

ELSE STORE LOG CODE IN SDI. IT (rae09! 

BAR=PTR TO EVENT COOE 
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0O1S36 013740 003012 133233 



#ST . CNT, BUF 



SET EVENT TO CONTROLLER ERROR 



c 
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SBTTL U.PROC IDLE LOOP 
+ 
ROUTINE NAME: 

U.IDLE (UNIBUS PROCESSOR IDLE LOOP) 

FUNCTIONAL DESCRIPTION: 

THIS CODE IS THE MAIN SCHEDULING LOOP FOR THE UNIBUS PROCESSOR 
AND AS SUCH PERFORMS THE FOLLOWING FUNCTIONS: 

1. SENDS CONTROLLER TO HOST COMMANDS TO THE HOST MESSAGE RING 

2. PERFORMS HOST COMMAND RING POLLING 

3 MAINTAINS THE CONTROLLER'S MASTER SOFTWARE COUNTER FOR MSCP/SDI TIMING 
4. MONITORS THe SDI STATUS WORDS FOR TASKS TO PERFORM ON BEHALF 
OF THE DRIVE PROCESSOR 



ft 



INPUTS : 



SDI CONTROL BLOCKS 
TMR.BS 



UPDATED SDI CONTROL BLOCKS 
TMR . BS 



CONTROLLER INTERNAL 1 SECOND TIMER 



CONTROLLER INTERNAL 1 SECONO TIMER 



CHECK FOR HOST POLL FLAG SET *** 



00 1537 
001540 



001541 
001542 
001543 
001544 



013740 
013740 



1 14544 
1 14544 
033745 

133545 



157020 
0O7034 



05O010 
010100 
010355 
007002 



021675 

125630 



001 624 
012066 
051562 
10000 



MOV 

MOV 



#RSPLEN,BAR 
#FAILUR, BAR 



7.CP0LL 

7.CALL 



U . RECV 
S CLRB 



IF POLL FLAG THEN GO CHECK COMMAND RING 
ZAP LAST FAILURE 



CHECK FOR D.PROC FATAL ERROR OR DMOT ENTRY RSOUEST «»» 



BIT #CN.ERR,RLL %JTEST U . RAMD 

BIT #DMODE,RLL 7.JNZR0 U.UERD 

MOV\F #SOI . 1SL0BYT.UBAR 54JNZRO U.IOLC 

8IS #SOI . 18.HIBYT, UBAR. BAR 



I16K1IF FATAL CONTROLLER ERROR 
[16K1THEN GO TREAT IT 

[16K1IP IN DM MODE THeN SKIP CNTRL BLK 
[ 1 6K]UBAR=AD0RESS OF SDI.1 



PERFORM SEEK ORDERING/CHECK SDI STATUS WORDS FOR D.PROC REOUESTS «»» 
AT U.IOLB. BARsUBAR 



001545 






U . IDLB: ASSUME 


001545 


033701 


000003 


10000 


MOV 


0O1546 


1 14541 


OO00O1 


010000 


BIT 


0O1S47 


010545 


0170S4 


1 1 1554 


ADD 


001550 


033700 


000003 


000000 


MOV 


00 1 55 1 


033747 


O10017 


01 1554 


MOV 


001552 


1 14541 


OOO030 


122313 


BIT 


001S53 


010545 


007000 


125574 


ADD 


0O15S4 


013740 


007030 


125623 10$ 


MOV 


001555 


014541 


OOOOOI 


133766 


BIT 


001556 


O13740 


OO7030 


135577 


MOV 


001557 


106545 


0OO003 


010000 


XOR 


001560 


O0S640 


000335 


oooooo 


XOR 


001561 


030545 


017120 


001 54S 


AOD 
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SDI .ST.EO.O 

(BUF ) ,R1 ; 

#0ATT,R1 i 

#<SDI.AT+P.OPCD>,UBAR\N.BAR %JZRO 

(BUF) , RO 

#0P.ATT,R7 %JNZRO 10$ 

#ORVOL*DRAVL . R1 7.CALL U.ATTN 

#SDI .ST,UBAR\N,BAR 7.CALL S.LDR1 

»CMDCOF,BAR 7.CALL S . STUB 

#PK1P,R1 7.CALL U.CSDI 

#CMDCOF,BAR 7.CALL S.LOUB 

#SDI . 48HIBYT, UBAR.O 

#SDI . 4*L0BYT,0 

#SOIB . L , UBAR , BAR 7.JNZR0 U.IDLB 

: 48 . 97 



R1 = SOI CTL BLK STATUS 

SEE IF LOWER REPORTED ATTN 

10$ ; IF NOT, SKIP ATTN PROC 

GET OPCODE WD OF INTERNAL MSCP PKT 

IF SET UP, SKIP ATTN PROC 

OUEUE INTERNAL ATTN PACKET 

R1:S0I CONTROL BLK STATUS 

SAVE UBAR 

GO CHECK IF PACKET IN PROGRESS 

RESTORE UBAR 

ARE WE AT THe LAST SOI CTL BLK? 

IF NOT, LOOP 'TIL WE ARE 
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CHECK FOR RESPONSES TO SENO TO HOST »«* 



001 562 
001 553 



Ol 3740 
034442 



007204 
10002 



125573 
001627 



MOV 


#HSTOUE 


BAR 


-.CALL 


S . LDRO 


CLR 


R2 




%JNZRO 


U SEND 



001564 114544 000020 1 35402 U.IDLO: 



OOI 565 
00 156 6 
001 567 
001570 
001571 



013740 
031443 
133743 
013740 
013440 



007176 
10O03 
000224 
007176 
003003 



125576 
001571 
121603 
010000 

1 1 1537 



CHECK FOR DM XFC SERVICE REOUIRED «»» 
BIT #DXFC,RLL %CALL U.XFCP 

CHECK FOR ONE SECOND INTERVAL *** 
#TMR.BS .BAR 



MOV 

DEC R3 

MOV #SEC0N0,R3 

MOV #TMR.BS,BAR 

MOV R3,BUF 



•'.CALL S.L0R3 
7.JNZR0 10S 
7.CALL U.TIMR 



RO=C0NTROLLER->H0ST OUE HEAD 
IF NEO THEN PKTS TO SEND 



IF D.PROC XFC SERVICE REOUIRED 



R3=C0NTR0LLER TIMER 

IF TIMERsO THEN CHK SOI TIMERS 

AND RESET TIMER 

STORE NEW TIMER VALUE 3 LOOP 



CHK; [E12II 
IE121 ] 
[E121 1 
IE121 ] 
IE121 ] 
[E121 1 
[E121 1 
[E121 ] 
(E121 ] 
IE121 1 
[E121 1 
[E121 ] 
IE121 1 
IE121 1 
1EI21 1 
[EI21 1 
I E121 1 
IEI21 I 
IE121 ] 
[E121 ] 



IE121 ! 
[EI21 ] 

[E121 1 
IE121 1 
[E121 1 



u^' 
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ROUTINE NAME: 



FUNCTIONAL DESCRIPTION: 

THIS ROUTINE SETS UP THE POINTER TO THE PTE CACHE IN EACH 
SOI CONTROL BLOCK. 



G 



c 



00 1 572 


033741 


0003 1 7 


oooooo 


U 


CINT: 


MOV 


#STCACH«LOBYT, R1 


OOI573 


133541 


000066 


125522 






BIS 


#STCACHSHI8YT, R1 'iCALL S.S0I1 


001S74 


010545 


007 101 


000000 


U 


CINt : 


ADO 


#MAP .CH,U8AR\N,BAR 


001575 


013440 


003001 


1O0OO 






MOV 


R1 , BUF 


001576 


O3054 1 


000104 


010000 






ADD 


#<MEMS2»2> , R1 


001577 


030545 


000120 


135532 






AOD 


OSOIB. L , UBAR '/.CALL S.FBC1 


OOl 600 


0361 40 


OOOOOS 


10000 






XOR 


UBAR.RO 


OOl 60 1 


01 3440 


010000 


001574 






NOP 


T.JNZRO U.CIN1 


OOl 602 


013440 


000000 


127777 






NOP 


%RET 



[9DA1GET START OF CACHE AREA LO PORTION 

[0DA1SET IN HI AO DRESS / UBAR = ADDR FIRST SOI 

[Q0A1P0INT TO CACHE PTR 

[OOA1ST0RE PTR 

[0DA1P0INT TO NEXT CACHE AREA 

I0DA1P0INT TO NEXT SDI CONTROL BLOCK 

(0DA1CHECK FOR END 

[OOAHOOP TILL DONE 

[QDA1RETURN 
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ROUTINE NAME: 

U.TIMR (U PROCESSOR TIMER ROUTINE) 
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FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL MAINTAIN ANO UPDATE ACTIVE SOI CONTROL BLOCK 
TIMERS AND THE MASTER MSCP TIMER. 



ENTERED EVERY 1 SECOND 



OUTPUTS: 

UPDATED SDI CONTROL BLOCK TIMERS 
UPDATEO HOST MSCP TIMER' 



UPOATE SDI INTERCONNECT TIMERS IF ACTIVE ««> 



001603 


033742 


000004 


135522 


U 


TIMR: 


MOV 


#NSOI ,R2 


"-'.CALL 


S 


SO I 1 


001604 


0037OO 


0000 1 4 


OOOOOO 






MOV 


(UCRS) ,9 








001605 


005640 


000377 


125473 






BIC 


#377,0 


XCALL 


P 


LOCK 


001 606 


1 14544 


OOOIOO 


01O0OO 






BIT 


KDMODE, RLL 








001 607 


106640 


014020 


015474 






XOR 


#LED1 ,0, UCRD 


7.JN2R0 


UNLOCK 


OOl 6 10 


010545 


007004 


135614 


u 


TMRA : 


ADD 


#SDI . TM,UBAR\N 


BAR ".CALL S . DEC 


001 6 1 1 


031442 


000002 


OOOOOO 






DEC 


R2 








OOl 6 12 


030545 


010120 


116 10 






ADD 


#SDIB. L ,UBAR 


%JNZRO 


U 


TMRA 


OOl 6 13 


133544 


000200 


OIOOOO 






BIS 


»PLOCK,RLL 








OOl 6 14 


013740 


007 1 74 


135573 






MOV 


#TMR.MC, BAR 


'/.CALL 


S 


LDRO 


0O1615 


031460 


10000 


04561 6 






DEC\T 


RO 


7.JN2R0 


s 


STRO 


001 61 6 


033747 


OOOOI 1 


131 622 






MOV 


#ER.HT0,R7 


"iCALL 


u 


HTMO 


001 617 


105660 


01 4010 


1 67777 






BIC\T 


#DRINIT,0, UCRD 


XRZRO 






001 620 


1 14640 


00O01O 


OOOOOO 






BIT 


#DRINIT,0 








00162 1 


105640 


014O1O 


102071 






BIC 


#DRINIT,0, UCRD 


%JZRO 


u 


UERR 












* * * 


ROUTINE 


TO RESET HOST TIMEOUT 


USES R1 


OOl 622 


01 3740 


007200 


1 25574 


u 


HTMO: 


MOV 


#HOSTMO,BAR 


'/.CALL 


S 


LDR1 


001 623 


Ol 3740 


007 1 74 


105620 






MOV 


#TMR . MC, BAR 


'/.J MP 


s 


STR1 












*** 


RING POLL TIMER VALUE »■*«' 






1 120OO 




• 




SECOND 


:: 112000 









■1ST SDI PTR 



R2:S0I BLK CNT/UBAR: 
Q»LED REG 
GeT RID OF FLOATING BITS FROM UCRS / 

UBARsPTR TO SDI CNTL BLK TIMER 

I I6K] IF IN DM MODE 

[16K] THEN FLIP/FLOP LED 8 RETURN ;[6 

BAR:UBAR/GO DECR TIMER 

DECR COUNTER 

IF COUNTER NEO THEN LOOP 

[ 16K1RELEASE D . PROC 

BARsMSCP TIMER PTR/RO=TIMER 

IF TIMER NEO THEN DECR AND UPDATE 

R7=H0ST TIMEOUT ERROR/RESET TMR . MC 

I16K1IF HOST TIMEOUT EO O THEN DON'T 

[16K1IF ORINIT CLEAR 

|16K] THEN FATAL ERROR AND GO AVAILABLE 



R1=H0ST TIME OUT (OsNO TIMEOUT) 
RESET HOST TIMER/RETURN 



APPROXIMATE ONE SECOND VALUE 

U.PROC RAM DUMP ROUTINE - ENTERED FROM U . RAMX WHEN "TEST" CONDITION IS TRUE 
THE ROUTINE WILL START AT RAM LOCATION ZERO AND LOAD EACH WORO OF THE 1 6K RAM 



: IE12I i 



001624 


034445 


007OO5 


010000 


U . RAMO : 


CLR 


UBAR, UBAR, BAR 






0O1625 


013705 


050003 


111541 


URAMDA: 


MOV 


IBUF) ,UBAR\N 


%JNTEST 


U. RAMX 


0O1626 


130445 


007005 


101625 




INC 


UBAR, UBAR, BAR 


'/.JMP 


URAMDA 



[16K1CLEAR UBAR, LOAD BAR 

[1SKIPUT RAM CONTENTS ON BUS/JMP BACK IF DONE 

[16K1INCR UBAR. LOAD BAR, LOOP 
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.SBTTL UNIBUS/9-BUS PORT ROUTINES 

; + 
ROUTINE NAME: 

U.SENO (SENO CONTROLLER MSCP PACKET TO HOST RESPONSE R I NG ) 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL 00 THE FOLLOWING: 

1. CALCULATE RESPONSE RING ADDRESS 

2. DETERMINE IF THE HOST HAS A RESPONSE BUFFER AVAILABLE 

3. IF SO, THEN TRANSFER THE MSCP PACKET TO THE HOST 

4. UPDATE THE HOST RESPONSE RING POINTER (IF TRANSFER DONE) 
NOTE THAT ALL OF THE POSSIBLE CONTROLLER TO HOST PACKETS ('END' 

AND, 'ATTENTION') ARE SENT USING THIS MECHAN ISM, I . E . , 

THE PACKET IS ENTERED ON THE CONTROLLER TO HOST QUEUE 'HSTOUE'. 



o 



R2 
CRI 

HSTOUE 



= O 

SYSTEM STATUS WORD 

CONTROLLER -> HOST RESPONSE/MESSAGE OUEUE HEAD 



OUTPUTS: 
ALL 



U.PROC REGISTERS ARE USED 



01627 


03374S 


000020 


131737 


U .SEND : 


MOV 


01630 










ASSUME 


Ol 630 


013440 


O300OO 


OOI S64 




NOP 



CALCULATE HOST RESPONSE 



#RSPLEN,UBAR 
OWN, EQ, BIT IS 



RING ADDRESS * 

"/.CALL U.RCSR 
%JNMSB U . IOLD 
READ LO CSR ENTRY FOR MSCP RESPONSE BUFFER ADDRESS «»* 



GO READ RESPONSE CSR REGS 
MAKE SURE OWN IS MSB 
IF NO BUFR THEN RETURN 



001 631 

001 632 



00 1 633 

001 634 
001635 



033745 
033446 



033701 

1 1 454 1 
033740 



0O0022 

000007 



000014 
OOOOIO 
010060 



001636 013740 O07204 



001637 
OOI 640 



003740 
01 3740 



000004 
007025 



121746 
000000 



OIOOOO 
OIOOOO 

131 622 



000000 
132003 



MOV 
MOV 



#RSPCOF,UBAR 
R7, IUAR 



•/.CALL U.RCSB 



RESET MSCP HOST TIMER **» 



MOV 
BIT 
MOV 



(UCRS) , R1 
#DRINIT, R1 
VMCP. LN»2.R0 



7.CZR0 

GET PACKET ADDRESS IN RIO *** 
MOV #HSTQUE,BAR 7.CALL 



(16K]G0 GET BUFR ADDR IN R7 
I 16K] IUAR:BUFR ADDR 



I16K]R1=UCR DATA 

[16K1IF NOT WAITING FOR DRIVES 
THEN RESET MSCP HOST TIMER 



RIOsRESPONSE PACKET ADDRESS 



SENO CONTROLLER RESPONSE PACKET TO THE HOST *** 



MOV #4,0 

MOV #RCSRW1,BAR "/.CALL 

DETERMINE PACKET LENGTH *«» 



( 16KIQ=4 

[16K!BAR=PTR TO RSP CSRW1/G0 ADJUST PKT AODRESS 
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001641 


010550 


007006 


125575 




ADO 


001642 


014542 


000060 


010000 




BIT 


001643 


033760 


010040 


051664 




MOV\T 


001 644 


01 6550 


000304 


OIOOOO 




XOR 


001 645 


01 4S42 


O102OO 


01 1664 




BIT 


001 646 


01 3740 


0171S4 


135573 




MOV 


OOI 647 


033445 


007010 


135574 


U.SNOA: 


MOV 
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#P . QPCO.RIOVN.BAR %CALL S.L0R2 



rHIOMSK, R2 
#MCP . 10*2, RO 
#LOGPKT, R10\N 
#0P. END, R2 
#LOGLEN,BAR 
R10.UBAR.BAR 



7..JNZR0 U.SNDB 



7.JNZR0 
XCZRO 

7.CALL 



SNOB 
. LDRO 
. LDR1 
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R2=END PACKET OP CODE 

IF I/O COMMAND 

THEN WRITE SMALLER PACKET 

IF PKT NEO LOGPKT 

IF EO LOG OR ATTN 

THEN GET RO FROM LOGLEN 

RI'PKT STATUS & LINK WORD 



PUT LENGTH IN PACKET, SAVE STATUS AND LINK WORD **» 



O016S0 

001 651 

001 652 

001 653 



001654 
001655 
001656 
001657 
001 660 



001661 
001662 
001662 
001663 



001 664 

001 665 

001 666 
001667 
OOI 670 
001671 
0O1672 
001673 
001674 



013440 
013740 
05O54O 
033767 



013740 
033747 
013440 
01344O 
013740 



003000 
007152 
000004 
010002 



007152 
007204 
007001 
007007 
017020 



033745 000025 



003740 
013440 



013740 
033743 
112141 
033463 
131141 
010550 
03S541 
130141 
013440 



030002 
OOOOOO 



007142 
lOO 16 
00O003 
02000 1 
000003 
007O0 1 
000017 
OO0003 
OOOOOO 



OOOOOO 
125620 
126242 
052071 



125573 
135574 
135616 
123713 
131675 



122013 

1 1 1562 



125574 
1 1 1 647 
OIOOOO 
141670 
135620 
125S74 
OIOOOO 
125620 
1 01 647 



MOV 
MOV 

ADD\R 
MOV\T 



RO, BUF 
#OUESAV,BAR 
#P*2,R0 
#ER. PWR, R7 



"/.CALL 
•/.CALL 
7.JNZR0 



S .STR1 
UNB .WR 
U. UERR 



PUT LENGTH*2 IN PACKET ( BYTES ) 
SAVE STATUS AND LINK WORD 
GO SEND PACKET TO HOST 
IF ERROR THEN FATAL 



DEQUEUE PACKET AND CHECK IF CONTROLLER -> HOST OUEUE EMPTY «»» 



MOV 


#QUESAV 


BAR 


MOV 


#HSTQUE 


R7.BAR 


MOV 


R1 , BAR 




MOV 


R7, BAR 




MOV 


#RSPLEN 


BAR 



"/.CALL S.LORO 

"/.CALL S.LDR1 

"/.CALL S.STRO 

"/.CALL U.ULNK 

XCZRO U.RECV 



RO=PKT STATUS « LINK WORD 
RliPKT STATUS 4 LINK WORD 
RESTORE STATUS AND LINK WORD 
GET NEXT PKT FROM HOST OUEUE 
IF EO THEN CLR SEND PKT FLAG 



t CHECK COMMAND RIN 



UPDATE HOST CSR WORDS, UPDATE RING POINTER, CHECK FOR INTERRUPT 



MOV #RCSRW1,USAR "/.CALL U . UCSR 

ASSUME 0WN.E0.BIT1S 

MOV #RSPO,Q 7.CMSB U.INTI 

NOP 7.JMP U. IOLC 



[16K1COMM0N ROUTINE TO UPDATE RING CSR 
MAKE SURE OWN IS MSB 
IF OWN EO 1 THEN GEN INTERRUPT 
ELSE LOOK FOR MORE TO SEND 



SET CONTROLLER COMMANO LIMIT - INCREMENTALLY **» 



MOV 


#CLIMIT,BAR "/.CALL 


S 


L0R1 


MOV 


#14 . ,R3 7.JZR0 


U 


SNDA 


CMP 


R3, R1 






MOV\T 


Rl , R3 %TCRY 






SUB 


R3.R1 "/.CALL 


S 


STR1 


ADD 


#P . VCID , R10\N,BAR 7.CALL 


s 


LDR1 


BIC 


#L0NIB , Rl 






AODC 


R3.R1 7.CALL 


s 


STR1 


NOP 


7.JMP 


u 


SNDA 


OR 


#CMDL IMtl ,R1 ,BUF "".J MP 


u 


SNDA 



[ 1 6K1R1 sCOMMAND L IMIT 

I16KJIF EO O THEN CONTINUE 

[16K1IF R3I14) LT R1ICMD LIM) 

[16K] THEN R3:REMAINDER 

[ 1 6K1R1 iREMNANT/RESET CLIMIT 

R1=VIRTUAL CIRCUIT 10 

ISOLATE LD NIBBLE 

[ 1 6K1R1 =R1+R3+1/RESET P. VCID 

I 16K1C0NTINUE 

(16KJSET IN COMMAND LIMIT/CONTINUE 



i r "~' 
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001 703 
001704 



O017OS 
KDBUP 



ROUTINE NAME: 

U.RECV (RECEIVE MSCP COMMAND ROUTINE) 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE PERFORMS THE FOLLOWING FUNCTIONS: 

1. RETURNS IF NO PACKETS ARE AVAILABLE 

2. FINISHES CALCULATING THE CURRENT RING ENTRY AODRESS 

3. SETS IUAR AND CR WITH THE PROPER UNIBUS ADDRESS 

4. READS 1ST TWO WOROS OF THE CSR DESCRIPTOR INTO R7 AND RIO 

4. CHECKS THE 'OWN' BIT OF THE CSR DESCRIPTOR 

5. IF 'OWN' IS NOT SET 

THEN RETURN WITH NO RING ACTION PERFORMED 
ELSE 

A. RESET THE MSCP ACTIVITY TIMER 

B. CLEAR THE MSCP TIMEOUT FLAG IN THE CONTROLLER STATUS WORD 

C. READ THE MSCP PACKET INTO THE BUFFER 

D. GO TO 1 . ABOVE 

INPUTS : 

BAR ■- RSPLEN 

OUTPUTS : 

PACKET REAO INTO CONTROLLER RAM 

<«* CALCULATE COMMAND RING ENTRY ADDRESS *»* 



001 675 


033702 


000014 


010000 


U . RECV : 


MOV 


001 676 


1 14542 


ooooto 


010000 




BIT 


001677 


033722 


010003 


172005 




MOV\T 


00 1700 


070142 


010002 


027777 




ADDVL 


O01 701 


003740 


1 1 6220 


056235 




MOV\F 


O017O2 


003640 


006001 


010000 




BIS 



(UCRS) , R2 

#DRINIT, R2 

(BUFI.R2 %C2R0 U.GPKT 

R2.R2 %RN2R0 

#<B . NRTY+B . LED> ,0. BREG SJSTOP BI 

#<B . NABO> , 0, BREG 



READ COMMAND HI CSR ENTRY »» 



03374S 0OO026 131737 



MOV 
ASSUME 



#CMDLEN, UBAR 
OWN, EO, BIT 15 



%CALL U.RCSR 



[ 1 6K]R2:UCR DATA 

(1BK1IF DRIVES NOT STILL INITING 

THEN R2=RESP0NSE LEN/GET PACKET 
IF NO PKT AVAILABLE THEN RETURN 
STO ; [BOA] CLR POLL BIT NOW TO 
[3DA] PREVENT CONTINUOUS POLLING 



[16K1G0 READ HI CSR REGS TO R7 
MAKE SURE OWN IS MSB 



; [E121 ] 
: [E121 ] 



001704 013440 03OO00 037777 



001705 033745 00O030 121746 



(BDAI MAKE SURE SA STILL 2ER0 



000007 132005 
KDB50. MICROCODE . 



; *«* RESET MSCP HOST TIMER *** 

NOP 7.RNMSB 

I «** READ LO CSR ENTRY FOR MSCP COMMANO ADORESS **• 

MOV #CMDCOF,UBAR %CALL U.RCSB ; [16K1G0 GET CMO ADDR IN R7 

; *** REAO MSCP PACKET INTO FREE BUFFER «»* 

MOV R7.IUAR %CALL U.GPKT ; I16K1SET UP UNIBUS AOOR/GET PKT ADDR 

, 22-APR- 1938 11:16:48.97 
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001707 113740 003200 131622 



001710 
00171 1 
0O171 1 
001712 

00171 3 

001 71 4 

001 71 5 

001 7 1 6 



001717 
001720 



001721 
001722 
0O1723 
001723 
001724 



003740 000004 000000 



033445 
013740 
033740 
033767 
O10550 
013740 



131540 
034441 



013740 
033745 



003740 

013740 



000010 
O07033 
00O024 
010006 
007000 
007264 



000014 
030001 



007046 
000033 



030004 
007046 



OOOOOO 
122003 
135635 
042071 
125573 
12561 6 



OOOOOO 
1 1 1735 



135626 
131755 



1 22013 
135602 
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INDICATE ENTRY IN USE/RESET HOST TIMEOUT 



«»* EXTRACT MSCP MSG LENGTH FROM PACKET HEADER **« 



[ rae02! 



MOV 

ASSUME 

MOV 

MOV 

MOV 

MOV\T 

ADD 

MOV 



#4,0 

UO. CNT, EO, 
RIO, UBAR 
#CCSRW1 , BAR 
#MCP . RD+2 , RO 
#ER , RRD , R7 



7.CALL 
%CALL 
7.JNZR0 



U SADX 
UNB.RD 
U . UERR 



#UQ. CNT , R10\N, BAR %CALL S.LDRO 
#MSCPLN,BAR %CALL S . STRO 



msglen adr : -4 bytes [rae02] 

which is the offset of the length word; [E12I] 

UBAR i PKT Adrs Irae02] ;[E12U 

8AR=CSRW1 adrs/adjust src adrs I rae02 ] ; [ E 1 2 1 ] 

read packet from host [rae02] ;[E121] 

if error then FATAL [mjtoil 

get count [rae02] 

and save it [rae02J 



Check the msg length for 

SUB #14, RO 
CLR R1 



i n intum size 



must be at least 14 
if not then error 



[ rae02 ] 



Irae021 
[rae02! 



WRITE UPDATED CSR AND CHECK IF INTERRUPT NEEDED *•* 



MOV #TEMP1,BAR 

MOV #CCSRW1 , UBAR 

ASSUME 0WN.E0.BIT1S 

MOV #CMD0,0 

MOV #TEMP1 , BAR 



7.CALL 
•/.CALL 



%CMSB 
%CALL 



S. ST10 
U UCSR 



U . INT I 
S . LD10 



SAVE RIO AROUND CALL TO U-UCSR 
[16K1USE COMMON ROUTINE TO UPDATE CSR 
MAKE SURE OWN IS MSB 

SEND INTERRUPT TO HOST IF REOUIREO 
RESTORE PACKET ADORESS TO RIO 



OO 1 7 2 5 


010550 


00700S 


122240 


ADD 


001726 


033761 


010003 


051735 


MOV\T 


001727 


010550 


007006 


12S573 


ADD 


OOI 730 


Ol 5540 


000377 


010000 


BIC 


001731 


033761 


010004 


041 735 


MOV\T 


001732 


010550 


0O7001 


135573 


ADD 


00(733 


035540 


003017 


122166 


BIC 


001734 


013740 


007020 


1 1 1 675 


MOV 


001735 


013440 


000600 


132506 U.RCVE: NOP 


001736 


013740 


0O702O 


1 1 1675 


MOV 



DO PRELIMINARY PROCESSING OF MSCP PACKET 
Verify the reserved fields common to all 

#P .RS03,R10\N. BAR %CALL S.TST 

#<P.RS03-P> , R1 V.JNZRO U.RCVE 

#P.0PCD,RI0\N , BAR %CALL S.LDRO 

#L0BYT.RO\N 

#<P . OPCD-P> , R1 V.JNZRO U.RCVE 

#P. VCID,R10\N , BAR "ACALL S.LDRO 
#L0NIB,RO, BUF %CALL U.OPCD 
#RSPLEN,BAR %JMP U.RECV 



opcodes *»« 

test reserved word 3 

if bad declare in error 

test hi byte of op code 

if bad declare in error 



[ rae02 J 
(rae02) 
(rae02) 
[ rae02 ] 
Irae02] 



URUPF 
#RSPLEN,BAR 



%CALL 
%JMP 



U . CMOA 
U RECV 



( I6K)R0:VIRT CIR ID 

(16K12AP CREDIT FIELO/GO CHECK OP CODE 

GO CHECK NEXT CSR 

error detected in MSCP format [rae02] 

reset UPF becuase U.OPCD does irae02] 



go process error 
GO CHECK NEXT CSR 



Irae021 
[rae02 1 
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ROUTINE NAME: 

U.RCSR (READ CSR REGISTERS) 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL READ THE CSR REGISTER POINTED TO 
BV IUAR INTO THE WORO POINTED TO By UBAR AND BAR. 
ENTER AT U.RCSR WITH UBARixxxLEN TO READ HI CSR. 
ENTER AT U.RCSB WITH UBAR.XXxCOF TO READ LO CSR. 



; IE1 21 I 
: [EI21 ] 

I [E121 1 

: [E12I 1 



b 



INPUTS : 

UBAR 
R2 



AOORESS OF CSR SAVE AREA 
FOR RESPONSE RING OR 
NUMBER OF BVTES IN RESPONSE 



RING FOR COMMAND RING 



OUTPUTS : 

R7 CSR WORD WITH 'OWN' AND 'FLAG' BITS 

CONDITION CODES SET BV R7 (OWN IS MSB) 

NOTE: READING THE CSR ONE WORD AT A TIME IS OUMB, BUT IT IS THE 
ONLV WAY TO PREVENT RACE CONDITIONS IF THE CSR IS NOT LONGWORD 
ALIGNED. TRUST ME. 



I E 1 2 1 I 
IE121 I 
(El 21 1 



CALCULATE OFFSETS, ETC 



001737 
001740 
00174 1 
001742 
001743 
001743 
001743 
001744 
00174S 



001747 
001750 
001 75 1 
001752 



00 1 753 
001754 



12044S 
120445 
033461 
013440 



03 1 440 
12044S 
030540 



007005 
007005 
OIOOOO 
0O7OO5 



OOOOOt 
0O7005 
000002 



125574 
135573 
051742 
131753 



131753 
135S73 
101747 



001745 013440 007005 12S573 U.RCSB: 



030545 
033740 

I 1 1555 
033747 



0701 40 
030140 



000002 
00000 1 
Ol 70O1 

000006 



oooooo 

000002 



131777 
125635 
145601 

10207 1 



OOOOOO 
10561 B 



: * * * 

U STOP: 



INC 

INC 

MOV\T 

MOV 

ASSUME 

ASSUME 

DEC 

INC 

ADD 



UBAR\0, UBAR, BAR '/.CALL 
UBAR\0, UBAR, BAR 7.CALL 



RO.R1 
UBAR, BAR 



7.TNZR0 
'/.CALL 



S . LDR1 
S. LDRO 



CMDP0FB17, EQ, < CMOCOFS 1 7> ♦ 1 

RSPP0F«n,EO,<RSPC0Fai7>+l 
R1.R0 7.CALL 

UBARNO, UBAR. BAR 7.CALL 
#2,R0 %JMP 



.STOP 
. LDRO 
.RCSC 



R1SMAX LENGTH VALUE 

ROsCURRENT RING PTR 

IF RO NEO O THEN RECURRENT PTR 

CALCULATE S SAVE CURRENT OFFSET 

MAKE SURE AUTO INCR WILL WORK 

MAKE SURE AUTO INCR WILL WORK 

CALCULATE « SAVE PREVIOUS OFFSET 

ROsCURRENT OFFSET 

I16K1AD0 2 (BVTES) TO GET HI CSR 



UBAR POINTS AT RSP/CMD-COF 



MOV UBAR, BAR %CALL S.LDRO ; { 1 6K 1 RO: CURRENT OFFSET 

UBAR POINTS AT RSP/CMD-POF, ADD 2 FOR C/R-CSRW1. ROsOFFSET «»« 



AOD #2, UBAR 

MOV #1 , RO 

SUB\T #1 , UBAR\N, BAR 

MOV #ER.RRD,R7 



7.CALL 


U . GTAD 


7.CALL 


UNB . RD 


7.J2R0 


S . L0R7 


%JMP 


U . UERR 



ROUTINE TO CALCULATE AND STORE OFFSET *** 
7.JMP S.STRO ; 



ADD\L 
ADD 



RO. RO 
R2.R0 



(16K1G0 CALCULATE CSR ENTRY ADDRESS 
[16KIREAD CSR WORD INTO TEMP STORAGE 
I 16K]R7:CSR WORO 
I16K1IF ERROR THEN FATAL 



RO;4*RSPPTR (CURRENT) 

AOD IN EXTRA OFFSET/STORE/RETURN 
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ROUTINE NAME: 
U. UCSR 



(UPDATE HOST CSR'S) 



FUNCTIONAL DESCRIPTION: 

DEPOSITS THE UPDATED HOST CSR BACK IN THE RING BUFFER AND 
DETERMINES IF AN INTERRUPT IS REQUIRED. USED FOR BOTH THE 
COMMAND AND RESPONSE RINGS. 



INPUTS : 

USAR -• 



> RING CONTROL AREA (CCSRW1 OR RCSRW1) 



OUTPUTS : 

CONDITION CODES ARE NEGATIVE ( OWN = B I T 1 5 ) IF INTERRUPT REQUIRED 
HOST CSR'S UPDATED 



FIRST UPDATE RING POINTER *** 



001 755 
O01756 
001757 
001760 
001761 
001762 
001763 
001764 
001765 
00 176 6 
001767 
001770 
OOI 77 1 
001772 
001773 
001774 
001775 
001776 



1 1 1545 
1 1 154S 
011141 
037760 
130440 
1 1 1545 
030540 
013440 
135547 
1 13547 
033740 
033767 
I 14S47 
I 1 1545 
033740 
133740 
13 1545 
0337O0 



007005 
007OO4 
OOOOOO 
010000 
OOOOOO 
007003 
000002 
007005 
000200 
003100 
00000 1 
010007 
0OO100 
017006 
00000 1 
010200 
007003 
OOO003 



125574 
125573 
OOOOOO 
151761 
135616 
135573 
010000 
125601 
01OOOO 
121777 
136242 
052071 
0100OO 
167777 
135610 
127777 
01OOOO 
101745 



SUB 


#<RCSRW1-RSPLEN>,UBAR\N,BAR7.CALL S.L0R1 


SUB 


#<RCSRW1 -RSPPTR> ,UBAR\N,BAR %CALL S.LDRO 


SUBC 


RO, R1 \N 




C0M\T 


#O,R0 %T2R0 




INC 


RO '/.CALL 


S.STRO 


SUB 


#RCSRW1 -RSPCOF, UBAR\N, BAR %CALL 


S . LDRO 


AOD 


#2.R0 




MOV 


UBAR, BAR '/.CALL 


S . LDR7 


BIC 


#DWN,R7 




BIS 


#FLAG,R7\N,BUF %CALL 


U . GTAD 


MOV 


#1,R0 %CALL 


UNB .WR 


M0V\T 


#ER.RWR,R7 %JNZRO 


U . UERR 


BIT 


#FLAG,R7 




SUB\F 


#<RCSRW1+1 -RSPLEN> , UBAR\N , BAR 7.RZR0 


MOV 


*1,R0 XCALL 


S . XORO 


MOV 


#0WN,RO 7.RZR0 




SUB 


#<RCSRW1+1-RSPP0F>, UBAR, BAR 




MOV 


(BUF).RO %JMP 


U.RCSA 



[16K]R1:RING LENGTH 

116K1R0:RING POINTER 

SUB PTR VALUE FROM LENGTH 

IF EQ THEN R0=-1 

RO=RO*t/RESET POINTER 

[ 16KIR0=CURRENT CSR ENTRY OFFSET 

[16KJA0JUST RO TO POINT AT HI CSR 

( 16K]R7:CSR WORD 1 

CLEAR OWN BIT 

SET FLAG/CALCULATE CSR ENTRY ADDR 

(16K1WRITE UPDATED CSR 

IF ERROR THE FATAL 

IF HOST DOES NOT WANT INTERRUPTS 

IEC0#21 THEN EXIT 

IF RING LENGTH EQ 1 

THEN RETURN AND FORCE INTERRUPT 
tEC0#2]BAR:PTR TO PREVIOUS RING ENTRY OFFS 
RO'PREVIOUS RING ENTRY OFFSET 
CO CHECK IT AND RETURN OWN BIT 



* w 
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ROUTINE NAME: 

U.GTAO (GET CSR ADDRESS) 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL CALCULATE THE CSR ADDRESS GIVEN THE OFFSET OF 
THE CSR ENTRV IN RO . 



RO 
OUTPUTS : 



OFFSET OF DESIREO CSR ENTRV 



001777 013740 

002000 013740 

00200 1 1 3044 1 

002002 030146 



007 1 62 


13S574 


U 


GTAD : 


MOV 


ORNGBSH 


BAR 


'.CALL 


S LDR1 


007 1 60 


12S600 






MOV 


VRNGBSL 


BAR 


7.CALL 


S. LOIU 


00000 1 


000000 






INC 


R 1 








000000 


1 1 5540 






AOD 


RO , IUAR 




%JMP 


S . AXAB 



Rl sADDR BITS 16 ANO 17 

IUARsLO ORDER AODRESS OF 
INCR Rl 

SET EXT ADOR BITS/RETURN 
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ROUTINE NAME: 

U.SADO (SUBTRACT O FROM AOORESS IN IUAR ANO RIIRESET CR ) ) 

U.SADX (SUBTRACT FROM ADDRESS IN IUAR AND RIIRESET CR). MOV R7 TO Rl) 

FUNCTIONAL DESCRIPTION: 

THESE ROUTINES WILL SUBTRACT THE VALUE IN THE O REGISTER FROM 
THE UNIBUS ADDRESS REGISTER IMAGE (IUAR) AND ADJUST THE EXTENDED 
ADDRESS BITS IN Rl AS REOUIREO. 



INPUTS : 




BAR 



VALUE TO SUBTRACT FROM IUAR 
POINTER TO EXTENDED ADDRESS 



OUTPUTS : 

IUAR.UAR : IUAR - O 

POSSIBLV Rl AND CR UPDATED FOR EXTENDED ADDRESS BIT CHANCE 



002003 
002004 



033701 
132046 



000003 
000006 



010000 
I0S54O 



O 
< 

3 

o 

II 

s 

cc 
O 



U.SADX : 
U SADO: 



MOV 
RSUB 



(BUF ) . Rl 
O. IUAR 



: [ 1 6KJR1 sEXTENOEO ADDR BITS 
S.AXAB ; IUAR. UAR: IUAR-0 



CO 
CJ 

to 



c 



KDB50. MICROCODE. . 22 -APR- 19 38 1 1 : 16:48. 97 



KDBUP 
UNIBUS/O-BUS 



DIGITAL EOUIPMENT CORP. 
PORT ROUTINES 



2301 ASSEMBLER VERSION 32 



ROUTINE NAME: 

U.GPKT (GET MSCP PACKET FROM FREE POOL) 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL ATTEMPT TO OBTAIN A MSCP PACKET FROM 
THE MSCP PACKET POOL. IP SUCCESSFUL A ZERO CONDITION COOE WILL BE 
RETURNED AND RIO WILL CONTAIN THE ADDRESS OF THE PACKET OUE WORD 
I.E. THE STARTING PACKET ADDRESS MINUS 1. A NONZERO CONDITION CODE 
WILL BE RETURNED ON A FAILURE TO OBTAIN A BUFFER. 

INPUTS : 

NONE 

OUTPUTS: 

RIO ADDRESS OF PACKET (IP SUCCESSFUL) 

CONDITION CODE ZERO IF SUCCESSFUL 

CONDITION CODE NONZERO IF UNSUCCESSFUL 



3 



00200S 








U 


GPKT : 


ASSUME 


OO2005 


033750 


000352 


OIOOOO 






MOV 


OO20O6 


133S50 


000002 


1 1201 1 






BIS 


OO2007 


016550 


O10342 


167777 


U 


GPKA: 


XOR\F 


OO20 10 


033770 


017304 


155573 






MOV\T 


O020 1 1 


131550 


007032 


125573 


u 


GPKB : 


SUB 


0020 12 


1 14540 


000200 


1 12007 






BIT 



PKTEND8I ,EO,0 
#PKTEND8L0BYT,R1O 
#PKTEN08HIBYT,R10 %JMP 
#PKTBUF,RIO\N %RZRO 
#LOGPKT. R10, BAR XJZRO 
#MCP. LN+P, RIO, BAR %CALL 
#PSTAT,RO %JMP 



S . LDRO 
S. LDRO 

U . GPKA 



MAKE SURE PKTEND IS EVEN 
[ 1 6K1C0NTRUCT PKTEND 
[16KIR10=ENO ADDRESS OP POOL 

THEN RETURN/ELSE CHK FOR LAST PKT 
IF AT LAST PKT THEN RETURN VALUE OF LOG PKT 
ROsPACKET OUE WORD 
IF PKT STATUS EO FREE(O) 
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ROUTINE NAME: 

U.INTR (INTERRUPT HOST) 

U.INTI (WRITE A 1 AT <RING BASE ADDRESS - 0>) 

U.VAXP (VAX PURGE CHECK AND INTERRUPT ROUTINE) 



U.INTV (WRITE R1 AT <RINC BASE ADDRESS 
U.INTA DIAGNOSTIC ENTRY POINT 



0>] 



FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL GENERATE AN INTERRUPT IF THE VALUE IN 'INTVEC 
IS NONZERO. THE VALUE IN RO WILL BE ADOED IN TO THE VALUE IN 'INTVEC 
TO GIVE A FINAL ADORESS . IF 'INTVEC IS ZERO THEN NO INTERRUPTS WILL 
BE GENERATED. 

THE U.VAXP ROUTINE WILL CHECK THE VAX PURGE BIT AND IF SET 
WILL GENERATE AN INTERRUPT TO INTVEC. 

«*» NOTE THAT IF INTERRUPTS ARE DESIRED BV THE HOST, THIS ROUTINE 
»»« WILL WAIT FOREVER FOR UNIBUS INTERRUPT MASTERSHIP. «*» 

INPUTS : 

NEGATIVE OFFSET FROM RESPONSE RING BASE (TO WRITE 0) 

R1 VALUE TO WRITE AT ABOVE ADORESS (TO INDICATE WHAT KIND OF INTERRUPT) 

R7 POINTER TO BUFFER FROM WHICH UBAR CAN BE RESTORED (U.VAXP) 



OUTPUTS : 

WORD IN R1 WRITTEN TO RING BASE 
INTERRUPT GENERATED TO THE HOST 
0: NON ZERO - NO ERROR 

**» ZRO i O NO ERROR 



ADDRESS-0 (FOR U . I NT I , U . I NT V ) 

(IF 'INTVEC NONZERO) 

0: O ERROR, DID NOT RELEASE UNIBUS 

ZRO # O ERROR, DID NOT RELEASE UNIBUS 



UBAR 



SOI CONTROL BLOCK POINTER (U.VAXP - IF INTERRUPT GENERATED) 



ENTRY FOR COMMAND AND RESPONSE INTERRUPTS 
NEW NPR/INTR TRANSFER »«« 



002013 033741 



102015 U. INTI : MOV 



002014 013440 OOOOOO 127777 U.VAXP: 



ENTRY FOR VAX PURGE CHECK «** 



WRITE VALUE IN Rl TO <RING.BASE ADDRESS 



0O2015 
0O201 6 
0020 17 
002020 
00202 1 
002022 
002023 
002024 
002025 

KDBUP 



033745 
034440 
033740 
013440 
033767 
013740 
033702 
035542 
133S42 



0O7035 
OOOOOO 
000001 
OOOOOO 
010017 
007034 
000014 
000377 
004001 



135620 
121777 
122004 
136242 
042071 
OOOOOO 
1 OOOO 
OIOOOO 
OOOOOO 



MOV 


#ALOLMT, UBAR, BAR %CALL 


S STR1 


CLR 


RO 5SCALL 


U . GTAO 


MOV 


#1,R0 5SCALL 


U.SADO 


NOP 


%CALL 


UNB.WR 


MOV\T 


#ER. IWR.R7 7.JNZR0 


U.UERR 


MOV 


»FAILUR.BAR 




MOV 


(UCRS) , R2 




BIC 


#LOBYT , R2 




BIS 


#VAXINT.R2,UCR0 





Rl t 1 , GO WRITE WORD 



NO VAX PURGE FOR ODA/BOA [mjt02] 

0> *** 

STORE VALUE TO WRITE 

GET RING BASE ADDR IN IUAR AND R1 

GO SUBTRACT FROM RING BASE ADDRESS IN IUAR 

GO WRITE Rl TO AREA PRECEEDING RINGS 

IF ERROR THEN FATAL 

BARsLAST FAILURE ADDRESS 

IBOAmjtOS] SET BIT FOR biic4 goof 

[mjtosl Low byte MUST be cleared 

[mjt06] SET BIT FOR NONDIAGNOSTIC INTERRUPT 
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002026 013740 

002027 013440 



003010 
000000 



1 12030 
127777 



-r^ ; 






■$$ 002030 033740 

00203 1 013441 

002032 033742 



0OO10O 130313 
OOOOOI 000000 
010002 177777 



002033 033740 000 100 132050 



U . INTA 
U . INTR 
U . INTX 



MERR 
IS NO 



MOV 
NOP 



MOV 
TST 
MOV\F 



#ER. INT, BUP 

#BIUCSR, RO 
R1 
#BRIV5, R2 

#BIUCSR, RO 



%JMP 
%RET 



•/.CALL 


RDCMO 


7.R2RO 




%CALl 


XWRCMD 
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SAVE INTERRUPT FAILURE 

[BOA] FOR SOMETHING IN OLD UOA CODE 



IBDA] READ INTERRUPT REG 

[BOA] IS THE VECTOR = O? 

[BOA] RETURN IF ZERO. ELSE 

[BOA] LOAD BR LEVEL S FOR INTER 

[BOA] GO 00 INTERRUPT 



LOOKS AT THE EV CODE FOR INTERRUPT COMPLETE. 
ERR WHEN MERR IS SET IN THIS CASE 



THERE 



002034 013440 

002035 013740 



002036 013740 

002037 033740 



002040 
002041 

002042 
002043 
002044 
0O2045 
002046 
002047 



133742 
033740 

033702 
I 14S42 
035542 
I 14S44 
I35S42 
033740 



1 toooo 

146220 



006221 
000 lOO 



0000O2 
OOOIOO 

000014 
00000 1 
010377 
OOOIOO 
014001 
000362 



006237 

142034 



10000 
1 3031 3 



OOOOOO 
132050 

100O0 

O 10000 
177777 
O10O00 
027777 
1O0313 



NOP 
MOV\F 



%JSTOP 81 .STP 
#<B . NRTYtB. LED> , BREG 7.JNMERR 1$ 



[llljt06] IF STOP, EXIT 
WAIT FOR INTERRUPT, ELSE 

LOAD BREG WITH ABORT CMD 
LOAD BREG WITH NO ABORT CMO (to clear mer r ) 



MOV #<B .NRTY+B. LED+B . NABO> , BREG 

MOV #BIUCSR,RO XCALL RDCMO : [BOA] Get current interrupt 

BDA NOTE. IT WILL WAIT FOREVER FOR THE INTERRUPT TO COMPLETE. 



1 li. 



MOV 


#BRLV5R.R2 




MOV 


#BIUCSR,RO 


%CALL 
; JMP 


MOV 


(UCRS) ,R2 




BIT 


#VAXINT, R2 




8IC\F 


#LOBYT , R2 


%RZRO 


BIT 


#DMOOE,RLL 




BIC 


#VAXINT, R2.UCRD 


"/.RNZRO 


MOV 


#IPREG,RO 


5JHP 



[BDA] ONLY HAVE BRLV5R IN R2 

[BDA] WRITE BRLV5R TO CLEAR INTR / 

[BDA] USE RETURN IN WRITE ROUTINE 

[mjtOS] GET CONTROL REG AND SEE IF THIS IS A OIAGN 

[mjtOS] TEST THE BIT 

[mjtOS] IF NOT, EXIT/CLEAR LOBYTE 

[mjt06] if in dm mode NO POLL 

[mjt06] AND THEN CLEAR THE BIT AND STORE IT AWAY 

[mjtOS] AND RESET POLL 



The following code was taken out of the interrupt code when 
Jim found a way of checking the interrupt complete via a test condition 
This was done so we could get around the pass 4 biic problem with 
interrupts and no acks 

XNOR R7.R7 ; [BDA] R7 IS TIMEOUT 

[BDA] 





BIT 


#BRLV5S,R2 








BIT 


#BRLV5R, R2 


"/. J N 2 R 


5$ 




MOV 


#1000, R2 


%JN2R0 


S$ 


2$: 


DEC 
DEC 


R2 
R7 


%JN2R0 


2$ 




MOV\F 


#ER . INT.R7 


•/.JNZRO 


1$ 




NOP 




%JMP 


U .UERR 


3$: 


MOV 


#1000, R2 






4$: 


DEC 


R2, R2 


7.JNZR0 


4$ 




MOV 


#BIUCSR,RO 


7.CALL 


RDCMD 



[BDA] WASTE SOME TIME BEFORE ACCESSING THE BI BUS 

[BDA] ELSE GO TRY AGAIN 

[BDA] TIMED OUT/HANG 

[BDA] WASTE SOME TIME BEFORE GRABBING THE BI BUS 

[BDA] 

[BOA] CHECK TO SEE IF INTERRUPT COMPLETED 
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BIT 
NOP 
MOV 



#BRLV5R, R2 



#BIUCSR,RO 



XJZRO 
"'.CALL 



3$ 
RDCMD 
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[BDA] 

[BDA] IF NOT SET. TRY AGAIN 

[BOA] SEE IF INTERRUPT WAS SENT 



Q 
< 

a 
ii 
s 

tr 
O 

u. 

w 
o 
v> 



o 
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*********** 



********* 



SUBROUTINE xWRCMD 



XWRCMD 
Input : 



will issue a write command in NORMAL mode 



RO contains BI WRITE command literal. 

R1 contains data to be loaded into the LO word of 

R2 contains data to be loaded into the HI word of 



BI REGISTER . 
BI REGISTER . 



RAM location RGDATL will get data from Rl. 
RAM location RCDATH will get data from R2 . 

BREG will have LOOPS ACK enabled if this routine was entered 
at locat ion WRLCMO . 



NOTE: Errors in this rout ine display the following 
106340 - BI COMMAND TIMOUT error 



******* 



in the SA r eg i St er ; 



******** 



o 



****** 



002050 O13440 000000 130265 XWRCMD: NOP 



002051 
002082 
002083 
002084 
0020SS 
0020SS 
002087 



O33740 
O33440 
013740 
033441 
013740 
013700 
013740 



000004 
0OSS40 
007271 
003001 
00727 1 
008823 
1 17272 



000000 
000000 
000000 
138621 
OOOOOO 
000000 
006237 



OO2060 013700 OOS743 OIOOOO 



MOV 

MOV 
MOV 
MOV 
MOV 
MOV 
MOV 

MOV 



XCALL 
#BIWRCM,RO 
RO, , BCAID IPLCOM 
#RGDATL . \N,BAR 
Rl , . BUF "/.CALL 

#RODATL ,\N, BAR 
(BUF) , BCAID 8>WRFST 
#RG0ATH,\N,8AR 7.JST0P 

(BUF ! , BCAID 0LBWR 



SO LOAD SIIC REGISTER ADDRESS 

GET WRITE COMMAND 

LOAO COMMAND 

POINT TO LO REG DATA LOC IN RAM 

STORE REGISTER OATA 

POINT TO LO REG DATA LOC IN RAM 

WRITE FIRST BUFFER 

JUMP IF BI STOPPED / [mr1001] 

POINT TO HI REG OATA LOC IN RAM 
WRITE LAST BUFF«R AND DO THE WRITE / 

GO WAIT FOR CMO COMPLETE 4 ERROR FREE / 

RETURN 
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****************************************** 

WAIT FOR COMMAND COMPLETE AND ERROR FREE 

This routine will wait approximately 10. 
COMMAND TIMEOUT error. 



******** 



********** 



seconds before flagging a BI 



Upon entering this routine, MERR is checked before issuing a BI READ 
or WRITE COMMAND. If MERR is set, the command is never started. If 
MERR is clear, wait for NCDONE (Command Not Done}, which indicates the 
BI COMMAND has started. If this does not occur within a certain amount 
of time, then retry the command once. If NCDONE is not true after one 
retry, then a BI CMD TIMEOUT error is reported. When NCDONE is true, 
then wait for CDONE (Command Done) to be asserted. If CDONE is not 
detected within 10. sec, a BI CMO TIMEOUT error is reported. If CDONE 
is detected, the routine checks MERR (Master Error) and exits. 



I nput : 
Output : 



RO contains the BI COMMAND literal 
Rl S R2 will be destroyed. 



BIRDCM or BIWRCM) . 



Errors in this routine display the following in the SA register; 
106340 - BI COMMAND TIMOUT error 



140000 010037 



********** 
XWTCMD: NOP 



**************** 
%JMERR ERRB1M 



002062 
0O2O63 
002064 
002068 



013440 
013440 
013440 
013440 



1 SOOOO 
1 SOOOO 
140000 
OOOOOO 



002065 
1 12063 
010037 
127777 



;Wait for BI COMMAND DONE 



NOP 
NOP 
NOP 
NOP 



%JCDONE 6$ 
7.JNCD0NE 5$ 
%JMERR ERRB1M 

•/.RET 



************ 



;ERROR IF MASTER ERROR / 

; SETUP TIMEOUT COUNT TO BE SHORT 



[mr 10021 



;JUMP IF CMD DONE / [mrl002] 

; SETUP CMD CMPL OUTER TIMEOUT COUNT 

;JUMP IF CMD OONE / lmrl002] 

; OONE WITH CMO CMPL INNER WAIT LOOP YET? 

; IF ERROR/AFTER COMMAND DONE/BRANCH 



o 
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ROUTINE NAME: 

U.UERR (BUS CONTROLLER INTERNAL ERROR HANDLER) 



FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL SAVE THE ERROR CODE PASSED IN R7 IN 
THE CONTROLLER RAM LOCATION DEFINED BY 'FAILUR', IN ADDITION IT 
WILL ATTEMPT TO ENCODE THE UPPER BYTE IN AN UNIOUE MANNER. 
IT WILL THEN SET THE ERROR CODE IN SA AND SET BIT 15 OF SA 
(TO INDICATE AN ERROR) AND HANG AWAITING A REINITIALIZATION. 



INPUTS : 



OUTPUTS : 

SA REG 
FAILUR 



CONTROLLER FATAL ERROR CODE 



CONTAINS ERROR CODE AND BIT IS SET 
CONTAINS ERROR CODE AND UNIOUE IDENTIFIER 



ENTRY POINT FOR . PRDC ERROR - R11 HAS ERROR CODE 



0020BS 


033447 


00001 1 


10207 1 


U 


UERD: 


MOV 


002067 


1 1 4544 


000002 


10000 


U 


HERR: 


BIT 


OO2O70 


01 3460 


010620 


077777 






NOP\T 


002071 


01 3740 


007034 


135625 


u 


UERR: 


MOV 


002072 


013740 


006310 


010000 






MOV 


002073 


133547 


000200 


010000 






BIS 


002074 


033441 


000007 


130366 






MOV 


002075 


013740 


0063 lO 


OIOOOO 






MOV 


002076 


013447 


000007 


1 12076 






TST 



R1 I , UER 7.JMP 

#INOIAG.RLL 

PRCLR %RNZRO 
#FAILUR.BAR 7.CALL 
#<B.NRTY+B.LOOP+B.BAD> 
#ERRBIT.UBR 

UER.R1 XCALL WRT 

#<B.NRTY+B.LOOP+B.BAD>.SREG 
UER °/.JMP 



S .STR7 
BREG 



PUT ERROR CODE IN UER 

[16K1IF IN DIAGNOSTICS 

[U52EC21 I 16K1 THEN RETURN TO THEM 

SAVE CODE IN FAILUR 
[BDAILOAD BREG WITH ABORT COMMAND 
IBDAlWRITE SA WITH ERR BIT 3 COOS 
IBDA1WRITE ERROR TO SA REGISTER 
[BOAHOAO BREG WITH ABORT COMMAND 
[SDAIHANG FOREVER TESTING ERROR REG 
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SBTTL SEEK ORDERING ROUTINE 



ROUTINE NAME: 

U.SEKO (SEEK ORDERING ROUTINE) 



FUNCTIONAL DESCRIPTION: 

THIS ROUTINE PERFORMS SEEK 
ALGORITHM THAT HAS THE FOLLOWING 
1 . ONLY NON-SEOUENTIAL MSCP 
SEQUENTIAL COMMANDS WILL 
POSITION AS WHEN FIRST 

2. IF THE TOP OF THE LI 
IT WILL BE CHOSEN . 

3. WITHIN THE LIST OF NON-S 
OF NON-SEQUENTIAL COMMAN 
COMMAND ENCOUNTERED) THE 

A. AN EXPRESS COMMA 

B. A COMMAND ON THE 

C. A COMMAND WHICH 
IN THE CURRENT 
STAYS THE SAME) 

D. A COMMAND WHICH 
IN THE OPPOSITE 
IS REVERSED) . 



ORDERING USING AN ELEVATOR 
PROPERTIES : 

COMMANDS ARE ORDERED. 

REMAIN IN THE SAME RELATIVE 
UEUED . 
S A SEQUENTIAL COMMAND THEN 

EOUENTIAL COMMANDS (I.E. THE SET 

DS IS BOUNDED BY THE FIRST SEQUENTIAL 

SELECTION CRITERIA ARE AS FOLLOWS: 

D IS THE HIGHEST PRIORITY. 

CURRENT CYLINDER TS NEXT. 
IS CLOSEST TO THE CURRENT CYLINDER 
EEK DIRECTION IS NEXT (DIRECTION 

IS CLOSEST TO THE CURRENT CYLINOER 
SEEK DIRECTION IS NEXT (DIRECTION 



UBAR 



POINTER TO ACTIVE SOI CONTROL BLOCK 



OUTPUTS : 

POTENTIALLY REORDERED MSCP PACKET QUEUE 

SDI . PQ CONTAINS THE CHOSEN COMMAND 

0. RO. R1 , R2 , R3, R6, R7 , RIO ARE USED AS TEMPORARY REGISTERS 



O02077 
002100 



010545 
136542 



17026 
0632QO 



0021 12 
152150 



ADO 

XOR\F 



#SDI . ES . UBAR\N , BAR %JNZRO U.SEKC; IF MORE PKTS THEN LOOP 

#ELEV,R2,BUF XJUPF U.SEKH ; IF UPF SET THEN DONE ELSE REVERSE DIRECTION 



SEEK ORDERING ENTRY POINT - INITIALIZE SEEK ORDERING VARIABLES «** 



002 101 


000S45 


007022 


125602 


U .SEKO: 


ADD 


002102 


133747 


010200 


1 37777 




MOV 



#SDI .P$,UBAR, 
#BIT15 , R7 



, BAR %CALL S.LD10 
y.RZRO 



C 



O02103 


010545 


007026 


12S573 


U . S E K I : 


ADD 


002104 


014540 


0OOOO2 


10000 




BIT 


002105 


035540 


010002 


152107 




BIC\F 


O02106 


033540 


003OO4 


102 1O3 




BIS 


002 107 


1 14540 


000020 


000000 


U .SEKB: 


BIT 


002 1 10 


130540 


010377 


052150 




AOOC\F 


O02 1 1 1 


033243 


0OO6O3 


125616 




MOV 



CHECK AND UPDATE FAIRNESS COUNTER *»» 



#SDI . ES . UBAR\N , BAR "iCALL S.LDRO 

#OFFTRK, RO 

OOFFTRK.RO 7.JZR0 U.SEKB 

#FSEEK, RO, BUF %JMP U.SEKI 

#BIT12. RO 

#377. RO 7.JNZR0 U.SEKH 

Q.R3 PRUPF %CALL S.STRO 



RIOsPKT QUE HEAD.QsPTR TO HEAD 

IF ZERO THEN NO PKTS/RETURN 

INIT BEST CYL DIFF TO MEDIAN NUMBER 



(US2EC1 IROsFAIRNESS COUNTER 

IF NO ERROR RECOVERY LEVELS DONE PREVIOUS COMMAND 

THEN CONTINUE 

[U52EC11ELSE SET FORCE SEEK FLAG 
IF LIMIT EXCEEDED 

THEN TAKE TOP OF QUE 

ELSE RESET COUNTER/INIT PREV . PTR.ZAP WIN FLAG 
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002 1 12 
002 1 1 3 
002 1 14 
0021 14 

002 1 15 
002 1 16 
0021 17 
002120 
002121 

002122 
002123 
002124 
00212S 
002 1 25 
002 1 27 

002 1 30 

002 1 3 1 
0O2I32 



002132 
002133 
002134 
002135 
002136 
002137 
002140 



010S50 
010SS0 



007006 

007007 



125573 

1 25574 



; *** 

U.SEKC: 



IN THE FOLLOWING CODE. R3 HAS POINTER TO PREVIOUS LIST ELEMENT, 
HAS POINTER TO ELEMENT BEFORE 'BEST' ELEMENT, UPF SET IF Q IS 
CHECK FOR SEQUENTIAL COMMAND «** 



014540 03OO10 102147 



013440 
010545 
01454O 
010545 
033702 

010550 
10545 
010545 
1 321 40 
1 3046 1 
010550 
132141 
010545 



03744 1 
037440 
130440 
130461 
112141 
013460 
112146 



10000 
007025 
010040 
017026 
00OO03 

007024 
00701 1 
007012 
000002 
020001 
007025 
000002 
007026 



030001 
OOOOOO 
000000 
O20O0 1 
0OOO07 
020000 
010000 



012150 
135574 
1 12122 
052122 
1 12145 

125575 
135573 
125574 
OOOOOO 
052127 
135575 
010000 
125575 



052136 
OOOOOO 
OOOOOO 
142136 
OOOOOO 
042145 
042142 



ADD 
ADD 

ASSUME 
BIT 

NOP 

ADD 

BIT 

ADD\F 

MOV 

ADD 

ADD 

ADD 

RSUB 

INC\T 

ADO 

RSUB 

ADD 

ASSUME 



#P .OPCD, R10\N, BAR %CALL S.LDRO 

#P M00,R1O\N,BAR 7.CALL S.LDR1 
MO . EXP.EQ.BITIS 

OSEOUEN.RO %JMSB U.SEKG 

%JNZRO U.SEKH 
#SOI . OM, UBAR\N,BAR 7.CALL S.L0R1 
#<0P . R080P.WR&0P. CMP> , RO 7.JZR0 5$; 
#SDI .ES, UBAR\N, BAR %JNZRO SS 
(BUF) , R2 %JMP 30$ ; 



ROsOP CODE 

RIsMSCP MODIFIERS 

MAKE SURE MD.EXP IS MSB 

IF EXPRESS THEN DONE 

IF SEQUENTIAL 
THEN DONE 

if overlapped operation in progress 

then only allow read, write, or cmp 
ELSE discard this candidate 

and set up R2 as expected 



#S .CYLL , 

#SDI . CL , 

#SOI . CH 

R2.R0 

R1 

#S . CYLH, 

R2,R1 

#SDI . ES, 

ELEV, EO. 



0\N,BAR '/.CALL 
AR\N,BAR 7.CALL 
AR\N,BAR '/.CALL 



%TNCRY 
10\N,BAR 7.CALL 



AR\N,BAR '/.CALL 
T15 



LDR2 
LDRO 
LDR1 



. LDR2 



. LDR2 



R2:PACKET LO CVL 
ROsCURRENT LO CVL 
RECURRENT HI CVL 
ROsCURRENT S PKT LO OIFF 
PROPAGATE BORROW 
R2=PACKET HI CVL 
DIFFERENCE NOW IN ( R t , RO ) 
R2:ELEVAT0R DIRECTION 
MAKE SURE ELEVATOR BIT IS MSB 
he following code [rae2-c119] was rewritten to make 
t clearer and to update the best difference only 
hen a better difference was found, previously it was 
pdated on a <: causing the most recent packet to be 
oldest when packets were for 

if elevator going down negate diff 



(ripple the carry if no low bits} 



IE121 ] 



IE121 ] 

IE121 ] 

IE121 1 

[6121 ] 

1E121 1 
IE121 1 

[E121 I 

IE121 1 



c 



002141 013440 020000 112145 



002142 
002143 
002144 

002 145 
002146 



033447 
033446 
003443 

033443 
1 15550 



OOOOOI 
OOOOOO 

000403 

007O10 
0OO30O 



010000 
100O0 
OOOOOO 

1 25602 
1 12077 









;selected rather than 








; the 


Same cy 1 i 


■tder . 


COM\F 


R1 






7.JNMSB 


10$ 


COM 


RO 










INC 


RO 










INC\T 


R1 






%TCRV 




CMP 


R7 


R1 








NOP\T 








•/.JLESS 


30$ 


CMP\F 


RO 


R6 




7.JNZR0 


20$ 


NOP 








7.JCRY 


30$ 


MOV 


R1 


R7 








MOV 


RO 


RS 








MOV 


R3 





0>SUPF 






MOV 


RIO, R3, 


BAR 


%CALL 


S . LD10 


BIC 


#0 


STAT 


, R10\N 


%JMP 


U SEKA 



i f BESTlhi ) 

i f BESTlhi ) 

i f BESTlhi ) 

if CURIlol > 

else update BEST diff 

SO SET BEST DIFFsNEW DIFF 



CUR(hi) then get next 
CUR(hi) then update BEST 
CUR I h i } cmp lo's 
BESTIlo) then get next 



002147 003443 00OO03 1 OOOO U.SEKG 



SET BEST PTR AND FLAG 

CHAIN TO NEXT, REMEMBERING PREVIOUS 
TEST FOR END OF LIST AND LOOP 

EXPRESS REQUEST EXIT POINT *** 

MOV R3,0 , EXPRESS COMMANDS ALWAYS WIN 

NORMAL EXIT POINT - MOVE WINNER TO HEAD OF LIST *** 



[ rae2 


c 1 19 I 


E rae2 


c 1 19 ] 


E rae2 


c 1 19 ] 


[ rae2 


C 1 19 ] 


[ rae2 


C 1 19 ] 


[ r aeS 


cl 19 J 


C r ae2 


c J 19] 


[ rae2 


C 1 19 1 


[ rae2 


Cl 19 1 


E rae2 


Ct 19] 


[ rae2 


Cl 19 ] 


[ rae2 


cl 19 ] 


[ rae2 


Cl 19 ] 


[ rae2 


cl 19 ] 


[ rae2 


Cl 19 ] 


[ rae2 


c 1 1 9 ] 


[ rae2 


cl 19 ] 


[ rae2 


c1 19 ] 


[ r a©2 


cl 19] 


[ rae2 


cl 19 ] 


[ rae2 


d 19] 
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002150 


013240 


0O760O 


1 25602 


U 


SEKH: 


MOV 


0O2151 


013440 


007010 


1 35575 






MOV 


002152 


013240 


007O0O 


135621 






MOV 


002 153 


01 3440 


OOOOOO 


133230 






NOP 



O.BAR IPRUPF 
RIO, BAR 
Q, BAR 



7.CALL 
•'.CALL 
%CALL 
'/.CALL 



S . LD10 

S . LDR2 
S .STR2 
U . LNKH 
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R10=WINNER 

R2:SUCCESS0R OF WINNER 
UNLINK WINNER FROM QUE 
[U52EC11LINK RIO TO HEAD OF QUEUE 



SET UP ERROR RETRY/RECOVERY CONTROL WORDS *** 



002 154 
002155 
002156 
002157 
002 160 
002 161 
002162 



002153 
002164 
002 1 64 
002165 
002166 



010S45 
010S45 
O10S45 
137746 
010545 
033766 
033546 



007017 
007020 
007003 
000O35 
007025 
010100 
00004 1 



125630 
135630 
125630 
132375 
135600 
0421 62 
1 23102 



ADD 

ADO 

ADO 

COM 

AOD 

MOV\T 

BIS 



#SDI . El , UBAR\N, BAR '/.CALL S.CLRB 
#SOI . EO, UBAR\N,BAR "/.CALL S.CLRB 
#SDI . SW, UBAR\N, BAR XCALL S.CLRB 



CLR LEVEL 1 ERROR 
CLR LEVEL O ERROR 
ZAP STATUS WORD 



#<DRAVL (ORVOL ! DRDUP ! DATT>,R6 7.CALL U.CLRS; ZAP MOST BITS IN SDI.ST (JUST IN CASE!) 



#SDI . OM, UBARXN, BAR %CALL S.L0R6 

#BFSV,R6 %TNZRO 

#<PK I P+SUSP> , R6 %CALL U.SETS 



010550 O07O01 



014546 040100 112166 
03376O 010002 143641 



CHECK FOR COMMAND ABORTED *** 

ADO #P . VCI0,R1O\N, BAR 7.CALL 

ASSUME PABRT.EO, BITOO 

BIT #BFSV,R6 %JNLSB 

MOV\T #ST.ABO,RO %JZRO 

ASSUME U . OPCO.EQ, . 



U.OPCD 
U.DONE 



IU52EC1 ]R6:0VERLAPPED COMMAND 

[U52EC11IF OVERLAPPING THEN SET BUFR SERVICE 

[U52EC1JSET PKT IN PROG AND SUSPEND I/O IN SDI.ST 



[ 16K]R0:AB0RT FLAG WORD 

[ 16K1MAKE SURE PABRT IS LSB 

[ 16K] IU52EC1 ] IF NOT ABORTED THEN CONTINUE 

[U52EC1IIF NOT OVERLAPPING THEN ABORT CMD 

IU52EC1] ELSE IGNORE ABORT * FALL INTO U.OPCD 
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ROUTINE NAME: 

U.OPCD (OP CODE PROCESSOR ROUTINE) 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL ISOLATE THE OP CODE CODE FOR A MSCP PACKET. 
VERIFY IT AND VECTOR TO THE ROUTINE THAT HANDLES THAT OP CODE. 



ADDRESS OF FIRST WORD OF MSCP PACKET 



OUTPUTS : 

RO IS USED AS A TEMPORARY REGISTER 



0021 S6 
0021 67 



002170 
002171 
002171 
002171 



002171 

002 1 72 

002 1 73 
0021 73 
0021 73 



10550 
013440 



0O70O6 
0O7S10 



125604 
125574 



ADD 
MOV 



#P. OPCD, R10\N,BAR %CALL S.LLBO 
RIO, BAR IPRUPF 7.CALL S.L0R1 



IU52EC1 IROsOP COOE 
R1 = MSCP PKT STATUS 



CHECK VIRTUAL CIRCUIT IDENTIFIER *** 



010550 O070O1 



ADD #P. VCID, R10\N,BAR "'.CALL S.LDR2 ; R2:VIRTUAL CIRCUIT ID 

ASSUME <PKT020*BIT00> , EQ,0 ; (16K1MAKE SURE CHECK IS VALID 

ASSUME <<SDI . 1 !SDI . 21SDI . 3 (SDI . 4 >8B I T00> . NE , ; [16K1DITT0 

ASSUME <SDI .AT8BIT00>,EQ,0 ; [16K1DITT0 

IF CONTROLLER INTERNAL COMMAND THEN SKIP VC CHECK >>> 



01 4550 
035542 



000001 
Ol 00 1 7 



000000 
042336 



017542 010017 002224 



BIT 

BIC\F 

ASSUN 

ASSUN 

XNOR 

VIRT 
CHEC 



5SJNZR0 U.ATTA 



002174 016550 000304 010000 



0BITOO, RIO 

#LONIB , R2 

VC . CMC, EO.O 

VC . DMM, EO, 1 77750 

#L0NIB,R2\N %JNZRO U . OPOM 

UAL CIRCUIT O - MSCP COMMANDS *** 
K FOR SETTER BE IMMEDIATE COMMAND 

#LOGPKT , R10\N 



[16K1IF CONTROLLER INTERNAL PKT 

THEN GO PROCESS/ELSE ISOLATE HI 24 BITS OF VC ID 
VALIDATE VIR. CIR. ASSUMPTION 
VAILDATE VIR. CIR. ASSUMPTION 
IF NEO THEN COMPLEMENT AND CHK FOR DM VIRT CIR. 



IF PACKET EO LOGPKT 



IF VIRTUAL CIRCUIT O AND IN DM MODE THEN FATAL ERROR «»* 



00217S 


1 14S44 


O101OO 


102215 




BIT 


0O2176 


033767 


O 100 1 6 


052071 


U . VCER: 


MOV\ 
MSCP 


0O2177 


01 6S40 


00004 1 


010000 




XOR 


002200 


01 6540 


O1O042 


1 12664 




XOR 


002201 


01 6S40 


010040 


1 12666 




XOR 


0O22O2 


016540 


010020 


102662 




XOR 



•DM006 , RLL 
#ER. VCI , R7 



7. JZRO 

IJNZRO 



U .OPIM 
U .UERR 



[16K1THEN BETTER BE IMMEDIATE/IF IN DM MODE 
THEN FATAL VIRTUAL CIRCUIT ERROR 



NON-SEQUENTIAL COMMANDS »*« 



#0P . RD, RO\N 
#0P .WR. RO\N 
#0P . CMP, RO\N 
#0P . ACC , RO\N 



V.J2R0 
7.JZR0 
7.JZR0 



U RO 
U .WR 
U .CMPR 



CHECK FOR READ 

CHECK FOR WRITE 

CHECK FOR COMPARE 

CHECK FOR ACCESS 



[ raeo2 i 
[ raeo2 ) 
I rae02 ] 



ACC, ERS, RPL must verify reserved fields, hence call U.IOPO 
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002203 
002204 
0O2205 
002206 
0O22O7 



016540 
016540 
013460 
01 6540 
01 6540 



010022 

10O24 
10400 
000023 
O10021 



1 12670 
102672 

142674 

oooooo 

1 12272 



002210 016540 010010 112270 

002211 016540 010011 102344 

002212 016540 010012 103424 

002213 016540 010013 113422 

002214 013440 010000 102346 



XOR 


OOP 


ERS 


RO\N 


SJZRO 


U 


ACC 


XOR 


#0P 


RPL 


RO\N 


"/.JZRO 


U 


ERS 


NOP\T 






(SSUPF 


"/.JZRO 


U 


RPL 


XOR 


#0P 


FLU 


RO\N 








XOR 


#0P 


CCD 


RO\N 


SJZRO 


U 


FLU 


MSCP 


SEQUENTIAL 


COMMANDS *** 






XOR 


#0P 


AVL 


RO\N 


SJZRO 


u 


CCD . 


XOR 


#0P 


ONL 


RO\N 


7.JZR0 


u 


AVAL 


XOR 


#0P 


sue 


RO\N 


XJZRO 


u 


ONLN 


XOR 


#0P 


DAP 


RO\N 


7.JZR0 


u 


SUCH 


NOP 








XJZRO 


u 


DAP 



002215 


016540 


000001 


OOOOOO 


U.OPIM: 


XOR 


002216 


016540 


0100O2 


102274 




XOR 


002217 


01 6S40 


10003 


112515 




XOR 


002220 


Ol 6540 


O100O4 


112617 




XOR 


002221 


01 6550 


010304 


1 13653 




XOR 


002222 


033747 


10012 


1 12071 




MOV 



IMMEOIATE COMMANDS **'* 



#0P . ABO,RO\N 

#0P.GCS,RO\N "/.JZRO 

*0P GUS,RO\N 7.JZR0 

#0P.SCC,RO\N 7.JZR0 

#LOGPKT, R10\N "/.JZRO 

#ER.NIM,R7 %JZRO 



U . ASRT 
U .GCST 
U .GUST 
U .SCCH 
U .UERR 



013440 OOOOOO 102231 U.OPCE: 

; * * * 



ENTRY POINT FOR OP CODE ERROR EXIT *** 
NOP 7.JMP U.CMER 



PAGE 165 



CHECK FOR ERASE Irae02) 

CHECK FOR REPLACE [rae02! 

IF REPLACE THEN SET CPSUPF [ r ae02 1 
CHECK FOR FLUSH 
CHECK FOR COMPARE CONTROLLER DATA 



CHECK FOR AVAILABLE 

CHECK FOR ONLINE 

CHECK FOR SET UNIT CHAR 

CHECK FOR ACCESS PATHS 

IF DAP THEN USE AVAIL ROUTINE 



CHECK FOR ABORT 

CHECK FOR GET COMMAND STATUS 
CHECK FOR GET UNIT STATUS 
CHECK FOR SET CONTROLLER CHAR 
IF RIO EQ LOGPKT 

THEN HARD FAILURE 



ELSE COMMAND ERROR 



VIRTUAL CIRCUIT 177760 - CONTROLLER SPECIFIC MAINTENANCE COMMANDS «•« 



002224 


1 16542 


010002 


003721 


U.OPDM: 


XOR 


0O2225 


010550 


007020 


135575 




ADO 


002226 


01 6540 


00003O 


010O00 




XOR 


002227 


01 6540 


010031 


1 13406 




XOR 


002230 


036542 


010001 


103413 




XOR 


002231 


0105SO 


0O70O6 


135630 


U . CMER: 


ADD 


0O2232 


033741 


000004 


1 12506 




MOV 



#DUPVC,R2\N 7.JNZR0 
#P .RGI0,R10\N, BAR 7.CALL 
#0P.MRD,RO\N 
#0P . MWR, RO\N 



#1 ,R2 



7.JZR0 

7.JZR0 



»P . OPCD. R10VN, BAR XCALL 
#<P . OPCO-P> , R1 7.JMP 



U.STUD ; IF R2 NEQ 177760 THEN CHECK OUP 

S.LDR2 ; COMMON ARG FOR MAINT RO. WR 

I CHECK FOR MAINTENANCE READ 

U.MNRD ; CHECK FOR MAINTENANCE WRITE 

U . MNWR ; IF NO MATCH 

S.CLRB ; IU52EC31IF ILLEGAL OP COOE THEN ZAP IT 

U.CMOA ; RIsMSCP OFFSET/FINISH UP 
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002233 
002234 
002235 
002236 
002237 



0101 50 

01 3700 
001 240 
13044 1 

03444 1 



007001 
000003 
010000 
01000 1 

000001 



010000 
010000 
077777 
012233 
127777 



*** [rao02] start of change 
*■ 
R0UTIN8 NAME: 

U.RTST: (reserved field test) 

FUNCTIONAL DESCRIPTION: 

This routine tests that a series of words ara zero. 

INPUTS: 

R 1 « word offset within Packet of first word of field to be verified. 

R10 : packet address 

i count of sequent ia 1 words to be verified. 

OUTPUTS : 

NZRO if i n er r or 

R1 = word offset to field in error 

Q s destroyed 

ZRO i f no er r or 
R1 s o 
: destroyed 



calc adrs 

and test it 

if not zero return 

if not zero then loop 

if done clear Ri , sat ZRO, and return 



o 



ADO 


R1 ,RIO\N, BAR 




TST 


(BUF) 




osc\r 





XRNZRO 


INC 


R1 


%JN2R0 


CLR 


RI 


%RBT 



002240 O1370O 000003 137777 S.TST: 



tost contents of IBUF) 



KDBSO. MICROCODE., 22-APR-19S8 11:16:48. 97 



o 



KOBUP DIGITAL EQUIPMENT CORP. 

SEEK ORDERING ROUTINE 



2901 ASSEMBLER VERSION 32 



ROUTINE NAME: 
U .RSVA: 
U.RSVB: 



(test reserved words 6, 16, 17, and P . BUFO- P . 8UP5 1 
(test reserved words P . BUFO-P . BUF5 ) 



FUNCTIONAL DESCRIPTION: 

These routines will test reserved fields common to several op codes. 



INPUTS : 

RIO 



packet address 



OUTPUTS : 

ZRO - if no er r or 

R1 s restored to packet status 

= destroyed 

NZRO - if error 

RI : word offset to field in error. 

= destroyed 



00224 1 


033741 


0000 10 


010000 


U.RSVA: 


MOV 


#P . RS08 , RI 








002242 


010150 


OO7O01 


122240 




AOD 


RI , R10\N,BAR 


"/.CALL 


s 


TST 


0O2243 


033741 


010006 


027777 




MOV 


#<P. RS06-P> ,Rt 


XRNZRO 






002244 


033741 


000022 


000000 




MOV 


#P. RS16.R1 








00224S 


O0374O 


000002 


122233 




MOV 


#2, 


•/.CALL 


u 


RTST 


002246 


033741 


010020 


037777 




MOV 


#<P.RS16-P>,R1 


XRNZRO 






002247 


033741 


0OO0 12 


000000 


U.RSVB : 


MOV 


#P . BUFO, RI 








0022S0 


003740 


000006 


132233 




MOV 


#6, 


XCALL 


u 


RTST 


002251 


033741 


10010 


037777 




MOV 


#<P.BUFO-P> ,R1 


•/.RNZRO 






0022S2 


01 3440 


007010 


125574 




MOV 


RIO. BAR 


%CALL 


s 


LDR1 


0022S3 


004240 


000000 


1 27777 




CLR 





XRET 







;test reserved field at word 6 

;test it/ if not zero return 

; load offset for status return [CI 14] 

;test reserved field EC11sj[E122] 

; f or two words 

;if failed then return with offset [E122] 

;test the reserved fields BUFO 

;thru BUF 5 

;if failed then return with offset 

; restore R 1 

; set ZRO and return 
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( 



y 














INPUTS: 












RIO 












MSCPLN 










OUTPUTS: 












ZRO 












NZRO 



0022S4 


003740 


0OO0 17 


1 12257 MLN20: 


MOV 


0022SS 


0O374O 


000037 


102257 MLN40: 


MOV 


002256 


0O374O 


000043 


102257 MLN44: 


MOV 


0022S7 


01374O 


007264 


010000 MLNTST 


MOV 


0O2260 


101600 


0O0003 


10000 




SUB 


002261 


004240 


030000 


127777 




CLR 


0O2262 


I0O24O 


OOOOOO 


1 27777 




INC 



ROUTINE NAME: 

MLN20 test MSCP msg leng for >; 20 

MLN40 test MSCP msg leng for >: 40 

MLN44 test MSCP msg leng for >s 44 

FUNCTIONAL DESCRIPTION: 

These routine test the length of the MSCP 
at least the valid record length. 



Packet address 
length of MSCP 



nessage in the packet for 



successful 
unsuccessful 
dest rayed 



#20- 1 ,0 
#40- 1 , 
#44- 1,0 
#MSCPLN, BAR 
(8UF ) ,0 



length is ok 
1 engt h i s bad 



%JMP 
%JMP 
%JMP 



%RNEG 

%RET 



MLNTST 
MLNTST 
MLNTST 



set test value to 20 
set test value to 40 
set test value to 44 
crap against MSCP msg len 



i f leng 
i f 1 eng 



min then return ZRO 
rain then return NZRO 
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ROUTINE NAME 
TSTMQD 



R 1 



- Test the MSCP command modifiers for validity, 
lask of legal modifiers 



OUTPUTS : 

ZRO • if reserved modifiers were not set 

NZRO • if reserved modifiers were set 

- destroyed 

R1 • reset to MSCP packet status 



002283 


033241 


00000 1 


010000 


TSTMOD : 


MOV 




O02284 


010S50 


007007 


125572 




ADD 




002265 


00S041 


00000 1 


OOOOOO 




61C 




00226S 


01 3440 


00701 


1 25S74 




MOV 




002287 


01 3240 


OOOOOO 


1 27777 


; * « * 


TST 
[ rae 


02] 



0. Rl 

#P MOD , R 10\N , BAR %CALL S.LOOO 
Rl . 

RIO, BAR '.CALL S . LOR t 

%RET 

end of change 



(0 can't be R src of ALU) 

get Mod i f i er 

turn off all legal bits 

restore R1 

set condition codes and return 



o 
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.SBTTL MSCP AND OUP COMMAND ROUTINES 

ROUTINE NAME: 

U.ABRT (MSCP ABORT COMMANO) 

'IMMEDIATE COMMAND' 

U.NOP (MSCP FLUSH AND COMPARE CONTROLLER DATA COMMANDS ) 

'NON-SEQUENTIAL COMMANDS TREATED AS IMMEDIATE COMMANDS' 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE PROCESSES THE MSCP 'ABORT' COMMAND. IT WILL PERFORM 
THE FOLLOWING FUNCTIONS: 

1. CROSS REFERENCE OUTSTANDING REFERENCE NUMBER TO THe CORRECT PACKET 

2. IF A REFERENCE NUMBER MATCH IS FOUND IT WILL SET THE ' PABRT ' 
BIT IN THe PACKET STATUS AND LINK WORD. 



THIS ROUTINE PERFORMS A 
MSCP COMMANDS: 
FLUSH 
COMPARE CONTROLLER DATA 



NOP' FUNCTION FOR THE FOLLOWING 



INPUTS : 

R10 

OUTPUTS : 



POINTER TO MSCP ABORT PACKET 



IF REFERENCE NUMBER MATCH THEN PACKET IS MARKED FOR ABORTION 



127400 








M 


CCDH 


: s 


O0020O 








M 


CCDL 


: s 


002270 


O0374O 


0OO2O0 


oooooo 


U 


CCD : 


MOV 


002271 


103640 


000257 


102304 






B IS 


121400 








M 


FLUH 


: s 


000200 








M 


FLUL 


: s 


002272 


003740 


OOO200 


OOOOOO 


U 


FLU : 


MOV 


002273 


103640 


000243 


102304 






BIS 


000000 








M 
U 


ABRT 
ABRT: 


: * 


002274 


013440 


000000 


1322S4 






NOP 


002275 


03444 1 


O1O001 


0025O6 






CLR 


002276 


003740 


000000 


132263 






MOV 


002277 


033761 


10005 


042506 






MOV\T 


002300 


013440 


oooooo 


132536 






NOP 


O02301 


033703 


010OO3 


142303 






MOV\F 


002302 


033S43 


003001 


1 0000 






BIS 



OO2303 


033740 


OOOOOO 


1 1 2420 


U . IMEX: 
U . NOP : 


MOV 


002304 


013440 


OOOOOO 


1 22263 




NOP 


002305 


033761 


010005 


042506 




MOV\T 


002306 


013440 


oooooo 


122255 




NOP 


KOBUP 




KDB50.M 


ICROCODE 


, 22-APR 


- 1966 



MO .EXP! MO . CSE !MD .SCH I MO . 

MO .SSH 

#M. CCDL, 9 

#M.CCOH.Q SJMP 

MO.EXP !MD CSEIMD.SEC1M0 

MO. SSH 

#M.FLUL ,0 

#M.FLUH.O 7.JMP 



'/.CALL 
R1 %JNZRO 

ffM.ABRT.O •'.CALL 

#<P .MOD-P> ,R1 %JNZRO 

%CALL 
(BUF) ,R3 7.JZR0 

#PABRT.R3,BUF 

IATE AND NOP COMMANO SUCCE! 

#ST.SUC,RO %JMP 



SCL <MD .SEC1MD.SER 



U . NOP 

SER 



MLN20 
U . CMDA 
TSTMOO 
U. CMOA 
U . GREF 
U . IMEX 



: OP . CCD modi ftflrs 
; OP . CCD modi f i ers 
set legal modifier bits 



#<P .MO0-P> ,R1 



1 1 : 1 6 : 48 . 97 



'/.CALL 

XJNZRO 

'/.CALL 



iS EXIT 

U.C2EP 

TSTMOD 
U. CMDA 
MLN40 



; OF. FLU modi f i ers 
; OP . FLU mod i f i ers 
; set legal modifier bits 

; no modifiers allowed for ABORT 

test that msg leng is large enough 

if not declare error 
test for reserved modifier bits 

it set then error 
GO MATCH REFERENCE NUMBER 
[16K1IF NO MATCH THEN EXIT 
[16K1 ELSE ABORT THIS PACKET 

POINT *** 

R0=SUCCESS/CHANG6 TO END PKT/EXIT 



test modifier bits 

it set then error 
test that msg leng is 



large enough 



[rae02] 
[rae02] 
I rae02 ] 
Irae02] 

[ rao02] 
[rae02] 
[ rao02] 
(rae02 1 

[rae02] 

( r ae02 ] 

[ rae02 ] 
I rae02] 
[ rae02 J 



[rae02] 

[ rae02 ] 
[ rae02 j 
[ rae02] 



*^Ww#^ 



/" 
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002307 
002310 
0023 1 1 

0023 1 2 



034441 
013440 
013440 
Ol 3440 



1 000 1 
OOOOOO 

01 0000 

oooooo 



002506 
122247 
002506 
102303 
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CLR 
NOP 
NOP 
NOP 
.PAGE 



7.JN2R0 


U 


CMOA 


%CALL 


U 


RSVB 


%JNZRO 


U 


CMDA 


'/.JMP 


U 


IMEX 



PAGE 171 



if not declare error 
test for rsvd. fields 

if mrr jump to err rtn 
then exit successfully 



[rae02] 
[rae02] 
£rae02] 

[ rae02 ] 
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ROUTINE NAME: 

U.ATTN (U.PROC ATTENTION PROCESS) 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE OUEUES A CONTROLLER INTERNAL 'ATTENTION' PACKET TO 
A SOI CONTROL BLOCK IF THE 'DATT' BIT IS SET IN THE SDI CONTROL 
BLOCK STATUS. IF THE OP CODE OF THE DEDICATED PACKET IS NONZERO THEN 
THE ROUTINE EXITS. OTHERWISE IT OUEUES THE PACKET AND SETS THE OP CODE. 

INPUTS : 

UBAR POINTER TO SOI CONTROL BLOCK 

R7 : OP. ATT 

BAR POINTS TO SO I . AT*P . OPCO IN SOI CTL BLK 

CCODE ZERO IF ORIVE ONLINE 

OUTPUTS : 

ATTENTION OR GET STATUS PACKET QUEUED TO SOI CONTROL BLOCK PACKET LIST 
RO.RI ARE USED AS A TEMPORARY REGISTERS 



002313 
0023 1 4 
002315 



033767 
013440 
0334S0 



O1001 6 
003007 
OOOOOS 



OS2314 
010000 

oooooo 



0023 IS 
0023 17 
002320 
002321 
002322 
002323 
002324 
00232S 
002326 



000072 

KDBUP 



030550 
010545 
135541 
1 13570 
010545 
014542 
013440 
O 1 OS 4 S 
013440 



000046 
007022 
0O03O0 
O13200 
OO7000 
OO0200 
010000 
O07025 
017001 



OOOOOO 
12S574 
OOOOOO 
142334 
135575 
OOOOOO 
102331 
125575 
025574 



ENTRY P 
BAR poi 

MOV\T 

MOV 

MOV 

The fol 
sense w 

ADD 
XOR 
XOR 
NOP 



ADD 

ADO 

ADO 

BIC 

BIS\T 

ADD 

BIT 

NOP 

AOD 

MOV 



OINT #1 
nt s to 

#0P . GS 
R7.BUF 
UBAR, R 

lowing 1 
hat soeve 

#P . OPC 
IfOP . ON 
OOP . GU 



P . OP 
T.R7 



TIAL ATTENTION PROCESSING *** 
of the MSCP packet IP SDI.AT(UBAR) 



IF NOT ONLINE 
STORE ATTN/GET 
MAKE A COPY OF 



D , R 
L . R 
S . R 



as we 
- R2 

2,BA 
2\N 

2\N 



r emov 
not s 



{pest o 

#SDI .AT 

»SDI 

#SOI 

#O.STA 

#PSTAT 

#SDI . 

#XCMP 

#SDI . OM 
R1 .BAR 



R X 

•I. 
•I. 

rTN g 

% 



JZRO 
JZRO 



oes h 

JMP 



ed by 
et to 

S. LC 

1$ 
1$ 

ere ) 

U . LN 



RL, 8/14/67, because 
anything in part icul 



[m jt 06 ] R2 now 
tmjtoe] is it 
tmjt06] if so, 
[m jt 06 ] is so , 



THEN USE GET STATUS OP 
STAT OP COOE 
UBAR 

they make no 
ar ! ! 

has opcode of packet at 

an ONLINE? 
branch/else is it a GE 
branch to queue at top 



T, RIO 

0,UBAR\N,8AR XCALL S.LDR1 

T, R1 

,R10\N,BUF %JZRO 20$ 

T,UBAR\N,BAR 7.CALL S.LDR2 

R2 



X 
\N.BA 

X 



JZRO 
R V.CA 
CNZRO 



0$ 

1. L S . 
S . L 



LDR2 
DR1 



[mjt06]fop ONLINE and GUS/go put the 



GO OUE PKT 
R1 => head of 
Is packet 1 1 St 
If so, put pac 

If we are 
camp 1 et i ng a c 
is an over lapp 
then put the 
of t he over lap 
ami smat ch bet 
(which probaby 



[rael 1 1 
packet 1 i st 

empty? 
ket at head 

he process of 

mand, and there 

ed command as well, 

ttn command in back 

ped command to prevent 

een the SDI. ST value 

has BFRQ set ) and 



; [E121 1 
; IE121] 



; I E 1 2 1 
; IE121 

; [E121 
; [E12I 
:ooe; [E 
; [E121 
; IE121 
; [E121 
; [E121 
; IE121 
; [E121 
top of 
: [E121 

UNIT 

; [11.2 1 
; [E121 

. [E121 

; [E121 

lacket 

; t ■ 1 2-1 

; IE121 

; I E 121 

,' [ E 1 2 1 
; [E121 

; [E121 
; [E121 
; [E121 
; [ E121 
; [E121 

i I E 1 2 1 

; ( E 1 2 1 
; [ E 1 2 1 



queue 
TATUS 



[E121 

; [E15 



t the top c 
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002327 
002330 
002331 
002332 
O02333 

002334 
002335 



135541 
003760 
013440 
1 13550 
013440 

01344O 
1 1 3740 



002336 133746 

002337 014540 
002340 03S560 



000300 
010072 
00700 1 
003300 
007010 

007010 
0032OO 



000 100 
000200 
0IOO4O 



OOOOOO 
150027 
125574 
O 1 0000 
105620 

OOOOOO 

127777 



135476 
O 1 OOOO 
152376 



BIC 

MOV\T 

MOV 

BIS 

MOV 

MOV 
MOV 



#0.STAT,R1 
OOVLPER, TSTCNT 
R 1 , BAR 

#<PSTAT+PACTV> 
RIO, BAR 

RIO, BAR 

#PSTAT . BUF 



%JZRO ERRB1Z 
•/.CALL S.LDRI 
R10\N , BUF 
%JMP S.STR1 



the opcode and args of the Attn packet 

Is there really an ovlp cmd there? 

No - somet h ing is screwy . . . 

Get link word of first/2d packet 

STUFF THE CURRENT POINTER WHERE THE OLD 

SET THE ADDRESS 



[E121 I 
[E121 ] 
[E121 1 
[E121 ] 
POINTER WAt ; [E12 
FOR THE NEXT POINTER AND STUFF J-HE OL 
: IE121 1 
[mjt06] SET THE ADDRESS FOR THE NEXT PO I NTER ; ( E I 2 1 
[mjt06] NO MORE PACKETS AFTER THIS 0NE;[EI21) 



ENTRY POINT »2 - ACTIVE PACKET PROCESSING ««' 



%CALL U.GMST 
7.JZR0 U.CLSX 
ENTRY POINT »3 - TERMINATION PROCESSING *«« 



MOV *ERRIP,R6 
BIT #XCMP,RO 
BIC\T VSUSP.RO 



GET MUTEXED SOI STATUS IN RO 
IF TRANSFER NOT COMPLETE 

THEN START PKT/FREE . PROC/RE T URN 



002341 133544 OO02OO 123711 

002342 01O545 OO70S4 135630 

002343 034446 000006 103645 



BIS 
AOD 
CLR 
. PAGE 



»PLOCK.RLL %CALL U.ULKA ; GO UNLINK PKT 

»<SDI . AT»P . OPCO> , UBAR\N. BAR %CALL S.CLRB; ZAP OP COOE 

R6 %JMP U.CSTA ; IU52EC11G0 CLEAR SOI STATUS /RETURN 



Q 
< 

o 

II 

s 

IX 

o 

u. 

(0 
O 
V) 
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ROUTINE NAME: 

U.AVAL (MSCP AVAILABLE COMMAND! 

(MSCP TOPOLOGY COMMAND) 
'SEQUENTIAL COMMANDS' 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL PERFORM THE MSCP 
COMMAND. 



AVAILABLE' AND 'TOPOLGV 






RIO 
UBAR 



OUTPUTS : 

MSCP 



POINTER TO MSCP PACKET (1ST, 2ND, AND 3RD ENTRY) 
POINTER TO SDI CONTROL BLOCK (2ND AND 3RD ENTRY) 
PACKET STATUS 



END' PACKET QUEUED TO THE HOST. 



O2000O 
000043 



002344 

002345 



000000 
002346 



002347 
002350 



002351 
002352 
002353 



002354 
0O2355 
0O2356 
002357 
002360 
002361 



003740 
103640 



OO0O43 000000 
OOOO40 102347 



003740 OOOOOO 010O0O 



M. AVAH 
M. AVAL 
U .AVAL : 



M. DAP 
U . DAP: 



1 14541 
033442 



01 3440 
033761 
013440 



010545 
014541 
036542 
1 14541 
033740 
013440 



000 100 010000 
010000 012354 



OOOOOO 122263 
010005 042506 
OOOOOO 103436 



MOV 
BIS 



BIT 
MOV 



mo. cse 

MO.EXC IMO.SPO (MD.ALL 



#M. AVAL ,0 
#M.AVAH,Q 



OP.AVL modifiers 
OP.AVL modifiers 



set legal modifier bits 
set modifier bits 



;OP.OAP modifiers 
; set modifier bits 



#PACTV,R1 
R0.R2 



ENTRY POINT #1 



'/.JNZRO U.AVL1 ; 
INITIAL PACKET PROCESSING * 



IF PACKET ACTIVE 
THEN GO PROCESS 



NOP 

MOV\T 

NOP 



#<P . MOO-P> , R1 



7.CALL 


TSTMOO 


7.JNZR0 


U . CMDA 


%JMP 


U. ONLA 



test for reserved modifier bits 

it set then error 
do tne rest at ONLINE 



[ rae02 ] 
>] [rae02] 

; [ rae02] 
[rae02] 
[ras02] 

(rae021 
[rao02 ] 

; [ rae02 ] 
[rae021 

[ raeCZ I 



[rae02] 
( r ae02 ] 

( rae02) 



ENTRY POINT #2 - ACTIVE PACKET PROCESSING *** 



007000 
000200 
010013 
O10O2O 
10004 
OOOOOO 



125574 
OOOOOO 
012362 
012365 
Ol 364 1 
1 12373 



#SDI ST, UBAR\N,BAR "/.CALL S.L0R1 



BIT 


#XCMP,R1 








XOR 


#0P . OAP , R2 


%JNZRO 


U 


AVLA 


SIT 


OORAVL , R1 


•'.JNZRO 


U 


AVLB 


MOV 


#ST. AVL ,R0 


%JNZRO 


U 


DONE 


NOP 




%JMP 


U 


AVLC 



R1=S0I STATUS 

IP TRANSFER COMPLETE 

THEN DONE 
IF NOT ACCESS PATHS CMD THEN CONTIK 
IF AVAILABLE THEN DONE 

ELSE CONTINUE 



; [ rae02 ] 



DONE - CHECK FOR ACCESS PATHS COMMAND >** 



002362 


010545 


017026 


013640 


U .AVLA: 


ADD 


002363 


033702 


0OOO03 


1 0000 




MOV 


002364 


033542 


003004 


103640 




BIS 


002365 


010545 


007012 


13S632 


U .AVLB: 


ADO 


KDBUP 




KOBSO. MICROCODE 


, 22-APR 


- 198 



#SDI . ES,UBAR\N,BAR ".JNZRO U.DONX 
(BUF) ,R2 

#FSEEK,R2.BUF %JMP U.DONX 
#SOI . CH,UBAR\N, BAR 7.CALL INITM1 

: 1 6 : 46 . 97 



IF NOT ACCESS PATHS THEN DONE 
R2=EXTENDED STATUS 
SET FORCE SEEK FLAG/DONE 
IV05] FFFF IN HI CYL AODR 
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#SDI .SI , UBARXN.BAR 7.CALL S.LDRO ; tmjt06] GET DRIVE RUN/STOP STATUS 



002367 
002367 
002370 
002371 
002371 
002372 
002373 
002374 



033760 

O1O5S0 

1 14541 
033760 
033746 
033760 



040003 
007007 

040020 
010000 

O0OO40 
O1O003 



153641 
135573 

002373 

04364 1 
1 226 lO 
1 53641 



ADD 

ASSUME DRV RU.EQ, BITOO 

MOV\T #<ST.0FL>,RO %JNLSB 

ADO #P .MOD , R10\N , BAR %CALL 

ASSUME MD.SPD.EQ, BITOO 

BIT #DRAVL,R1 %JLSB 

MOV\T ffST.SUCRO %JN2R0 

MOV *SUSP,R6 %CALL 

MOV\T #ST.OFL,RO %J2R0 



U .DONE 
S . LORO 

U. AVLC 
U. DONE 
U . GUCP 
U . DONE 



[mjtOSl IF SET/RUN/STOP IS OUT SO DRIVE IS OFFLINE 

ROsMSCP MODIFIERS FIELD 

MAKE SURE MD.SPD IS LSB 

IF DRIVE NOT ALREADY AVAILABLE 

IF NO SPIN DOWN THEN DONE 

GET UNIT CHAR PTR, SET R6 FOR U.CLRS 

IF NOT FOUND THEN DONE 



AND DIS, 



ROUTINE TO CLEAR SDI STATUS WITH BITS IN R6 *** 



002375 


013440 


OOOOOO 


125476 


U . CLRS: 


NOP 








'.CALL 


U . GMST 


002376 


035140 


003006 


1 15474 


U . CLSX : 


BIC 
. PAGE 


R6 


RO 


BUF 


%JMP 


UNLOCK 



GET MUTEXED SOI STATUS IN RO 

CLEAR APPROPRIATE SITS/FREE D . P RO C / RE TURN 



o 
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ROUTINE NAME : 
U . C2E0 
U . C2EP 



(CHANGE TO END PACKET WITH DUPLICATE CHECK) 
ICHANGE TO END PACKET! 



FUNCTIONAL DESCRIPTION: 

THIS ROUTINE SETS THE MSCP 'ENO' PACKET CODE IN THE PACKET POINTED TO 
BY 'SOI.PO' IN THE SOI CONTROL BLOCK POINTED TO BY UBAR. IT ALSO SETS THE 
CONDITION CODE IN RO IN THE SAME PACKET. THE PACKET AOORESS IS ENTERED IN 
THE CONTROLLER TO HOST PACKET RING BUFFER. 

INPUTS : 



RO 

RIO 

UBAR 



CONDITION CODES FOR END PACKET 
POINTER TO MSCP PACKET 
POINTER TO SDI CONTROL BLOCK 



OUTPUTS : 

CONVERTED MSCP PACKET 

UPOATEO CONTROLLER TO HOST PACKET RING BUFFER 

R1 USED AS TEMPORARY REGISTER 

R2 USED AS TEMPORARY REGISTER 



002377 










ASSUME 


002377 


14540 


O00O37 


10000 


U . C2ED : 


BIT 


002400 


Ol S540 


1OOO3 


102413 




XOR 


002401 


0I6S40 


10004 


142402 




XOR\F 


002402 


013440 


010000 


002420 




NOP 


002403 


034442 


000002 


122477 




CLR 


002404 










ASSUME 


002404 


106S40 


010024 


102420 




XOR 
BIS\T 


002405 


01OS4S 


007044 


125574 




ADD 


O02406 










ASSUME 


002406 


033562 


040040 


152407 




BISNT 


0024O7 


1 14S4 1 


O00O1O 


010000 




BIT 


002410 


133SS2 


O100O1 


04241 1 




BIS\T 


0024 1 1 


003442 


000002 


010000 




MOV 


0024 1 2 


033660 


010003 


0424 13 


; *** 


BIS\T 
CHECK 


002413 


010545 


007000 


125574 


UC2EDA : 


ADD 


002414 


! 1 454 1 


000004 


1OOO0 




BIT 


00241S 


033560 


010200 


05241S 




BIS\T 


0024 1 6 


01 3440 


000000 


102420 




NOP 


002417 


033S40 


000003 


123210 


U . C2E2 : 


BIS 


O0242O 


010550 


007OO7 


1 3561 6 


U .C2EP : 


ADD 


002421 


010550 


007OO1 


135573 




ADD 


002422 


035540 


000017 


OOOOOO 




BIC 


002423 


033540 


003001 


10000 




OR 



ST SUC, EO.O 
#ST .MSK, RO 
#ST . OFL ,RO\N 
#ST. AVL ,R0\« 

R2 

SC . UNK , EO.O 
#<ORAVL ! DRDUP>, 
#SC . IOP, RO 



%JZRO 
%TZRO 
7.JN2R0 
'/.CALL 



C2EP 
CUNK 



XJZRO U.C2EP 
7.JZR0 U.C2EP 

*SDI .SI , UBAR\N, BAR %CALL S. LDRI 
DRV .RU, EO.BITOO 
#SC.NVL,R2 7.TNLSB 

#DRV .DD.R1 

#SC.0IS,R2 '/STNZRO 

R2,0 
#ST.0FL,0.RO %TNZRO 

FOR DUPLICATE UNIT NUMBERS **« 

BAR 7.CALL S. LDRI 



#SOl .ST, UBAR\N 
#OR0UP , R1 
#SC . OUP , RO 



7.TNZR0 
%JMP 
XCALL 
BAR %CALL 



#ST.OFL ,R0 

#P ,STS ,R10\N 

#P . VCID.R10\N,BAR %CALL 

»L0NI8 ,R0 

»1 . RO, BUF 



C2EP 
SBCN 
STRO 

LDRO 



MAKE SURE SUCCESS IS ZERO 
IF STATUS EO (SUCCESS) 

THEN CHK FOR DUP/ELSE IF EO OFFLINE 

THEN CHK FOR UNKNOWN/ELSE IF NOT AVAILABLE 

THEN CONTINUE 
ZAP R2/CHECK FOR UNKNOWN 
MAKE SURE UNKNOWN IS ZERO 
IF UNKNOWN THEN DONE 

[U52EC21IF INOPERATIVE THEN SET SUBCODE/DONE 
R1=SDI STATUS 
MAKE SURE DRV . RU IS LSB 

IF RUN/STOP SWIT OUT THEN SET NO VOL MOUNTED FLG 
IF DISABLED BY DIAGNOSTICS 

THEN DRIVE OFFLINE AND DISABLED 
IF R2 NEO O 

THEN SET IN FLAGS CHANGE STATUS TO OFFLINE 



R1:SDI STATUS 

IF DRIVE A DUPLICATE 

THEN OR IN DUPLICATE SUB-CODE 
CONTINUE 

ROsOFFLINE STATUS/ZAP BYTE COUNT 
SET END PKT STATUS 
ROsVIRTUAL CIRCUIT ID 
ISOLATE CREDIT FIELD 
CREDIT: 1 



[rae03] 



; ;CLEAR MAPPING FLAG 
KDB5O.MICR0C00E. ,22-APR-19SS 11: 16:46. 97 



c 
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002424 
002425 



002426 
002427 



1 14544 
013440 



010550 
033541 



00010O 
1OOO0 



007006 
003200 



OIOOOO 

002426 



136574 
103340 



BIT 
NOP 
no longer c 
command) . 
ADD 
1$: ADD 
OR 
PACE 



#DMODE,RLL ; DON'T STOMP DM STUFF 

7.JNZR0 1$ ; SKIP IF DM 

leap it here (as immediate mode commands might clear it for 
it is now cleared at U.IOPN: 



npr ogress 



#MAP .ST,UBAR\N, BAR 7.CALL S.CLRB 
#P . 0PCO,R1O\N,SAR 7.CALL S.LDR1 
#0P . END, R1 ,BUP %JMP UOSNO 



[E122] 
(E1221 
[E122] 



CLEAR ODA STATUS 

RIsOP COOE TO CONVERT 

OR IN ENO CODE/LINK PKT TO CONTRO L LER - HOST 
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ROUTINE NAME: 

U.CNVT (CONVERT LBN, RBN.OBN.XBN TO CV L . GROUP , TRACK , SECTOR ) 



FUNCTIONAL 
THIS 
GROUP. TRAC 
STORING THE 

NOTE 

OROER START 

THE FOLLOWI 

CVLIN 

GROUP 

TRACK 

SECTO 

SECTO 

WHERE: 

C 



R 

S 



DESCRIPTION : 

ROUTINE WILL CONVERT A LBN, RBN, DBN, OR XBN TO CYLINDER, 

K, AND SECTOR USING VARIABLES PASSED BV THE CALLER AND 

RESULTS IN A CALLER SPeCIPIEO AREA. 
THAT IT IS THE CALLER'S RESPONSIBILITY TO OR IN THE HIGH 

LBN, RBN, XBN, OR DSN. 
NG GENERAL EQUATIONS ARE USED: 



o 



DER 



R(START) 
R( INDEX) 



VI ♦ QUO! V2/(C« (S*V3) ) I 
0U0IREM1 V2/(C« (S»V3)I)/(S*V3)) 
OU0(REM(REM(V2/(C»(S*V3) ))/(S»V3))/V3) 
REM(REM(REM(V2/(C* (S*V3)))/(S«V3))/V3I+V4 
REM! (SECTOR! START) +(0« GROUP) )/(T+RI ) 



GROUPS PER CYLINDER 
GROUP OFFSET 
RBN'S PER TRACK 
TRACKS PER GROUP 
LBN'S PER TRACK 
VARIABLE #1 (32 bits) 



FOR LBN 
FOR RSN 
FOR XBN 



FOR DBN 



+ the LBN 



the LSN 
BN space 



the start i ng LBN 

the start i ng RBN 

the St ar t i ng XBN 

the st apt i ng DBN 



INPUTS: 

R3 

UBAR 

CNVTVI 

CNVTV2 

CNVTV3 

CNVTV4 



The hi cylinder number 
The hi cylinder number 
The hi cylinder number 
siie in cylinders 
The hi cylinder number 
siie in cylinders + th 
i n cy 1 i nder s 

: VARIABLE #2 (32 bits) 

FOR LBN = The LBN desired 

FOR RBN : The RBN desired 

FOR XBN = The XBN desired 

FOR DBN = The DBN desired 

-- VARIABLE #3 (IB bits) 

FOR LBN : LBN'S per track 

FOR RBN : RBN'S per track 

FOR XBN : Sectors per track (LBN's 

FOR DBN : Sectors per track (LBN's 

-. VARIABLE #4 (IS bits) 

FOR LBN ! O 

FOR RBN « LBN's per track 

FOR XBN » 

FOR OBN > 



POINTER TO UNIT CHARACTERISTICS 

POINTER TO RESULT STORAGE AREA 

CONVERSION VARIABLE #1 (VI) 

CONVERSION VARIABLE #2 ( V2 ) 

CONVERSION VARIABLE #3 (V3) 

CONVERSION VARIABLE » i (V4) 



I [E121 ] 



; (EI21 ] 



; (EI21 I 



RBN'S) 
RBN'S) 
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OUTPUTS : 






















CYLINDER, GROUP, TRACK, SECTOR NUMBERS STORED IN THE AREA POINTEO 
















TO BY 


UBAR 




















UBAR SET TO R3 






[E121 ] 














R10 RESTORED FROM SOI.PO(UBAR) 






[E121 1 












* * * 


CALCULATE CYLINDER NUMBER *** 










002430 


013740 


O07044 


135572 


J . CNVT: 


MOV 


#CNVTV3,BAR "/.CALL 


S.LDOO 


Q=VARIABLE #3 


[E121 I 




00243 1 


013740 


007042 


135574 




MOV 


#CNVTV2,BAR %CALL 


S . LDR1 


R1 sVARIABLE #2 LO 


(E121 ] 




002432 


013740 


007043 


135573 




MOV 


#CNVTV2+1 , BAR %CALL 


S.LDRO 


ROsVARIABLE #2 HI 


[E1211 




002433 


010543 


0070S6 


125SOO 




ADD 


#SOI . TG, R3\N, BAR %CALL 


S . L0R6 


RS s TRACKS/GROUP 


[E121 1 




002434 


034S46 


000377 


125562 




AND 


#L0BYT,R6 SCALL 


MULT 


R7 3 TRACKS/GROUP * V3 


IE121 I 




002436 


003447 


000007 


OIOOOO 




MOV 


R7.0 




= R7 


IE121 1 




002436 


0334SO 


000007 


OIOOOO 




MOV 


R7, R10 




R10tR7 


[E121 ] 




002437 


010543 


007065 


125600 




ADD 


#SDI . GC,R3\N,BAR '/.CALL 


S . LDR6 


R6 ■ GROUPS/CYLINDER 


[E121 ] 




0O244O 


034546 


000377 


125562 




AND 


*L0BYT,R6 '/.CALL 


MULT 


R7=TRKS/CYLIN0ER * V3 
(= SECTORS/CYLINDER) 


[E121 1 
IEI21 I 
[E121 1 












*** 


NOTE 


ONLY LO OROER 16 BITS OF 


SECTORS/C 


YLINDER ARE USED **« 


[E121 1 

(E121 ] 




002441 


033442 


000007 


135547 




MOV 


R7.R2 %CALL 


DIVD 


RIbQUO, ROsREM/RETURN 


[E121 ] 


Q 


002442 


01374O 


007040 


12S600 




MOV 


#CNVTV1 , BAR %CALL 


S . LDR6 


R6=VARIABLE #1 (LO) 




< 


002443 


01374O 


00704 1 


125601 




MOV 


0CNVTV1-M , BAR . %CALL 


S . L0R7 


R7iVARIABLE #1 (HI ) 




3 


002444 


030141 


OOOOOS 


OOOOOO 




ADD 


R6.R1 




ADD TO LO CYL # 




a 


002445 


130467 


020007 


152446 




INC\T 


R7 %TCRY 




IF CARRY THEN INCR R7 




ii 


00244S 


033442 


000010 


132472 




MOV 


R10.R2 %CALL 


U .ST1U 


R2'S*V3/ST0RE R1/UP0ATE UBAR 




5 


002447 


12044S 


OO7005 


13562S 




INC 


UBAR\0, UBAR, BAR SCALL 


S .STR7 


STORE HI CYLINDER 




cc 
O 

u. 










: *** 


CALCULATE GROUP NUMBER **» 








002450 


033441 


000000 


135546 




MOV 


R0.R1 %CALL 


DIVDO 


R1 =REM/R1 =0U0, RO:REM 




V) 


002451 


03344S 


000O0 1 


122472 




MOV 


R1 ,R8 "/.CALL 


U ST1U 


SAVE GROUP IN R6 




U 










; * * * 


CALCULATE TRACK AND START SECTOR **« 






-J 


002452 


01374O 


007044 


12S575 




MOV 


#CNVTV3,BAR SCALL 


S . L0R2 


R2:VARIABLE *3 






002453 


1 1 1 140 


000002 


OIOOOO 




SUB 


R2, RO\N 




OPTIMIZATION FOR 1 TRACK/GROUP - 


IE121 ] 




002454 


034461 


O2OO0 1 


052456 




CLR\T 


R1 %JNCRY 


10$ 


SKIP DIVIDE IF OUO = 


IE121 ] 




00245S 


033441 


OOOOOO 


135546 




MOV 


R0.R1 %CALL 


DIVDO 


R1 =REM( V2/(C« (S>V3))/S*V3)/Rt=QU0, ROiREM; [E12 1J 




002456 


13740 


007045 


135601 


1 OS : 


MOV 


#CNVTV4,SAR "/.CALL 


S . LDR7 


R7:VARIABLE #4 


(E121 1 




002457 


030140 


00OO07 


122472 




ADD 


R7.R0 %CALL 


U .ST1U 


ADD TO START SECTOR/STORE TRACK # 


IE121 ] 




002 4 60 


120445 


007005 


13561 6 




INC 


UBAR\0, UBAR, BAR "/.CALL 


S . STRO 


BUMP AODR TO STORE START SECT 


IE121 ] 












; * * * 


CALCULATE SECTORS FROM INDEX ( RO : START. 


_SECTOR #,R6 = GROUP #) **« 


i 




0024E 1 


010543 


0O7O74 


135601 




ADD 


#S0I . G0,R3\N, BAR '/.CALL 


S . LDR7 


R7<15:8> = GROUP OFFSET 


IE121 1 




002462 


00 1 140 


OOOOOS 


132473 




suae 


R6.RO.0 %CALL 


U.CSPT 


= PREDECR'D STARTING SECTOR FOR MULT 
(LESS 1 TO LEAD THE SECTOR WE WANT) 
R2 : SECTORS/TRACK (LBN+R8N) 


1E121 1 
IE121 1 
[E121 1 




002463 


031547 


000377 


OOOOOO 


20$ : 


SUBC 


#377 , R7 




s START SECTOR + (GROUP OFFSET) * 


IE121 ] 




002464 


0OOO4 6 


020006 


102463 




ADO 


R6.0 7.JCRY 


20$ 


(GROUP NUMBER) BY REPEATED ADOS 


(E121 ] 




KDBUP 




KOBSO. MICROCODE. 


,22-APR 


- 1988 


1 1 : 16:48.97 









J 



' o 
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002465 
002466 
002467 
002470 
002471 



10 1062 
00OO42 
013440 
033445 
01OS45 



030002 
000002 
007005 
000003 
0O7022 



042465 
OOOOOO 
125613 
010000 
105S02 



002472 120445 007005 105620 U.ST1U: 



, 2901 ASSEMBLER VERSION 32 

SUB\T R2,0 %JNMSB 

ADD R2.Q 

MOV UBAR, BAR XCALL S.STOO 

MOV R3.USAR 

ADD #SOI .PO, UBAR\N,BAR %JMP S.LD10 

ROUTINE TO STORE R1 PUBAR ANO INCREMENT UBAR **« 

INC U8AR\0, UBAR. BAR %JMP S.STR1 ; STORE LO CYLINDER #/RETURN 

ROUTINE TO CALCULATE SECTORS PER TRACK *** 



REDUCE MODULO R2 

AND CORRECT FOR SUBTRACT OVERSHOOT 

STORE SECTORS FROM INDEX 

SET UBAR TO INPUT VALUE OF R3 

RESTORE RIO/RETURN 



; [E121 1 
; IE121 1 
; IE121 ] 

: [EI21 ] 



002473 

002473 010543 

002474 010543 

002475 034542 

002476 030142 



007074 
O07O67 
000077 
OOOOOO 



1 35604 
1 25575 
OOOOOO 
127777 



ASSUME LBNMSK.EO. LOBYT 

ADD #SDI . 12. R3XN.BAR %CALL 

ADO #SDI ,RT,R3\N,BAR 5SCALL 

AND »RBNMSK,R2 

ADO R0.R2 7.RET 

.PACE 



S . LLBO 
S . LDR2 



MAKE SURE LBNMSK IS LO BYTE 
ROsLBN'S PER TRACK 
R2:RBN'S PER TRACK 
ISOLATE RBN'S 
R2:LBN'S/TRK+RBN'S/TRK/RETURN 



Q 
< 

o 

II 

s 
o 

LU 

w 
<J 

V) 

-I 



c 
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MSCP AND DUP COMMAND ROUTINES 



ROUTINE NAME: 

U.CUNK [CHECK FOR UNKNOWN UNITI 



PAGE 181 



FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL EXAMINE THE ORVOL.DRAVL ANO OROUP BITS OF SOI. ST 
TO DETERMINE IF A DRIVE IS KNOWN BUT OFFLINE OR UNKNOWN. 



OUTPUTS : 

CONDITION COOE 
CONDITION COOE 

STACK LEVEL : 

NONE USED 



POINTER TO SOI CONTROL BLOCK 



ZERO DRIVE UNKNOWN 

NONZERO DRIVE OFFLINE BUT KNOWN 



002477 010545 

002500 1O3740 

002501 005600 



007000 


OOOOOO 


U 


CUNK : 


ADD 


000034 


O 10000 






MOV 


000003 


137777 






BIC 
. PAG 



*SDI .ST. UBARXN. BAR 
#<ORVOL+ORAVL*ORDUP>,0 
(SUF).Q 7.RET 



BAR-PTR TO SDI STATUS 
Q:DRIVE STATE SITS 
IF ORIVE UNKNOWN 
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MSCP AND DUP COMMAND ROUTINES 



ROUTINE NAME: 

U.CMDE (MSCP COMMAND ERROR) 



PAGE 132 



FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL TAKE THE MSCP PACKET OFFSET PASSEO IN RO, 
SHIFT IT LEFT BY ST.SHF AND OR IT TO THE ST . CMO STATUS COOE. 



o 



R1 
OUTPUTS : 



MSCP PACKET OFFSET 

ST. CMO + RO*ST.SUB (SUB-COOE MULTIPLIER) 



002S02 

002502 0T3S41 000200 

002503 O10SS0 007010 

002504 O10S5O 007011 

002505 033440 000001 









ASSUME 


12SS04 


U 


CMDE : 


OR\L 


125630 






ADD 


135630 






ADD 


1 13641 






MOV 



ST . SHF.E0.7 

#<ST.CMD*128. >.R1 %CALL S . SWB 1 

#P BCNO, R10\N.BAR "/.CALL S.CLRB 

#P .BCNI , R10\N.SAR '/.CALL S.CLRB 

Rt.RO 7.JMP U.DONE 



MAKE SURE ST.SHF IS 7 

[US2EC3] [ECO#2]P0SITI0N PACKET OFFSET TO SUB-CODE 
clear the byte count fields ;[E122] 

clear the byte count fields ;[E122] 

MOVE TO RO/FINISH UP 



UNOUEUED PACKET COMMAND ERROR ROUTINE *»* 



002506 O33740 000200 

002507 010550 007006 
002510 013440 OOOOOO 



002S1 1 
002512 



0025 1 3 
002514 



010550 
010550 



073541 
033440 



007O1O 
007O1 1 



000200 
000001 





Ent er 


here 




to only OP 






i nva 






i nva 






i nva 






i nva 






i nva 






i nva 






i nva 




****** 


t * 




J . CMDA: 




OOOOOO 




MOV 


125616 




ADD 


1 1 2513 




NOP 




****** 


k * 




Ent er 


here 




These 


i nc 1 
bad 

ills 




****** 


c* 




J . CMOS: 




12S630 




ADO 


135630 


J , CMOC: 


ADO 


125504 




OR\L 


102420 




MOV 
.PAG 



(U.CMDA:)for a "protocol error' 
-END prot oco 1 errors include: 
1 id message length 
1 i d MSCP ver s 1 on 
1 id opcode 
1 id modi f i er 
1 id Unit Flag 
lid Controller Flag 
1 i d reserved field 



to clear the endcode 



#0P .END, RO 

#P . OPCD, R10\N, BAR %CALL S.STRO 
%JMP U.CMDC 

: ) for i r 



(U . CMDB 
ude : 
buffer descriptors 

gal byte counts 

#P . BCNO, R10\N, BAR %CALL S.CLRB 
#P . BCN1 . R10\N,BAR %CALL S.CLRB 



set opcode to OP. END 

and jump to set ftel 

d fields that are not "protocol error 



clear the byte count 
clear the byte count 



[ r ae 1 
[ r ae t 
[rael 
[ rael 

[rael 

[ rae 1 

[ rae 1 

[ rae 1 

[ rae 1 

[ rael 

; [ rael 

[ rael 

t rae 1 

liner 

t rael 

i [ rael 

[ rael 

[rael 

[ rael 

[rael 

; [ rael 

f i elds 

fields 



-CI 19 1 
-C 1 1 9 ] 
-CI 19 ] 
-C1 1 9 ] 
-C1 1 9] 
-C1 19] 
-CI 191 
-CI 19 ] 
-CI 19 ] 
-CI 19 ] 
-CI 1 9 ] 
-CI 19] 
-CI 19] 
r or 

-CI 19 ] 
-CI 1 9 ] 
-C1 19] 
-C1 19] 
-CI 19 ] 
-CI 19 ] 
-CI 19 ] 



#<ST.CMO* 128 . 



,R1 %CALL S . SWB1 
7.JMP U.C2EP 



[U52EC3]tEC0#2 I POSITION PACKET OFFSET T 
GO CONVERT TO END PACKET 



) [E121 ] 



[E121] 
[E121 ] 

[ E 1 2 1 ] 

SUB-CODE 
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MSCP AND OUP COMMAND ROUTINES 
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ROUTINE NAME: 

U.GCST (MSCP GET COMMAND STATUS COMMAND) 
'IMMEDIATE COMMAND' 



FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL PERFORM THE MSCP 
FOR THE CONTROLLER. 



GET COMMAND STATUS' COMMAND 



RIO 



POINTER TO MSCP PACKET 



OUTPUTS: 

MSCP -END' PACKET OUEUED TO THE HOST CONTAINING THE 
COMMAND STATUS. 

COMMAND STATUS - O i COMMAND DONE OR NOT FOUND 

COMPLEMENTED P . L BNO + P . LBN 1 a COMMAND FOUND OR ACTIVE 

: no modifiers allowed for Get Cont 

test that msg leng is large enough 

if not declare error 
test for reserved modifier bits 

it set then error 
GO MATCH REFERENCE NUMBER 
IF NO MATCH THEN DONE 
GO GET COMPLEMENTED LBN IN R7 
I1CK1PREVENT 2**32-1 
RO=C0MPARE INDICATOR 
ItSKlIF EO THEN CONTINUE 
IF ON RETRV CYCLE 
[18K1THEN ZAP 1 MORE BIT 
STORE HI STATUS 

R7=C0MPLEMENTE0 LO LBN NUMBER 
SAVE DONENESS VALUE 
CHANGE TO END PKT/EKIT 

COMPLEMENT BUFFER INTO R7 



OOOOOO 








M 
U 


GCST 
GCST: 


: = 










00251S 


013440 


OOOOOO 


132254 






NOP 




%CALL 


MLN20 


002516 


034441 


010001 


002806 






CLR 


R1 


'/.JNZRO 


U 


CMDA 


0O2S17 


003740 


OOOOOO 


132263 






MOV 


#M.GCST,Q 


'/.CALL 


TSTMOD 


002520 


033761 


O10005 


042506 






MOV\T 


#<P M00-P>,R1 


7.JNZR0 


U 


CMDA 


O02521 


034447 


000007 


132536 






CLR 


R7 


•/.CALL 


U 


GREF 


O02S22 


013440 


10OOO 


1 12533 






NOP 




7.JZR0 


U 


GCSB 


002S23 


010542 


007O17 


122535 






AOD 


#S . LBNH.R2NN, 


BAR '/.CALL 


U 


GCSC 


002S24 


135547 


0OO20O 


010000 






BIC 


#8IT1S,R7 








002S25 


01055O 


OO7005 


125573 






ADD 


#P . RS03. R10\N 


,BAR 7.CALL 


s 


LORO 


002S26 


1 35547 


010040 


142531 






BIC\F 


#20000, R7 


7.JZR0 


u 


GCSA 


002527 


1 14540 


000001 


OOOOOO 






BIT 


#BIT08,R0 








002530 


135567 


010140 


OS2531 






BIC\T 


#60000, R7 


7.TNZR0 






002531 


010550 


007013 


135 625 


U 


GCSA: 


AOD 


#P . CMS1 ,R10\N 


, BAR '/.CALL 


s 


STR7 


002532 


010542 


00701 6 


132535 






ADO 


#S . LBNL.R2\N, 


BAR "/.CALL 


u 


GCSC 


002533 


OIOSSO 


0O7O12 


125625 


U 


GCSB: 


ADO 


#P . CMSO, R10\N 


.BAR "/.CALL 


s 


STR7 


002534 


013440 


OOOOOO 


102303 






NOP 




%JMP 


u 


IMEX 


002535 


037707 


000003 


127777 


u 


GCSC: 


COM 
.PAGE 


(BUF) ,R7 


%RET 







Irae02] 

Irae021 
Irae021 
[rae02] 
[rae02] 
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ROUTINE NAME: 

U.CREF (GET COMMAND REFERENCE NUMBER MATCH) 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL MATCH THE OUTSTANDING REFERENCE NUMBER FIELD 
OF THE PACKET POINTEO TO BV RIO TO COMMAND REFERENCE NUMBER OF AN 
ACTIVE MSCP PACKET. 



INPUTS : 



R10 



POINTER TO MSCP ABORT OR GET COMMAND STATUS PACKET 



OUTPUTS: 

ZERO CONDITION CODE : FAILURE 

NONZERO CONDITION CODE = SUCCESS 

R2 POINTER TO PACKET OF MATCHED REFERENCE NUMBER 

R3 PACKET STATUS AND LINK WORD 



002536 


010550 


007010 


135573 


U 


GREF : 


AOD 


002S37 


010550 


00701 1 


135574 






ADD 
ASSUME 


OO2540 


033742 


000352 


10000 






MOV 


002541 


133542 


000002 


0100O0 






BIS 


002542 


131542 


017032 


177777 


U 


GRFA: 


SUB\F 


O02543 


033703 


000003 


000000 






MOV 


002544 












ASSUME 


002544 


010542 


037002 


135610 






ADD 


002545 


010542 


017003 


012550 






ADD 


002546 


01 6501 


0O0OO3 


010000 






XOR 


002547 


01O542 


017001 


137777 






ADD 


OO2550 


01 6S42 


000342 


102542 


u 


GRFB : 


XOR 
. PAGE 



#P . RFNO, R10\N, BAR 7.CALL S.LORO 

#P.RFN1 ,R10\N,BAR 7.CALL S.L0R1 

PKTENDai , EO.O 

#PKTEND«L0BYT,R2 

#PKTEND«HIBYT,R2 

#<MCP. LN+P> , R2,BAR %RZRO 

(BUF) , R3 

PSTAT.EO, BIT15 

#P . CRF0,R2\N, BAR 7.CMSB S.XORO 

#P . CRF1 ,R2\N, BAR 7.JNZR0 U.GRFB 

(BUF) ,R1\N 

#P . VCID. R2\N, BAR 7.RZR0 

»PKTBUF,R2\N 7.JMP U.GRFA 



RO:0UTSTAN0ING REF # LO 

R1 -OUTSTANDING REF # HI 

I16K1MAKE SURE PKTEND IS EVEN 

!16K]R2:END OF PACKET LIST ADDRESS 

1 1 6K] CONSTRUCT PKTEND IN R2 

IF EO THEN FAILURE RETURN/SUB PKT LENGTH FROM R2 

R3:STATUS AND LINK WORD 

MAKE SURE PSTAT IS MSB 

CHECK LO REF #-S FOR EOUALITV 

IF NOT THEN CONTINUE 
IF HI REF #'S EO 
[ I 6K) THEN RETURN 
IF NOT LAST PKT 
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PAGE IBS 



\J 



002551 

002552 

O02S53 

002554 
002555 

002556 
002557 
O02560 

002561 

002562 

002563 
0025S4 
002565 

002566 
002567 

002S70 
O02571 



010S50 

013440 

01 3440 

106640 
034460 

030545 
036140 
013440 

01 3440 

013440 

1 14640 
034460 
033740 

030545 
036140 

03444O 
003740 



007004 
000000 

000000 

010030 
01 0000 

0O0120 
000005 
1 0000 

000000 

000000 

010004 
10000 
000200 

OOOI 20 
0O0O05 

OIOOOO 
OOOOOI 



I3S57S 

125522 

132572 

102556 
177777 

135532 
OIOOOO 
002553 

125522 

132572 

1 12566 
067777 
127777 

135532 
OIOOOO 

042562 
1 27777 



ROUTINE NAME: 

U.GSDI (MATCH UNIT NUMBER TO SDI CONTROL BLOCK) 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL MATCH A 

TO THE PROPER SDI CONTROL BLOCK. 

RETURN AN ERROR. 

Seacuse duplicates can exist, first a search is done for an ONLINE drive 
with matching unit #. If none then a search returns the first that 
matches, and if it is a duplicate the search is declared UNSUCCESSFUL 
and the SC.DUP is returned in RO . Otherwise SUCCESS or UNSUCCESS is 
returned with ROsO. 



JNIT NUMBER GIVEN IN A MSCP PACKET 
IF NO MATCH CAN BE FOUND IT WILL 



INPUTS: 

RIO 



UBAR 

CONDITION CODE NONZERO 

CONDITION CODE ZERO 



POINTER TO MSCP PACKET 



=' SC.DUP if an offline duplicate unit found 

- otherwise 

SUBUNIT MASK IN BITS 15 - 12 

POINTER TO SDI CONTROL BLOCK (IF SUCCESSFUL) 

- UNSUCCESSFUL RETURN I BAD UNIT NUMBER) 

- SUCCESSFUL RETURN 



U . GSDI : 
U.GSON : 
U. GSOA: 



ADD 

NOP 

NOP 

; scomp 

XOR 

C L R \ T 

ADO 
XOR 
NOP 

NOP 

NOP 

: O=comp 

BIT 

CLR\T 

MOV 

ADD 
XOR 

CLR\F 
MOV 



#P. UNIT, R10\N, BAR %CALL S.LDR2 

"'.CALL S.S0I1 
; search each SOI entry f 
7.CALL U.GSDW 
liment of <DRAVL ! DRVOL 1 DRDUP> 
#<ORAVL !DRVOL>,0 %JZRO U.GSOB 
RO 7.RZR0 

'/.CALL S.FBC1 



OSDIB. L .UBAR 
UBAR,RO 

%JNZR 
;search each SO 

SCALL 

•ICALL 
liment of (DRAVL ! ORVOL ! 



#DRDUP,0 

RO 

#SC.0UP,RO 

#SDIB . L , UBAR 
UBAR. RO 



7.J2R0 
7.RNZR 
7.RET 



U.GSDA 

1 entry f 
S.SOI 1 

U. GSOW 
RDUP> 

U. GSDD 




7.CALL S.F8C1 



%JNZR 
%RET 



U . GSDC 



; get target unit # 

:entry point with R2 s unit # 

;UBAR = ptr to 1st SDI entry 

or ONL matching unit 

; IF current matches unit # 

i and is ONL or ONLtDUP 

; THEN return "SUCCESS" 

; ELSE try next SOI entry 

; increment SOI adrs 

; and test for end 

; i f not 1 oop 

>r any matching unit 

UBAR a ptr to 1st SDI entry 

search each SDI entry 

IF current matches unit # 

THEN IF it is NOT OUP 

THEN return "SUC" 
ELSE return "FAIL" 
ELSE try next SDI 
increment SDI adrs 
and test for end 
IF not end THEN loop 

ELSE dear SC.DUP value 
and return "FAIL" 



I raa03 ] 
[rae03 J 
[ rae03 ] 
(rae03 I 
Irae03] 



Irae03l 
[rae03l 



( rae03 
I rae03 
[ rae03 
[ rae03 
[ r ae03 
[ rae03 
[ r ae03 
( rae03 
[ rae03 
I rae03 
[ rae03 
[ rasO] 
[ rae03 
[ r ae03 
[ rae03 
[ rae03 
[ r ae03 
[ r ae03 
I r ae03 
E rae03 
[ r ae03 
t rae03 
E r ae03 
I rae03 
[ rae03 
[ rae03 
[ rae03 
( rae03 
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U.GSOW: is a local subroutine that tests if the current SDI block 

the unit number in R2 . 
Inputs: 

UBAR '■ current SDI block adrs 

R2 a desired unit # 



Out put s : 



Cond i t i on Code 
Q 



ZRO ■ No Match 

N2R0 : Match 

: compliment Of DRAVL , DRVOL , DRDUP bits 



002572 
002S73 
002S74 
002S7S 
002S76 
0O2S77 
002600 



133746 
010S45 
033700 
033443 
103740 
010545 
005600 



000020 
007043 
00OO03 
000000 
O0OO34 
007000 
000003 



OlOOOO 

10000 

oooooo 

010000 
10000 

oooooo 

10000 



MOV 
ADO 
MOV 
MOV 
MOV 
AOD 
BIC 



*DRV . U 1 , R6 

*SDI .UN. UBAR\N, BAR 

(BUF ) ,R0 

R0.R3 

#<ORAVL! OR VOL !ORDUP>,0 

#SDI .ST, UBAR\N, BAR 

(BUF) ,0 



002601 13S540 010374 142607 



BIC\F #DRV.UM,RO 



002602 
002603 
002604 
002605 
002606 



014143 
01 6140 
033760 
073446 
130440 



00O0O6 
010002 
01000 1 
000006 

030000 



010000 
1 12607 
177777 
OOOOOO 
002602 



002607 034440 OOOOOO 127777 



BIT 

XDR 

MOV\T 

ROT\L 

INC 

CLR 
. PAGE 



R6, R3 
R2, RO\N 
#1 ,R0 
R6.R6 
RO 

RO 



%JZRO 


U 


GSDV 


7.JZR0 
SRZRO 


U 


GSDV 


%JNMSB 


U 


GSDX 


%RET 







get mask for 1st sublimit 
get current SDI unit # 

R3 a subunit flags 
set mask for drive status bits 
get drive status bits 
Q=compliment of drive status bits 
if UNKNOWN then return "NO MATCH" 
get only unit # 

if subuit doesn't exist 

then return "NO MATCH" 
if unit #'S match return "MATCH" 
go to next subunit mask 
if not last subunit then loop 

else 

return "NOMATCH" 
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[ rae03 ] 
[rae03] 
[raeo3] 

[rao03] 
[ rae03 ] 
[ r ae03 ] 
[ rae03 j 
[ rae03 ] 
[ rae03 j 
t rae03 j 
[ rae03 ] 
[ rae03 ] 
[ rae03 ] 
[ rae03 ] 
[ rae03 ] 
[ rae03 j 
[rae03] 
[rae03] 
[ rae03 ] 
[ rae03 j 
[rae03] 
[ rae03 j 
[rae03] 
[ rae03 ] 
I rae03 j 
[ rae03 ] 
[ rae03 j 
[rae03l 



K...^ 
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ROUTINE NAME: 

U.GUCP (GET SUBUNIT CHARACTERISTICS POINTER) 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL MATCH THE UNIT NUMBER IN THE MSCP PACKET 
POINTED TO BY RIO TO A SUBUNIT BUFFER STATUS WORD'S UNIT NUMBER 
AND WILL RETURN THE POINTER OF THE SUBUNIT BUFFER. 



INPUTS : 



RIO 

UBAR 



POINTER TO MSCP PACKET 
POINTER TO SDI CONTROL BLOCK 



OUTPUTS : 

R3 EQUALS UBAR 

SOI .CW CONTENTS 

BAR POINTING TO SDI.CW 

CONDITION CODE 2ER0 - UNSUCCESSFUL RETURN (BAD UNIT NUMBER) 

CONDITION CODE NONZERO - SUCCESSFUL RETURN 



0026 10 


010550 


007004 


125574 


U 


GUCP: 


ADD 


#P .UNIT 


R10\N,BAR '/.CALL S.L0R1 


002 6 1 1 


010S45 


007056 


1 25572 






ADD 


#SDI . CW 


UBAR\N,BAR %CALL S.LDOQ 


0026 12 


1 14640 


000374 


OlOOOO 






BIT 


#DRV .UM 





002613 


135640 


01O374 


112616 






BIC 


*DRV .UM 


O.RO 7.JZR0 UGUCPC 


002614 


036140 


000001 


OOOOOO 






XOR 


R1 ,R0 




002615 


033463 


010005 


167777 






MOV\T 


UBAR.R3 


7.RZR0 


00261 6 


034440 


OOOOOO 


127777 


UGUCPC : 


CLR 


RO 


%RTN 














.PAGE 







R1 =UNIT # 
[V05] QsSUBUNIT BUFFER STATUS (SDI.CW) 

[U52EC21IF NOT USED 

IF NOT IN USE THEN CONT/ELSE ISOLATE UNIT 

IF EQ OESIREO UNIT 
[VOS] THEN RETURN (CCODE NEQ O) 
[V051 



L 
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ROUTINE NAME: 

U.GUST (MSCP GET UNIT STATUS COMMAND) 
'IMMEDIATE COMMAND' 



V/ 



FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL PERFORM THE MSCP 
FOR ANY UNIT KNOWN TO THE CONTROLLER. 



GET UNIT STATUS' COMMAND 



R1 

RIO 

UBAR 

OUTPUTS: 

MSCP 'END' 
UNIT STATUS. 



MSCP PACKET OUEUE AND STATUS WORD 

POINTER TO MSCP PACKET (1ST, 2ND, AND 3RD ENTRY) 

POINTER TO SOI CONTROL BLOCK (2ND AND 3RD ENTRY) 



PACKET QUEUED TO THE HOST CONTAINING THE 



ENTRY POINT #1 - COMPLETE PACKET PROCESSING • •• 



0200O0 
000001 

002S17 
002620 
002621 
002622 

002623 
002623 



003740 
103640 
0337S1 

O10S50 



000001 
000040 
01000S 
OO7007 



OOOOOO 

122263 
042S06 
135S73 



M. GUSH 
M. GUSL 
U .GUST : 
U .GUS : 



010550 047004 102632 



: s MD 
: = MO 

MOV 

BIS 

MOV\T 

ADD 

ASSUME 

ADD 



CSE 
NXU 



^modifiers allowed for 
;modifiers allowed for 



DP . GUS 
OP . GUS 



«M.GUSL ,9 

#M.GUSH.O 5SCALL TSTMOD 

#<P.MOD-P> ,R1 %JNZRO U . CMOA 

#P.M00,R1O\N, BAR SCALL S.LDRO 

MD . NXU , EO, BITOO 

#P . UNIT. R10\ N.BAR %JNLSB UGUSTC 



(rae02) 
( rae02 1 

[rae02J 
Erae02 1 
Irae02] 



002624 


033702 


000003 


135630 




MOV 


002625 


01 3440 


OOOOOO 


122552 


UGUSTA: 


NOP 


002626 


1 1 4542 


010374 


102631 




BIT 


002627 


130442 


010002 


102625 




INC 


002630 


01 3440 


OOOOOO 


1 12632 




NOP 


002631 


01O550 


007004 


125621 


UGUSTB : 


ADD 



HANDLE NEXT UNIT MODIFIER *«* 
IBUF) , R2 



%CALL 
7.CALL 
7.JZR0 
7.JZR0 
%JMP 
#P .UNIT, R10\N, BAR %CALL 



#DRV .UM, R2 
R2 



S . CLRB 
U. GSDN 
UGUSTB 
UGUSTA 
UGUSTC 
S .STR2 



set legal modifier bits 

test for reserved modifier bits 

it set then error 
RO=PKT MODIFIERS 
MAKE SURE MO. NXU IS LSB 

THEN GD FIND SOI CNTRL BLK 



R2=UNIT START/ZAP UNIT # IN CASE NONE FOUND 

GO MATCH THIS UNIT # 

IF FOUND THEN EXIT 

IF UNIT NOT OVERFLOW 10 BITS THEN LOOP 

ELSE NEXT UNIT NOT FOUND 
RESET UNIT NUMBER 



FIND UNIT IN SDI CONTROL BLOCK AND ACKNOWLEDGE ATTENTION MESSAGE *** 



002632 
002633 
002634 
002635 
002636 
002637 
002640 
002641 
002642 
002643 



010550 
010550 
010550 
010550 
013440 
033S60 
033746 
0337SO 
1 14640 
0337S6 



007010 
007O1 1 
007022 
007023 
OOOOOO 
O10003 
OOOOOO 
O100O3 
0000 10 
01OO04 



125630 
135630 
135630 
125630 
1225S1 
042420 
132610 
142377 
OOOOOO 
042644 



ADD 

ADD 

ADD 

ADD 

NOP 

BIS\T 

MOV 

MOV\T 

BIT 

MOV\T 



#P . SCNO, R10\N , BAR 7.CALL 
#P . BCN1 ,R10\N,BAR "/.CALL 
#P . RS16,R10\N,BAR "/.CALL 
#P . RS17 ,R10\N,BAR 7.CALL 
7.CALL 
7.JNZR0 
%CALL 
7.JZR0 



#ST . OFL , RO 
#ST SUC. RS 
#ST . OFL , RO 
#ORV . AV , 
#ST . AVL , R6 



S . CLRB 
S . CLRB 
S . CLRB 
S .CLRB 
U.GSDI 
U. C2EP 
U . GUCP 
U . C2E0 



7.TNZR0 



clear the byte count fields 

clear the byte count fields 

clear the byte count fields 

clear the byte count fields 

GO GET SDI PTR 

IF UNKNOWN THEN DONE 

R6=SUCCESS STATUS 

IF NOT FOUND THEN UNIT OFFLINE 

IF DRIVE AVAILABLE 

THE R6=AVAILABLE STATUS 



[E122! 
IEI221 
IEI22] 
[E1221 
[E122] 
(rae03 j 



KDB50. MICROCODE . .22-APR-1988 11; 1 6 : 48.9 7 



\j 



KDBUP DIGITAL EOUIPMENT CORP. 

MSCP AND DUP COMMAND ROUTINES 



2901 ASSEMBLER VERSION 32 



FILL IN TRACK SIZE »** 



PAGE 189 



002644 000550 

002645 

002645 O10545 



000023 

007074 



OOOOOO 
123366 



ADD 

ASSUME 

ADD 



#<P . TRCK- I > , R10.0 

LBNMSK, EO, LOBYT 

#SDI . 12, UBAR\N, BAR "'.CALL STBBLG 



FILL IN GROUP SIZE *** 



002646 
002646 



002647 
002647 



002650 
002650 
002651 



002652 
002652 



002653 
002654 
002655 
0026S6 
002637 
0O2657 
002660 



010545 007066 123366 



010545 007065 123366 



ASSUME 

ADD 



P . GRP.EO, P . TRCK+1 

#SDI . TG, UBAR\N, BAR 7.CALL STBBLG 



FILL IN CYLINDER SIZE **» 



ASSUME 
ADD 



P . CYLS , EO, P . GRP+ 1 

#SDI . GC,UBAR\N,BAR 7.CAI.L STBBLG 



Q=START OF STORAGE AREA- I 
MAKE SURE MASK IS LO BYTE 
[VOS] GET AND SAVE LBN'S/TRACK 



MAKE SURE SEQUENTIAL 
[VOS] GET AND SAVE TRACKS/GROUP 



; MAKE SURE SEQUENTIAL 

;(V05] GET AND SAVE GROUPS/CYLINDER 



FILL IN UNIT HARDWARE/SOFTWARE VERSION NUMBERS »»» 



010S45 
135S40 



007036 
OO0200 



135S73 
133370 



010545 007077 123365 



010545 
034540 
01O545 
134541 

033140 
033440 



007067 
000077 

007034 
0O0017 

O000O1 
000006 



125573 
10000 
135574 
10000 

133370 
1 22377 



002661 013440 OOOOOO 113702 



ASSUME P .USVR. EQ, P.CYLStl 

ADD #SDI . RS, UBAR\N, BAR 7.CALL S.LDRO 

BIC #F0IAG,RO 7.CALL STROLG 

FILL IN RCT SIZE *>* 

ASSUME P . RCTS.EO. P . USVR+1 

ADD #SOI . RV,UBAR\N,BAR %CALL ST8FLG 

FILL IN RBNS AND COPIES «»« 

ADD #SOI . RT, UBARVN , BAR %CALL S.LDRO 

AND #RSNMSK,RO 

ADD #SOI .RC, UBAR\N. BAR '/.CALL S.LDR1 

AND #L0NIB«2S6 . ,R1 

ASSUME P.RBNS.EQ.P RCTS*1 

OR R1.R0 7.CALL STROLG 

MOV R6.R0 7.CALL U.C2ED 

FILL IN UNIT, MEDIA TYPE IDENTIFIER'S «• 

NOP %JMP U.SUNI 

. PAGE 



MAKE SURE SEQUENTIAL 
[V05] [EC0*2!GET AND SAVE UNIT H/W 8 S/W VERSION #S 
clear the FD bit supplied over the SDI 



MAKE SURE SEQUENTIAL 
IV05] GET AND SAVE RCT SIZE IN LBN'S 



[VOSJ ROiRSN 'S/TRACK 
ISOLATE RBN'S/TRACK 
RlsRCT COPIES 
ISOLATE RCT COPIES 
MAKE SURE SEQUENTIAL 

MERGE THE TWO AND STORE IN END PKT 
RO:MSCP STATUS/GO CHANGE TO END PKT 



SET IN UNIT. MEDIA TYPE IO'S/RETURN 
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ROUTINE NAME: 

U.IOPR (MSCP I/O PROCESS 

'NON-SEQUENTIAL COMMANDS' 

U.IOPO {the same but tests reserved 



READ .WRITE, COMPARE, ACCESS. ERASE) 
elds first) 



FUNCT 
ENTRY 



IONAL DESCRIPTION: 
THIS ROUTINE WILL PERFORM THE FOLLOWING FUNCTIONS ON THE FIRST 

1. MATCH UNIT NUMBER TO SDI CONTROL BLOCK (ERROR IF NO MATCH) 

2. 9UE PACKET ON SDI CONTROL BLOCK'S PACKET LIST 

3. CALCULATE CYLINDER, GROUP, TRACK. SECTOR ( START ) , SECTOR ( I NDEX I 
E SECOND ENTRY THE FOLLOWING FUNCTIONS ARE PERFORMED: 

t. PRESET THE NUMBER OF BYTES REMAINING FOR THIS TRANSFER 

2. SET THE NUMBER OF SECTORS FOR THE HEADER COMPARE SEARCH LIMIT 

3. PRESET THE CURRENT HOST MEMORY ADDRESS 

4. CHECKS THE NEW CYLINDER NUMBER AGAINST THE CURRENT CYLINDER 

NUMBER AND DOES NOT INITIATE A SEEK IF THEY ARE EQUAL 

5. CHECKS THE NEW GROUP NUMBER AGAINST THE CURRENT GROUP NUMBER 
AND DOES NOT ISSUE A SELECT GROUP COMMAND IF THEY ARE EQUAL 



R10 
UBAR 



MSCP OP CODE 

PACKET QUEUE AND STATUS WORO 

MSCP PACKET POINTER (1ST, 2ND, ANO 3RD ENTRY) 

POINTER TO SDI CONTROL BLOCK (2N0 ANO 3RD ENTRY) 



OUTPUTS : 

MSCP 'END' PACKET IF ERROR 

CALCULATED PARAMETERS AS DESCRIBED ABOVE 

UPDATED SDI STATUS TO 'INIT SEEK' OR 'BUFFER REQUEST' AS DETERMINED 

BY THE CYLINDER MATCH OUTCOME 



12740O 








M 


CMPH 


: a 


0Q0200 








M 


CMPL 


: 3 


002662 


003740 


000200 


000000 


U 


CMPR: 


MOV 


002683 


103640 


000257 


102705 






BIS 


1 67400 








M 


RDH 


: i 


000200 








M 


RDL 


: s 


002664 


003740 


000200 


OOOOOO 


U 


RD: 


MOV 


002665 


103640 


000357 


1 12705 






SIS 


17 140O 








M 


WRH 


: = 


000360 








M 


WRL 


: s 


002666 


003740 


000360 


010000 


U 


WR: 


MOV 


002667 


103640 


00O363 


102705 






BIS 



MD.EXP!MD.CSE!MO.SCH!MD.SCL!MO.SEC!MD.SER 
MD.SSH 



;OP.CMP modi f lersl rae02 ] 
; OP . CMP modi f i ers [ rae02 1 



#M.CMPL,Q 
#M. CMPH , 



7.JMP 



U. IOPR 



set legal modifier bits 
set legal P. MOD bits 



MD .EXPiMD. CMPIMD . CSEiMO . SCH ! MD .SCL ! MD . SEC'MO .SER ;OP.RD mod i f 

MD.SSH ;0P.RD modif 

#M.RDL,Q ; set legal modifier bits 

#M.RDH,Q "UMP U.IOPR ; set legal P. MOD bits 

MO . EXP ! MO . CMP ! MO . CSE ! MO . ERR ! MD .SEC ! MO . SER ;0P.WR modif 

MO . SSH !MD .WBN ! MD .WSV !MD . SEQ ;OP.WR modif 

#M.WRL,Q ; set legal modifier bits 

#M.WRH,Q XJMP U.IOPR ; set legal P. MOD bits 



ACC, ERS, 



RPL must verify reserved fields, hence call U.IOPO 



127400 
000200 
002670 



003740 00020Q OOOOOO 



M.ACCH := MO .EXPIMD . CSE ! MO . SCH ! MD .SCL IMO.SECIMD .SER ;OP.ACC modi 

M.ACCL : = MD.SSH ; OP . ACC modi 

U.ACC: MOV #M.ACCL,9 ; set legal modifier bits 



lrae02] 
[ rae02 1 

iers [rae02] 

iers (raeo21 

Irae02) 

Irae02] 

iers Erae02] 
iers (rae02) 

[ rae02 ] 
Irae02] 

[rae02] 

f isrsl r ae02 1 

f i er s[ rae02 ] 

Irae021 
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002671 103640 000257 



#M.ACCH,Q 



%JMP 



set legal P. MOD bits 



lrae02] 



13040O 

0003S0 
002 672 
002673 



003740 
103640 



120000 
00O001 

002674 003740 

002675 103640 



002676 
002677 
002700 
002701 
002702 
002703 
002704 

002705 
002706 



0O2707 
002710 

00271 1 
0O2712 
0O2713 
00271 4 
002715 
002716 
0O2717 
002720 
002720 
00272 1 
002722 



002723 
0O2724 



1 1454 1 
013460 
013440 
033761 
013440 
013440 
013440 

1 14541 
013460 



013440 
033761 

013440 
034441 
034441 
034462 
034442 
034461 
033760 

000550 
1 14542 
033761 



133740 
031440 



000360 
OOQ26 1 



000001 
000240 



OOOIOO 
010000 
OOOOOO 
010005 
OOOOOO 
010000 
OOOOOO 

OOOIOO 
010000 



OOOOOO 
010005 

OOOOOO 
010001 
000001 
01 0002 
000002 
1OO0 1 
010003 

0O702 1 
000360 
010016 



000002 
020000 



10000 
102676 



OOOOOO 
01OOOO 



0100O0 
042770 
122263 
042506 
122247 
002506 
112711 

10000 

042770 



122263 
042506 

122255 
002 506 
122551 
052417 

1226 10 
173210 
142377 

13321 1 
OOOOOO 
052S1 1 



133215 
102756 



M. ERSH 
M.ERSL 
U .ERS: 



M.RPLH 
M.RPLL 
U.RPL : 



MOV 
BIS 



MO . EXP ! MD. CSE ! MO . ERR! MO .SER 
MD . SSH ! MD .WBN ! MD -WBV ! MD . SEQ 

#M. ERSL ,0 

#M.ERSH,Q 7.JMP 



:= MD . EXPIMO.CSE 

: = MD . PRI 

MOV #M.RPLL,Q 

BIS #M.RPLH,Q 



;OP.ERS mod i f i er s ( r ae02 ] 

;OP.ERS mod i f i er s[ rae02 ] 

set legal modifier bits [rae02] 

set legal p. MOD bits (rae021 

;OP.RPL modif 1ers[rae02 ] 

;OP.RPL modi f ierst rae02 ] 

set legal modifier bits [rae02] 

set legal P. MOO bits [rae02] 



BIT 

NOP\T 

NOP 

MOV\T 

NOP 

NOP 

NOP 

BIT 
NOP\T 



#PACTV, R1 



#<P . MOO-P> , R1 



#PACTV,R1 



•/.JNZRO 

•/.CALL 

XJNZRO 

XCALL 

7.JNZR0 

%JMP 



U . IOPC 
TSTMOD 
U.CMDA 
U.RSVB 
U . CMDA 
U . I0P1 



7.JNZR0 U.IOPC 



IF PACKET ACTIVE 

THEN GO TO ENTRY POINT #2 
Test modifier bits 

it set then error 
Test reserved fields 

if error goto error rtn 
join common code 

IF PACKET ACTIVE 

THEN GO TO ENTRY POINT #2 



[rae021 

1 rae02 ] 
Irae02) 
[rae02l 
(rae02 1 
[rae021 
[rae02] 



ENTRY POINT #1 



INITIAL PACKET PROCESSING »»» 



NOP 

MOV\T 

NOP 
CLR 

CLR 

CLR\T 

CLR 

CLR\T 

MOV\T 

ASSUME 

ADO 

BIT 

MOV\T 



#<P .M00-P>,R1 



'/.CALL 
-.JNZRO 



TSTMOD 
U. CMDA 



R1 

R1 

R2 

R2 

R1 

#ST. OFL ,R0 

P . LBN1 , EQ.P 

#P. LBN1 ,R10 

#HDCOD, R2 

#<P. LBNO-P> 



•/.CALL 

•'.JNZRO 

•'.CALL 

*/.JNZRO 

%CALL 

%CZRO 

%JZRO 
LBNO+1 
Q.BAR '/.CALL LDR2R1 



MLN40 
U .CMDA 
U .GSDI 
U .C2EZ 
U . GUCP 
U .SBCN 



U .C2E0 



R1 HJNZRO U.CMDB 



[ rae02l 
[rae02] 
[rae02l 
is large enough [rae021 
!rae02] 



CHECK IF START LBN GR/EO 1ST RCT LBN *»* 



MOV 

OEC 



#SECSZ*2, RO 
RO 



7.CALL 
XJCRY 



U.CRCT 
U . IOPB 



Test modifier bits 
it set then error 

test that msg leng 

if not declare error 

ELSE 1ST ENTRY/GO FINO SDI CONTROL BLK 
IF OFFLINE THEN DONE 
GET THIS UNIT CHAR PTR IN R3 
IF OFFLINE ZAP BYTE COUNT 
IF OFFLINE THEN FIND OUT WHY 
MAKE SURE SEQUENTIAL 
R1/R2=L0/HI MSCP LBN 
IF LBN OVERFLOW 

report error [rae1-C119] 



[16K1IF LBN GR/EQ 1ST RCT LBN 
[ 1 6K1 THEN OK/CONTINUE 



CHECK BYTE COUNT FOR GREATER THAN 22-BITS *** 



002725 


OIOSSO 


007O13 


13SS76 




ADD 


002726 


013440 


03OOOO 


012732 




NOP 


O02727 


010550 


00701 1 


135572 




ADD 


002730 


1 14640 


0OO3O0 


OiOOOO 




ANO 


002731 


033761 


10006 


0425 1 1 


U . I OPS: 


MOV\T 



#P . SUF1 ,R10\N,BAR %CALL S.LDR3 

7.JNMSB U.IOPS 

#P . BCN1 , R10\N, BAR '/.CALL S.LDOO 
OBANOT, 0\N 

*<P.BCNO-P> , R1 7.JNZR0 U.CMDB 



GET MAPPING INDICATOR WORD 

IF MAPPING NOT ACTIVE THEM SKIP THIS 

CHECK BYTE COUNT SIZE 

(BOA) CHECK HIGH BITS 

ANY BIT ABOVE BIT21 THEN ERROR [rae1-C119] 
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CONVERT BYTE. COUNT TO BLOCK COUNT »< 




002747 
002750 
002751 
002752 
002753 
002754 
O02755 
002756 



002757 
002757 
002760 
002760 



010550 
010550 
013047 
000040 
1 30467 
033740 
010S45 
034540 
03374 1 
01 3440 
043447 
103660 
03 1440 



034547 
0O124O 
03 1467 
030041 
130462 
0301 42 
033761 
10545 



000550 
O10545 



007010 
00701 1 
000007 
OIOOOO 
020007 
0600 1 1 
007067 
000077 
10O06 
000000 
010007 
040200 
000000 



000 177 
OOOOOO 
020007 
000001 
020002 
000007 
O20O0S 
007022 



007021 
007O74 



125572 
125601 
010000 
102756 
152737 
012744 
125573 
OIOOOO 
I 12506 
1 12756 
152747 
042746 
1 12744 



OIOOOO 
OOOOOO 
042752 
OOOOOO 
152754 
133215 
I52S 1 1 
133222 



13321 1 

135604 



ADD 


#P . BCN0,R10\N,BAR '/.CALL 


S . LDQO 


ADD 


#P . BCN1 , R10\N, BAR "/.CALL 


S . LDR7 


OR 


0. R7\N 




ADD 


R0,0 %JZR0 


U. IOPB 


INC\T 


R7 %TCRV 




MOV 


#9. ,R0 7.JNUPF 


U.IOPA . 


ADD 


#S0I .RT, UBARXN, BAR 7.CALL S.LDRO . 


AND 


#RBNMSK. RO 




MOV 


#<P .RBNO-P> ,R1 %JZRO 


U.CMOA 


NOP 


%JMP 


U. IOPB 


ROT\ROF 


R7 7.JZR0 


UI0PA1 


BIS\T 


#BIT15,0 7.TLSB 




DEC 


RO 7.JMP 


U . IOPA ; 



[16K]9=L0 BVTE COUNT 

I16K]R7:HI BYTE COUNT 

[ 1 6K] IF BVTE CONT EO O 

[16K1 THEN SKIP CHK/ELSE ADD 777 TO LO BVTI CNT 

[1SK1IF CARRY THEN INCR R7 

I16K1IF NOT REPLACE THEN ROiLOOP COUNT: 

Replace - get RBN's/track 



Illegal if no RBN ' s 1 tSSD) 
Otherwise skip block extent test 
[16K1D0UBLE RIGHT SHIFT R7 , 
[16K1IP LSB OF R7 THEN SET MSB Or 
II6K1DECR LOOP COUNT/LOOP 



(E121 1 
IE121 ] 
[E121 ] 
[E122] 
[E121 ] 



ADD BLOCK COUNT IN AND R7 TO R1 AND R2 (START LBN) »»« 
#177, R7 

7.TNCRY 



ANO 

DEC 

DEC\T 

AOD 

INC\T 

AOD 

M0V\T 

ADD 



R7 

0. R1 

R2 7.TCRY 

R7.R2 '/.CALL U.CRCT 

#<P . BCNO-P> . R1 %JCRY U.CMDB 

#S0I .PO, UBAR\N,BAR %CALL U.LNKP 



[16K1IS0LATE LIVE BITS 

[ 1 6K1DECR 

[ 16KIAND R7 IF BORROW 

[16K1ADD LO BLK CNT TO LO LBN 

[16K1IF CARRY THEN INCR HI LBN 

(16K1ADD HI BLK CNT TO HI LBN 

I16K1IF GR/EO RCT THEN ERROR [r«a1-C119] 

I16K1G0 LINK PKT TO LIST 



COMPARE MODIFIER OR UNIT FLAG RE-ENTRY POINT (CALLED FROM U.IOPJ) **» 



ASSUME P . LBN 1 , EO, P . LBNO+1 

ADD #P. LBN1 ,R10,Q, BAR 7.CALL LDR2R1 

ASSUME LBNMSK, EO. LOBYT 

ADO #SDI . 12, UBARXN, BAR 7.CALL S.LLBO 



MAKE SURE SEQUENTIAL 
R1/R2=L0/HI MSCP LBN 
MAKE SURE MASK IS LO BVTE 
[V051 GET LBN'S PER TRACK IN R0<7:0> 



002761 


010545 


007064 


125601 


U 


IOPX : 


ADO 


002762 












ASS 


002762 


Ol 3740 


007040 


1 25630 






MOV 


002763 


134547 


003360 


125620 






AND 



002764 
002765 
002766 
002767 
002767 
002767 
0O2767 
002767 

KDBUP 



01 3440 
O30550 
033443 



003002 
000024 
000005 



125616 
135630 
OIOOOO 



REVECTOR CODE ENTERS HERE TO CONVERT RCT BLOCK NUMBER 

LBN/RBN IN ( R2 , R 1 ), LBN/RBN PER TRACK IN RO , //R3 - - >SUBUN I T CHAR, R10-->MSCP PKT 

#SDI . H2 , UBARXN , BAR '/.CALL S.L0R7 ; ( V05 ] R7 \<15:12> = HI CYL NUMBER 
ASSUME <CNVTVI»17> , LE, < 1 7 - < CN VT V4 - CN VT V 1 >> ; USE AUTO-INC TO PAINT CNVTVX 
#CNVTV1,BAR 7.CALL S.CLRB ; LOW START CYL NUMBER = O 
#CYLSTR,R7,BUF 7.CALL S.STR1 ; MASK S STORE HI START CYL, LOW BLOCK # 

ONLINE CODE ENTERS HERE TO CALCULATE FIRST XBN CYLINDER **» 
HI XBN IN R2, R10->MSCP PACKET 

STORE HI BLOCK #, BLOCKS/TRACK 

SECTOR OFFSET = O, POINT RIO AT RESULT BUF 



033445 000010 112430 

KDB50. MICROCODE. .22-APR-19S8 I 1 : 16:46. 97 



MOV 


R2, BUF 


%CALL 


S 


STRO 


ADD 


#S . CYLL , RIO 


7.CALL 


S 


CLRB 


MOV 


UBAR, R3 








ASSUME 


S .CYLH, EO,S 


CYLL+ 1 






ASSUME 


S . GRUP, EO.S 


CYLH+I 






ASSUME 


S . TRAK, EO.S 


GRUP+1 






ASSUME 


S . SECS , EO, S 


TRAK-M 






MOV 


RIO, UBAR 


7.JMP 


u 


CNVT 



UBAR:RESPONSE AREA/GO CNVT 7BN/RETURN 



•• [ E 1 2 1 ] 
i 1E121 1 
; 1E121 ] 

: (E12 1 I 

; (E 121 I 
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**NOTE*« IF RBN. SECTOR POS. WILL BE WRONG 



ENTRY POINT #2 - ACTIVE PACKET PROCESSING »«« 
G>RUPF IF NORMAL I/O, (PSUPF IF REPLACE COMMAND »** 
NOTE - RO MUST HAVE OP CODE I I I «»* 



002770 


033447 


OOOOOO 


122610 U . IDPC : MDV 


002771 


033760 


10003 


153022 


M0V\T 


002772 


010545 


007047 


125630 


AOD 


002773 


134642 


000010 


OOOOOO 


AND 


002774 


033760 


1 0004 


053022 


MOVXT 


002775 


10545 


007000 


135573 


AOD 


002776 


014540 


000200 


OIOOOO 


BIT 


002777 


13374 1 


10002 


01 3 1 10 


MOV 


OO30OO 








ASSUME 


OO30OO 


000570 


06701 1 


06321 1 


ADD\T 


00300 1 


03376O 


0401 1 1 


053022 


MOV\T 


003002 








ASSUME 


003002 


000545 


007015 


123213 


ADD 



7.CALL U.GUCP 
.RO 7.JZR0 UIOPER 
,UBAR\N.BAR 7.CALL S.CLRB 



7.JNZR0 UIOPER 
,UBAR\N,BAR 7.CALL S.LDRO 



o 



0O3003 
003003 
OO30O4 
OO30O5 
003005 
OO30O6 
003007 
00301O 
0O301O 



0030 1 1 
OO30 12 
003013 
OO3014 
O03015 
00301 6 
003017 
003020 
00302 1 
OO3022 
O03O23 
003024 
0O302S 
003026 
OO3027 
003030 
O0303 1 
O03032 
003033 



014547 
01344O 

000550 

033760 
135542 



000020 
OIOOOO 

007013 
040051 
00O300 



OOOOOO 
O 130 1 1 

12321 1 
053022 
OOOOOO 



000550 007022 1232 13 



RO, R7 

#ST.OFL 

#S I . 2 T 

#DRV . AV.O. R2 

#ST . AVL 

#SOI .ST 

#XCMP.RO 

#SECSZ*2,R1 %JNZRO U.IOPG 

P . BCN1 , EO,P .BCNOH-1 

#P .BCN1 , RIO, O.BAR 7.CNUPF LDR2R1 

#<ST.HST + SC.0DB>, RO 7.JLSB UIOPER 

SDI . XH, EO.SDI . Xl+1 

#SOI . XL , UBAR, O.BAR 7.CALL STR1R2 

SET CURRENT HOST MEMORY ADDRESS *** 

ASSUME <0P. RPL ! OP . ACC ! OP . ERS>S20,NE.O 

BIT #20, R7 ■ 

NOP 7.JNZR0 U . IOPW ; 

ASSUME P.BUFH.EO.P . BUFL+1 j 

ADD #P BUFH, R1O.0. BAR 7.CALL LDR2R1 ; 

MOV\T #<ST. HST+SC.OOT> , RO 7.JLSB UIOPER 

BIC #BANOT, R2 ; 

ASSUME S . AORH , EO, S . ADRL+ 1 ; 

ADD #S .ADRL , R10.0, BAR 5SCALL STRtR2 ; 

SET CURRENT HEADER ADDRESS AND CHECK CYLINDER AGAINST MAX *« 



IE121 ] 
IE121 ] 
(E121 I 
[E121 1 



[ 16K]R7=0PC0DE 
IF OFFLINE THEN EXIT 
(V051 [EC0#21CLR TEMP #2 
IF SUBUNIT AVAILABLE 

THEN DONE 
ROsSOI CNTRL BLK STATUS 
IF TRANSFER COMPLETE 

R1=W0RD C0UNT/R2*O (IN CASE REPLACE) 
MAKE SURE SEOUENTIAL 

IF NOT REPLACE THEN R1/R2=BYTE COUNT LO/HI 
IF ODD THEN ODD BYTE COUNT BUFFER ERR0R;[EI21) 
MAKE SURE SEOUENTIAL 
SAVE LO/HI TRANSFER COUNT 



[16K1MAKE SURE CHECK WILL WORK 
[ 16K] IF ACCERS, OR RPL 

[16K] THEN SKIP BUFFER DESCRIPTOR 
MAKE SURE SEOUENTIAL 
R1/R2=H0ST ADOR LO/HI 
; IF ODD THEN ODD TRANSFER AODR BUFFER ERROR; (E12I) 
IBDA] MAKE SURE RESERVED IS 2ER0 
MAKE SURE SEOUENTIAL 
SAVE LO/HI HOST ADDR 



010550 
0105SO 
01054S 
010545 
132140 
112162 
033741 
010545 
013440 
010545 
013740 
010545 
010545 
033450 
010545 
034441 
034442 
O10545 
010545 



007024 
007025 
007063 
007064 
000006 
10007 
020016 
007025 
O lOOOO 
007025 
013000 
007015 
0070 1 6 
000006 
007003 
060001 
000002 
007013 
OO70O5 



125601 
125606 
135575 
125604 
OIOOOO 
14 3017 
043032 
125573 
102502 
1 35600 
153027 
135630 
135630 
103230 
135616 
143176 
103172 
125573 
1356 16 



ADO 

ADD 

ADD 

ADD 

RSUB 

CMP\T 

M0V\F 

ADO 

NOP 

ADD 

M0V\F 

ADD 

ADD 

MOV 

AOD 

CLR\F 

CLR 

ADD 

ADO 



#S .CYLL , R10XN, 
#S . CYLH , R10\N , 
#SDI .HI, UBARXN 
#SD I . H2 , UBAR\N . 
R6 , RO 
R7 , R2 

#<P . LSNO-P> , R1 
#SDI . OM, UBARXN, 

#SDI .OM, UBARXN . 

#0, BUF 

#SDI . XL, UBAR\N, 

#SDI . XH, UBAR\N, 

R6. RIO 

#SDI ,SW, UBARXN, 

R1 

R2 

#SDI . GP, UBAR\N, 

#SDI . UG, UBARXN , 



BAR XCALL S.LDR7 
BAR XCALL S.LLB6 
BAR 7.CALL S . LDR2 
BAR 7.CALL S . LLBO 



XTZRO 

7.JNCRY 
BAR 7.CAL 

%J2R0 
BAR %CAL 

7.JZR0 
BAR %CAL 
BAR 7.CAL 

7. J MP 
BAR 7.CAL 

7.JUPF 

%JMP 
BAR %CAL 
BAR %CAL 



U. IOPP 
L S.LDRO 

U .CMDE 
L S.LDR6 

10$ 
L S.CLRB 
L S . CLRB 

U. LNKH 
L S.STRO 

U . IOPM 

U. IOSA 
L S.LDRO 
L S.STRO 



; [16K]R7:L0 CALCULATED CYL # 

; R6:HI CALCULATED CYL • 

;IV05I R2:L0 CYLS IN HOST AREA 

;[V05! ROsHI CYLS IN HOST AREA 

; SUBTRACT HI CYL #'S 

; IF EO O THEN COMPARE LO CYL »'S 

; [US2EC11IF NO CRY THEN OK * CONTINUE 

; [U52EC1] ELSE CHK FOR OVERLAPPED CMD 

and report error 
; (U52EC1 |R6:0VERLAPPED COMMAND 
; IU52EC11IF NO THEN CONTINUE 
; [V051 CLEAR XL FOR OVERLAPPED COMMANDS 
; [V05] CLEAR XH FOR SAME 
; IUS2EC1) ELSE RESTORE OVERLAPPED CMD TO TOP OF OU 
; SAVE ERROR CODE ;IE121I 

,' IF REPLACE THEN CLEANUP/EXIT 
; ELSE ZAP BVTE COUNT/EXIT 
; ROsCURRENT GROUP NUMBER 
; SAVE FOR U.PROC GROUP COMPARE 



[CI IS] 
; [E121 1 
I [E12I 1 
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ONLINE COMMAND ENTERS HERE TO FINISH I/O PREPARATION «*« 

CYLINOER IN (R7.R61, RIO •> PKT, UBAR -> SOI BLK, //R3 -> SUBUNIT BLK *«* 

RO HAS LBN/XBN ADJUSTMENT NIBBLE IN BITS < I I : S> OF RO «•• 

SAVE STARTING LBN LO AND HI IN S.LBNL AND S.LBNH WHICH OVERLAV S.CYLX **« 



003034 

003034 
003035 



O03O35 
0O3035 



003036 
003037 
003040 



003041 
003042 
003042 
003042 
O03043 



003044 
O03045 
003046 

00304 7 
003O47 
O03O47 
003050 

00305 1 



003052 
O030S3 
003054 



000550 007021 



0OO55O 007016 1332 13 



ASSUME P . LBN1 , EO.P . LBNO+1 

ADD #P . LBN1, RIO, O.BAR 7.CALL L0R2R1 

ASSUME LBNSTR«16. . EO, XBNSTR 

AND #LBNSTR,RO 

ADD R0.R2 

ASSUME S . LBNH, EQ.S . LBNL+1 

ADD #S. LBNL , RIO, O.BAR '/.CALL STR1R2 

SET UP SOI OP CODE FROM MSCP OP CODE «** 



103740 
010545 
103740 



000027 
007O22 
010245 



000000 
134123 
153044 



MOV 
ADD 
MOV\F 



#READC0,9 

#SDI . PO, UBAR\N, BAR %CALL CKWRER 

*WRITCD,0 7.JZR0 10$ 



MAKE SURE SEQUENTIAL 

R1/R2=L0/HI STARTING LBN 

MAKE SURE MASKS ARE OK 

[U52EC2] ISOLATE HI STARTING LBN 

1U52EC2] ADO INTO HI LBN 

MAKE SURE SEQUENTIAL 

SAVE LO/HI LBN'S 



ASSUME OPERATION IS A REAO 

IF OP IS NOT WRITE, ERASE, OR REPLACE 

THEN CONTINUE/ELSE CHANGE OP CODE ;[E121] 



o 



WRITE, ERASE. OR REPLACE COMMAND 



CHECK FOR WRITE PROTECT »«• 



01054S 007060 135573 



134540 
03354Q 



013440 
010545 
030142 



013240 
1301 62 
010545 



010545 
134542 
033142 



000060 
010006 



oooooo 

O07O23 
000O02 



OOOOOO 
O30OOO 
007001 



007064 
000377 
000006 



OOOOOO 
013022 



132473 
1 35621 
01OOOQ 



OOOOOO 
04305 1 
135621 



125575 

01 0000 
OOOOOO 



ADD #SDI . UF, UBAR\N,BAR '/.CALL S.LDRO 

ASSUME UF.WPH.EQ.SC .WPH 

ASSUME UF .WPS.EQ.SC. WPS 

AND #<UF ,WPH!UF.WPS> , RO 

OR #ST.WPR,RO 5SJNZR0 UIOPER 

CALCULATE SEARCH LIMIT FOR . PROC *»* 

NOP 7.CALL U.CSPT 

ADD #SOI RO,UBAR\N, BAR ICtLL S.STR2 

ADD R2.R2 

ASSUME WRITCD4BIT15.NE.0 

ASSUME REA0C04BIT15, EQ,0 

TST Q 

AOOCXT R0.R2 %TNMSB 

ADD #SOI .SL ,UBAR\N,BAR '/.CALL S.STR2 



ROsUNIT FLAGS 

MAKE SURE BITS ARE THE SAME 

MAKE SURE BITS ARE THE SAME 

ISOLATE WRITE PROTECT FLAGS 

IF WRITE PROTECTED THEN OR IN B I TS /DONE ; I E 1 2 1 1 



IU52EC21G0 CALC SECTORS/TRK IN R2 ;IE1211 

[US2EC21AND IN ROTATIONAL OPTIMIZATION COUNT 

IU52EC21SEARCH LIMIT IS NOMINALLY 2 REVS 

[U52EC2] 

[US2EC2] 

[US2EC2I EXCEPT FOR READS 

(U52EC21WHICH GET AN EXTRA REV 

SAVE IN SDI CNTRL BLK 



CHECK NEW CYLINDER AGAINST CURRENT CYLINDER ««» 



ADD 
AND 



#SDI . H2 , UBAR\N . BAR "/.CALL S.LDR2 
#HIBYT, R2 
R6 , R2 



CHECK IF SEEK NEEDEO «*» 



003055 033441 000007 01QOOO 



003056 
003057 
003060 
003061 

OO30E2 
003063 



010545 
010545 
014546 
035546 

010545 
036146 



007012 
007026 
000004 
013044 

00701 1 
060001 



135601 
135600 
lOOOO 
003073 

12S600 
103073 



MOV 
ADD 
ADD 

BIT 
BIC 

ADD 
XOR 



R7, R1 

#SDI . CH, UBAR\N, BAR %CALL S.LDR7 

#SDI . ES, UBARNN, BAR '/.CALL S.LDR6 

0FSEEK.R6 

#<FSEEK!URETRY> ,R6, BUF 7.JNZR0 U. 



tSOI . CL . UBARNN , BAR 7.CALL 
R1 , R6 %JUPF U 



I . LDR6 
IOPE 



[V05] R2 = HI CYL # 
ISOLATE HI CYL # 
OR IN TO CALCULATED HI CYL 



IU52EC21M0VE LO CYL TO R1 - CVL NOW IN R2.R1 
R7=CURRENT CYL # HI 
R6=EXTENDED STATUS 
IF FORCE SEEK SET 
IOPE ; [U52EC21 THEN CLR FLAG AND DO SEEK 
[U52EC2IALWAYS CLEAR URETRY FLAG 
RS'CURRENT CYL # LO 
IF REPLACE THEN SEEK 



(E121 ] 
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XOR 



R2.R7 



7.JNZR0 U.IOPE 



IF LO CYL'S DIFFER THEN SEEK 



The following code forces the lower processor to perform a group 
select on this drive if the new request is on the current cylinder 
but a different group. This gets the group select to the drive ear 1 i 
under two sets of circumstances: 



003065 033746 01Q060 013073 

003066 01054S 007005 135604 

003067 010550 007026 135610 

003070 033746 010062 143100 

003071 133546 000002 124664 

003072 013440 OOOOOO 103100 



1 ) 

21 

MOV 

ADD 

ADO 

MOV\F 

BIS 

NOP 



In heavy multi-drive I/O where transfer activity on the other 

drives can overlap with the group select. 

when performing spiral reads on a single drive. 



#<SUSP+BFRQ> . R6 %JNZRO U.IOPE 
#SDI ,UG,UBAR\N,BAR 7.CALL S.LLBO 
#S . GRUP , R 1 0\N , BAR %CALL S.XORO 
#SUSP 1 BFRQISEEK.R6 %JZRO U.IOPF 
#GSEL,R6 7.CALL U . SGRP 

7.JMP U . IOPF 



IF HI CYL'S DIFFER THEN SEEK 
GET CURRENT GROUP NUMBER 
COMPARE TO DESIRED GROUP 
IF GROUPS EQUAL THEN SKIP IT 
OTHERWISE TELL LOWER TO PERFORM 
A GROUP SELECT NOW 



[E121 ] 
IE121 ] 
IE121 1 
IE121 ] 
[E121 1 

[E121 ] 

[E121 ] 

1E121 ] 
(E121 ] 
IE121 ] 
IE121 ] 
[E121 ] 
[E121] 
[E121 ] 
[E121 1 

IEI21 ] 

IE121 1 



n 


003073 


033746 


000062 


12 4 6 6 4 


U 


IOPE: 


MOV 


ii 


003074 


010545 


00701 1 


135620 






ADD 


? 


003075 


01054S 


007012 


125621 






ADD 


o 

u. 












*** 


SEE 


Q03076 


010545 


007026 


125573 






ADO 


o 
w 

_i 


003077 


135540 


003177 


OOOOOO 






BIC 


O03 lOO 


010550 


007027 


12S573 


u 


IOPF: 


ADD 


003 101 


0O304O 


003000 


OOOOOO 






OR 


003102 


013440 


OOOOOO 


125476 


u 


SETS : 


NOP 



REVECTORING ENTERS HERE TO SEEK TO RCT CYLINDERS (PASSED IN R1.R2) 

UBAR --> SDI CTL BLK 

BAR - -> SDI .CL (UBAR) 

Q -. LEVEL 1 FRAME CODE FOR OPERATION 

R10 --> MSCP/PARAMETER BLOCK 

RETURN WITH FILLED-IN LEVEL 1 FRAME IN 0, SDI. ST IN RO , AND SEEK STARTED 

R7 IS PRESERVED BY THIS ROUTINE 

Q RETURNED WITH HEAD ADDRESS/COMMAND FROM S . TRAK 

#<SUSP!BFRQ!SEEK> , R6 "/.CALL U . SGRP i [ U52EC 1 1 R6 = SD I STATUS BITS TO SET/RESET GROUP 
#SOI .CL.UBARXN.BAR 7.CALL S.STR1 J SAVE LO CYL # 
#SDI .CH,UBAR\N,BAR %CALL S . STR2 ; SAVE HI CYL # 

EDED - CLEAR SEEK FAIRNESS COUNTER «<* 



#SDI .ES.UBARXN.BAR 7.CALL S.LORO 

#FAIRCT,RO,BUF 

#S . TRAK, R10\N, BAR 7.CALL S.LORO 

R0,0, BUF 

•'.CALL U.GMST 



003103 
003 1 04 
OO3105 
003106 
003107 



013740 

1454 6 
130461 
010545 
033140 



0031 10 033447 

0031 1 1 010SSO 

003 1 1 2 010550 



007156 
000002 
10001 
0O7O0O 
003006 



OOOOOO 
007005 
007007 



12S574 U.SETX: 

OIOOOO 

O75620 

OOOOOO 

1 15474 U .STSX 



t 25505 
13S600 
1 35575 



ENTER HERE WITH PLOCK CLEAR AND SDI. ST 

MOV #NSEEKS,BAR 7.CALL S.L0R1 
#SEEK, R6 

S.STR1 

UNLOCK 



#NSEEKS, BAR 
BIT #SEEK,R6 

INC\T R1 7.CNZR0 

ADD #SOI ST, UBARNN, BAR 
OR R6,R0,BUF 7.JMP 



ROzFAIRNESS COUNTER 
ZAP IT BECAUSE WE'RE SEEKING 
RO'CURRENT TRACK NUMBER 
STORE REAL TIME CMO/HEAD ADOR 
GET MUTEXED SDI STATUS IN RO 

N RO ««* 

[U52EC11R1 'CURRENT SEEK COUNT 

IF SEEK NEEOED 

INCREMENT AND RESET 

BAR'PTR TO SDI STATUS ME1211 

SET NEW STATUS BITS/FREE . PROC/RETURN 



ENTRY POINT #3 - TERMINATION PROCESSING *** 

ENTER WITH SDI STATUS IN RO , UPF SET IF REPLACE, RIO 

FIRST RELEASE ALL BUFFERS *»« 



> PKT, //R3 ■> UNIT BLK 



i 



MOV R0.R7 7.CALL S.RELC 

ADO #P . RS03 , R10\N, BAR %CALL S.L0R6 
ADD #P .MOD, R10\N,BAR 7.CALL S.L0R2 



(16K1RETURN BUFR CNTRL BLKS.MOVE STATUS TO R7 
IU52EC2] [EC0#1 ]R6«L0 BYTE ORIG OP CODE 
R2=MSCP MODIFIER FIELD 
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ADO #P. OPCO, R10SN.BAR "/.CALL S.LLBO ; ROsMSCP OP CODE 
COMPARE COMMANO - CHECK FOR SECOND TIME AROUND «** 



0031 14 
\ 003 1 IS 
* 003 1 1 6 
0031 17 
003120 



003121 
003122 
003122 
003122 
003123 
003124 



01 6540 
013446 
010545 
01 6540 
016560 



060O40 
010006 
007060 
000041 
010042 



113176 
1 13144 
125600 
OIOOOO 
053121 



XOR #0P.CMP,R0\N %JUPF U.IOPM 

TST R6 7.JZR0 U. IOPK 

ADD #SDI .UF, UBAR\N, BAR %CALL S.L0R6 

XOR #OP.RO,RO\N 



IF REPLACE THEN DONE/ELSE IF 
THEN SKIP CHK FOR MODIFIER 
(VOSI R6>SUBUNIT'S UNIT FLAGS 
IF NOT READ COMMAND 
OR WRITE COMMAND 



114542 010100 003146 



XOR\T #0P.WR,RO\N 7.TNZR0 
READ OR WRITE COMMAND - CHECK FOR COMPARE MODIFIER OR COMPARE ON READ/WRITE UNIT FLAG 

THEN DONE/IF COMPARE MODIFIER 



035540 
014146 
013440 



010040 
000000 
O10O00 



003125 

10000 
103146 



BIT #M0.CMP,R2 7.JNZR0 U.IOPL 

ASSUME OP.RD,E9,<0P.R0S0P.WR>+UF. CMR 

ASSUME 0P.WR,EQ,<0P.RD80P.WR>+UF. CMW 

BIC #<0P .RDSOP .WR> , RO %JNZRO U.IOPI 

BIT RO, RS 
NOP 7.JZR0 U . IOPL 



THEN DO COMPARE/ELSE ROsUNIT FLAG BIT 
IF NO COMPARe UNIT FLAG 
THEN DONE 



003125 


010550 


007006 


125573 


U 


IOP I : 


ADD 


003126 


014547 


000004 


oooooo 






BIT 


003127 


013740 


013040 


053146 






MOV\F 


003130 


01055O 


O07O05 


12561 6 






ADD 


003 13 1 


137746 


00004 1 


132375 


U 


IOPJ : 


COM 


003132 


033746 


000O4 1 


133102 






MOV 


003133 


033443 


000605 


122757 






MOV 


003134 


033747 


000022 


132014 






MOV 


003135 


010645 


O07O20 


135630 






ADO 



SAVE ORIGINAL OP CODE, START AGAIN AS COMPARE *«« 

LDRO 



#P . OPCO, R10\N, BAR XCALL 
#DERR, R7 

#OP.CMP,BUF 7.JNZR0 U.IOPL 

#P RS03 , R10\N , BAR %CALL S . STRO 

#<SLAT ! DATT> , RS 7.CALL U.CLRS 

#<SUSP+PKIP> , RS 7.CALL U.SETS 

UBAR.R3 (PRUPF 7.CALL U.IOCM 
#<CMDCOF-BUF .SD> , R7 7.CALL U . VAXP 

#SDI .EO, UBAR\N,BAR %CALL S.CLRS 



REFETCH OPCODE WITH END PKT FLAGS 
IF DRIVE ERROR 

THEN DONE/ELSE CONVERT TO COMPARE 
SAVE OPCODE/PIAGS IN P . RS03 
ZAP ALL BUT SLAT AND OATT IN SOI. ST 
SET SUSPEND AND PKT IN PROGRESS 
(V05] (16K1G0 RECALCULATE AS IF NEW PKT 
SEE IF VAX PURGE NEEDED 

R7+SUF .SDrCONTAINS SDI CTRL BLK PTR FOR U . VAXP 
[U52ECUZAP SOI ERROR STATE WORD 



BEGINNING OF RE-DO MAPPING INIT INCLUDING REFILL PTE CACHE 
FOR MAPPED COMMANDS ANO NOT IN DM MODE 



003136 


010S4S 


0O7 1 15 


135573 




AOO 


003137 


1 14S44 


010100 


113143 




BIT 


003 140 


013440 


01OOO0 


013143 




NOP 


0031 41 


013440 


OOOOOO 


125232 




NOP 


003142 


033767 


O10026 


052071 




MOV\T 


003143 


033740 


000040 


102770 


U . CMP : 


MOV 



#MAP ,ST,UBAR\N. BAR %CALL S.LDRO 
#DMOOE,RLL 7.JZR0 U . CMP 
%JNZRO U . CMP 
%CALL U.MINT 
#ER.MRR,R7 %JNZRO U . UERR 
#0P.CMP.RO 7.JMP U.IOPC 



CHECK FOR ORIGINAL COMPARE COMMAND **« 



003144 

0O3144 
003144 



ASSUME 
ASSUME 
ASSUME 



003144 033506 01OOO3 143146 U.IOPK: 0R\F 



135S46 00300 1 OOOOOO 



KDB50. MICROCODE 



OP .CMP.EO, 40 
OP . WR, EO, 42 
OP . RO, EO, 4 1 

(BUF ) , RS 



JBITO! , R6 , BUF 



IS THIS A MAPPED COMMAND? [CMS] 
SKIP IF IN DM 

RE-DO MAPPING INITIALIZATION 
[RAE4-C119] if error say so 
[16K1START UP THE I/O AGAIN 



[U52EC21MAKE SURE 
[US2EC2IF0LL0WING "OR" 
[U52EC21WILL WORK OK 

[U52EC2] [EC0#1 ] IF P . RS03 EO O THEN CONTINUE 
[US2EC2] ELSE OR OPCO WITH R6(RS03] 

[U52EC21 [EC0#1 ] ZAP COMPARE FLAG AND STORE OPCODE 



, 22-APR- 



CHECK FOR DATA SVNC TIMEOUT AND REPORT AS BAD BLOCK IF NOT IN RCT 
I9SS 11:16:48.97 
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#SOI .SW,UBAR\N, BAR %CALL 
#<ST .DRV !SC.RWR> , RO 

%JNZRO 
#1 %CALL 

7.CALL 



003146 


01054S 


007003 


13S573 


U . IOPL : 


ADD 


003147 


036S40 


0002 13 


OOOOOO 




XOR 


003150 


013440 


01 0000 


O031 53 




NOP 


0031S 1 


013740 


000001 


134S02 




TST 


0031S2 


013440 


OOOOOO 


124E04 




NOP 



U . IOPN 
U . GLBX 
U .SLBN 
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[U52EC2]RO:MSCP STATUS 

[EERREC1 IU52EC2] IF NEO DATA SYNC TIMEOUT CODE 

EU52EC2] THEN CONTINUE 

IU52EC2] ELSE GET LBN IN RI.R2 

[ U52EC2 1ST0RE BAD BLOCK 



I/O COMPLETE - CALCULATE BYTES TRANSFERRED, ZAP PACKET RESERVED FIELOS 



31S3 

3154 
315S 
31S6 
315S 
3157 
3160 
3161 
3162 
3163 
3164 
31 65 
3165 
3166 
3167 
3170 
3171 
3172 



10S45 
010550 
010550 

O0OS5O 
13 1140 
031 146 
033546 
0301 40 
0301 46 
0S01 46 

000550 
112146 
1 12160 
033441 
033442 
01344O 



0071 15 

00701 6 

00701 7 

0O7021 
00000 1 
020002 
000100 
OOOOOO 
020006 
030006 

0O701 1 
000002 
01000 1 
020000 

000006 
OOOOOO 



125630 
135S73 
135600 

13321 1 
OOOOOO 
12561 1 
OIOOOO 
010000 
12561 1 
013162 

13321 1 
OIOOOO 
153170 
053172 

OOOOOO 
1 232 10 



ADO 

ADD 

ADD 

ASSUME 

ADD 

SUB 

SUBC 

BIS 

ADD 

AOO 

ADD\R 

ASSUME 

ADD 

CMP 

CMP\T 

MOV\F 

MOV 

NOP 



#MAP .ST,UBAR\N,BAR 7.CALL S.CLRB 
#S . LBNL ,R10\N, BAR %CALL S.LDRO 
#S . LBNH,R10\N, BAR %CALL S.LDR6 



P . LBN1 ,E0, P. 

#P . LBN1 , R10, 

R1 , RO 

R2 , R6 

#100, R6 

RO, RO 

R6, R6 

R 6 , R 6 

P .BCN1 , EO, P . 

#P .BCN1 ,R10, 

R2, RS 

R1 , RO 

RO, R1 

R6, R2 



3N0+1 

,BAR 5CALL 



%CCRY 
7.JNMSB 

BCNO+1 

O.BAR VCALL 

7.TZR0 
%JNCRY 



S . INC6 
U . IOSH 



003173 
003173 



003174 
003175 
00317S 



000S45 007030 123211 



SET IN BAO BLOCKS - IF ANY m 



ASSUME SOI . BH, EO , SDI . BL+ 1 

ADO #SDI .BH.UBAR.O, BAR 7.CALL LDR2R1 



done so clear mapping setup flag ;[£122] 

ROsFINAL LBN LO , [£122] 

R6.PINAL LBN HI 

MAKE SURE SEQUENTIAL 

R1/R2=STARTING LBN LO/HI 

ROsLO DIFFERENCE 

R6:HI DIFFERENCE 

SET TERMINATION FLAG FOR MULT BY 512 

MULT LO BY 2 

MULT HI BY 2 

IF NO FLAG THEN CONTINUE 

MAKE SURE SEOUENTIAL 

R1/R2=0RIGINAL BYTE CNT LO/HI 

COMPARE HI BYTE COUNTS 

IF EO THEN COMPARE LO BYTE COUNTS 

IF ORIGINAL LEO CALCULATED THEN DONE 

ELSE SWAP BYTE COUNTS 
GO SET BYTE COUNT 



[U52EC1JMAKE SURE SEQUENTIAL 
[U52EC1 ]R1/R2:SAVED 1ST BAD BLOCK 



NOW ZAP SAO BLOCK STORAGE FOR NEXT COMMAND **» 
Q AND BAR POINT TO SOI.BL 



033740 
000550 



003000 123370 
007020 133213 



MOV #0,RO,BUF 7.CALL STROLG 

ASSUME P.FB81 , SO, P.FBBO+1 

ADO #P.FBBO, RIO, O.BAR %CALL STR1R2 



IU52EC11ZAP RO S SDI.BL THEN INCR Q.ZAP SOI.BH 
MAKE SURE SEQUENTIAL 
STORE IN CORRECT PLACE 



^Kwjjr 



003176 


033441 


000010 


OIOOOO 


U . IOPM: 


MOV 


003177 


030541 


000012 


010000 




ADD 


003200 


033740 


000006 


13S544 




MOV 


0O3201 


033741 


060010 


123206 




MOV 


0O3202 


010550 


00700S 


13S630 




ADD 



CALCULATE BYTES TRANSFERRED, ZAP PACKET RESERVED FIELDS **« 
IF REPLACE THEN ZAP END OF PACKET ««» 

R10.R1 ; RIsMSCP PKT PTR 

#P.BUF0,R1 ; R| POINTS AT START OF BUFFER DESCRIPTOR 

#<P .BUF5t1>-P .BUFO, RO 7.CALL S.ZSUF; ZAP BUFFER DESCRIPTOR 

#P.RS06,R1 7.CUPF U.PKTZ ; IF NOT REPLACE THEN CONTINUE 

#P.RS03, R10\N, BAR 7.CALL S.CLRB ; ZAP COMPARE WORK WORD 

OBTAIN STATUS CODE AND SUBCODE FROM SDI.SW ** 



O03203 
003204 
003205 



013440 
010S45 
014541 



000000 133640 
007000 125574 

000001 103766 



NOP 

ADD 

BIT 



%CALL U.DONX 
#SDI . ST,UBAR\N,BAR XCALL S.LDR1 
#PKIP.R1 7.JMP U.CSDI 



GO SEND END PACKET WITH COOE FROM SDI.SW 

[U52EC1 ] R1 :SDI STATUS 

[ 1 6K] [US2EC1 ]G0 TRY TO START NEXT PKT 



KDB50. MICROCODE., 22-APR -1988 11:16:48. 97 



KDBUP DIGITAL EQUIPMENT CORP 

MSCP AND DUP COMMAND ROUTINES 



2901 ASSEMBLER VERSION 32 



PAGE 198 



ZAP END PACKET FOR REPLACE , AVA I LABL E , OETERMI NE ACCESS PATHS COMMANDS *** 



003206 
003207 



O0321O 
003210 



0032 1 1 
0032 12 



003213 
003214 



0032 15 
O0321 6 
003217 
003220 
003221 



033740 
030141 



0OOO22 
0000 10 



10000 
105544 



MOV 
ADD 



#<MCP.LN+P-P. RS06> , RO 
R10.R1 %JMP 



000S50 007010 103213 



ASSUME 

ADD 



P . BCN1 ,EO,P . BCNO+1 

#P . BCNO,R10,0, BAR %JMP 



STR1R2 
SUBROUTINE TO LOAD R2.R1 FROM BAR, AND 



RO'WORDS TO ZAP FOR REP L / A V A I L /DET . AC C . PATH 
GO ZAP BUFFER/RETURN 



MAKE SURE SEQUENTIAL 

STORE LO/HI BYTE COUNT/RETURN 



^v*W 



033702 
101640 



013440 
000640 



010S4S 
010545 
1 12147 
1 1216B 
013440 



000003 
00700 1 



003001 
007001 



007075 
007076 
000002 
010001 
000000 



010000 

1 15574 



01O0OO 

1 15621 



135600 
125601 
000000 
143221 
177777 



MOV 
SUB 



(BUF) , R2 

#1 ,0, BAR 



%JMP S.LDR1 
SUBROUTINE TO STORE R1.R2 IN BAR AND 0*1 *** 



R2:HI WORD 

(U52EC2]BAR,9=Q-1/RI sLO WORD/RETURN 



MOV 
ADD 



R1 , BUF 
#1 , O.BAR 



7.JMP S.STR2 
SUBROUTINE TO COMPARE LBN(R1,R2) WITH START RCT LBN **• 



BUFjLO WORD 

[ 1 6K]0, BAR=Q+ 1 /STORE HI WORD/RETURN 



ADD 

ADD 

CMP 

CMP\T 

NOP\F 

.PAGE 



#SDI . L 1 ,UBAR\N, BAR %CALL S.LDR6 ; [ V05 ] (16K]R6:L0 START RCT LBN 

#SDI . L2,UBAR\N. BAR "/.CALL S.LDR7 ;IV0S] M6K1R7 = HI START RCT LBN 
R2.R7 ; [16KIIF HI LBN EO HI RCT LBN 

R1,R6 7.TZR0 ; [16K! THEN COMPARE LO LBN WITH LO RCT LBN/RET 

%RET j [16K1RETURN WITH CCOOES INTACT 
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ROUTINE NAME: 

U.LNKP (LINK MSCP PACKET TO OUEUE) 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL LINK A MSCP PACKET TO A OUEUE WHOSE HEAD IS 
POINTED TO BY BAR. 



RIO 
BAR 



POINTER TO MSCP PACKET TO BE OUEUED 
POINTER TO MSCP PACKET OUEUE HEAD 



OUTPUTS : 

R1 IS USED AS A TEMPORARY REGISTER 
PACKET ENTERED ON OUEUE 



003222 


033701 


000003 


1 13224 


U 


LNKP: 


MOV 


(BUF ) , R1 


%JMP 


U . LNKB 


003223 


013440 


007001 


125574 


U 


LNKA: 


MOV 


R1 .BAR 


%CALL 


S . LDR1 


003224 


1 15541 


0OO3O0 


01OOO0 


U 


LNKB : 


BIC 


#0.STAT,R1\N 






003225 


033150 


01 3001 


053223 






BIS\F 


R1 , RIO, BUF 


7.JNZR0 


U . LNKA 


003226 


01 3440 


OO7010 


OOOOOO 






MOV 


RIO, BAR 






003227 


1 13740 


0O32O0 


127777 






MOV 


#PSTAT , BUF 


7. R E T 





ROUTINE TO LINK RIO TO HEAD OF OUEUE *«« 



003230 010545 

003231 133542 

003232 O13440 



OO7022 
000300 
007010 



135575 
135626 
1 15621 



ADO 
BIS 
MOV 
.PAGE 



#SOI . PO, UBARNN.BAR 5SCALL S.LDR2 
#<PSTAT+PACTV> .R2 %CALL S.ST10 
RIO, BAR %JMP S.STR2 



R1:MSCP PKT OUEUE WORD, ENTER LOOP 

R1 :PKT OUEUE WORD 

ISOLATE NEXT LINK PTR 

IF NEO THEN LOOK AT NEXT 

BARsPKT STATUS WORD PTR 

SET PKT IN USE/RETURN 



NOW R2:1ST ENTRY ON LIST 

SET NEW LIST HEAD, SET FLAGS IN 

(U52EC1I0LD LIST HEAO AND MAKE NEW NEXT PTR 
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ROUTINE NAME: 

U.LOGS (CONTROLLER LOG AND ATTENTION MESSAGE HANDLING ROUTINE) 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL PROCESS REQUESTS TO SENO BOTH ERROR LOG AND 
ALL ATTENTION MESSAGES, I.E. -SLAT' BIT SET IN SOI CONTROL 
BLOCK STATUS WORD. IF THE LOG/ATTENTION PACKET (LOGPKT) IS NOT FREE 
THEN AN IMMEDIATE RETURN IS MADE. 

FOR ATTENTIONS IT WILL DO THE FOLLOWING: 

1. IF ATTENTIONS NOT ENABLED BY HOST THEN CLEAR SLAT AND RETURN 

2. IF ACCESS PATH OR DUPLICATE ATTENTION THEN PUT UNIT NUMBER IN LOG 
PACKET, CLEAR SLAT AND RETURN. 

3. ELSE SEARCH THE SUBUNIT CHARACTERISTICS BLOCKS FOR A MATCH 
ON UBAR 

4. IF NO MATCH FOUNO THEN CLEAR 'SLAT' AND RETURN 

4. ELSE CLEAR 'DRV. AT' IN SDI.CW AND BUILD ATTENTION MESSAGE IN 'LO 

5. QUEUE ATTENTION PACKET ON CONTROLLER -> HOST OUEUE AND RETURN 

FOR ERROR LOGS IT WILL 00 THE FOLLOWING: 

1. DECODE ERROR LOG FORMAT 

2. BUILD APPROPRIATE ERROR LOG PACKET IN 

3. QUEUE ERROR LOG PACKET ON CONTROLLER - 

4. CLEAR 'SLAT' AND RETURN 



LOGPKT' 
' HOST QUEUE 



INPUTS : 



POINTER TO SDI CONTROL BLOCK 



003233 
Q03234 
00323S 
003236 
003237 
003240 
003241 
003242 
003243 
003244 
00324S 



003246 
003247 
0032SO 
O032SI 

KDBUP 



0337S0 
033740 
033441 
013740 
01054S 
010550 
010545 
010550 
014540 
014640 
133746 



033742 
010545 
13S54I 
010550 



O07304 
010036 
O07O10 
007 170 
O07003 
007007 
O07O1O 
O07OO6 
O0O10O 
010200 



135S73 
037777 
125544 
135S72 
125574 
135620 
125573 
10000 
10000 
1 13262 



010040 112375 U.LOGA: MOV 



OUTPUTS : 

ERROR LOG OR ATTENTION MESSAGE QUEUED TO 



CHECK TO SEE IF LOG PACKET AVAILABLE «** 

MOV #LOGPKT, RIO, BAR 7.CALL S.LDRO 

MOV #LOG . LN+P , RO %RN2R0 

MOV RIO, R1, BAR %CALL S . ZBUF 

MOV *CNTFLG,BAR %CALL S.LDQQ 

AOD #SDI .SW, UBARNN.BAR '/.CALL S.L0R1 

ADD #L .EVNT, R10NN.BAR "/.CALL S.STR1 

AOD SSDI . IT, UBARNN.BAR %CALL S.LDRO 

ADD SL .FMT.R10NN. BAR 

BIT SATTCOO.RO 

BIT SCF.ATN.Q 7.JZR0 ER.LOG 
SSLAT.RS 7.JZR0 U.CLRS 



000014 135616 

007043 135574 

000374 OOOOOO 

007004 135620 



ATTENTION MESSAGE PROCESSING ««» 

MOV #DUP.LN,R2 7.CALL S.STRO 

ADD SSDI .UN, UBARNN.BAR '/.CALL S.LDRI 

SIC #DRV UM.R1 

ADD SP. UNIT, R10NN, BAR %CALL S.STR1 



ROsSTATUS WORD FOR LOG/ATTN PKT 

IF IN USE THEN RETURN/ELSE ROsLENGTH TO CLEAR 

GO ZAP ENTIRE BUFFER 

QsCONTROLLER FLAGS 

RI=EVENT COOE 

STORE EVENT CODE IN PKT 

ROsLOG/ATTN COOE 

BAR*PTR TO LOG FORMAT 

IF NOT ATTENTION 

THEN DO ERROR LOG CHECK 
[ECO021IF ATTN'S NOT ENABLED THEN CLEAR SLAT 



R2=0UPL/ACC PATH LENGTH/SAVE ATTN COOE 
RlsUNIT NUMBER 
ISOLATE 10 BITS OF IT 
STORE LO BYTE IN PACKET 
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003252 
003253 



003254 
O03255 

O03256 



003257 
003260 
003261 



003262 
003263 
003264 
003265 
O03266 
003267 
003270 
00327 1 
003272 
003273 
003274 



01 6540 
013440 



010545 
1 1 4540 
135540 



010550 
1 35540 
033742 



013441 
1 14540 
1 13540 
010S4S 
010545 
010550 
013740 
016540 
016540 
016540 
000550 



OOOIOO 
10000 



007056 
010004 

013004 



007O04 
003374 

000040 



000001 
010300 
013001 
007022 
007006 
007001 
003020 
OOOOOO 
O1O001 
010002 
010027 



OOOOOO 

013336 



135573 
102375 
152375 



OOOOOO 
133702 

1 13337 



OOOOOO 
143245 
033371 
125600 
13560 1 
OOOOOO 
135605 
010000 
I 13304 
103341 
103346 



XOR 
NOP 



SOP . AVA, RO\N 



•/.JNZRO U.CSLA 
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IF NOT AVAIABLE ATTENTION MS G 

[UOA] [ 1 6K1THEN GO CLEAR SLAT 3 OUE MSG 



ASSUME UN .BUF81 , EO.O ; [16K1MAKE SURE UN.BUF IS EVEN 

ATTENTION MESSAGE ■ CHECK FOR MULTI-UNITS »** 



AOD #SDI .CW,UBAR\N, BAR %CALL S.LDRO 

BIT SDRV.AT.RO 7.JZR0 U.CLRS 

BIC\F *ORV .AT.RO, BUF %JZRO U.CLRS 

NEED TO SENO ATTENTION FOR THIS UNIT »»* 



ADD 
B IC 
MOV 



#P . UNIT, R10NN.3AR 
#ORV . UM, RO, BUF 7.CALL 
#AVL.LN,R2 */.JMP 



U . SUNI 
U . SLEN 



(V051 ROsSUBUNIT BLK STATUS 
IF NOT ACTIVE THEN CONTINUE 
IF NOT SENT THEN GO 00 IT 



BAR:PTR TO PKT UNIT NUMBER 
GO FILL IN ATTENTION PACKET 
GO SET LENGTH/QUE PKT TO HOST 



ERROR LOG PROCESSING *«* 



TST 

BIT\F 

BIS 

AOD 

ADD 

AOD 

MOV 

XOR 

XOR 

XOR 

ADO 



R 1 

#<LF .CON! LF . SUO , RO 7.JZR0 U.LOGA 
#LF . SNR, RO\N,BUF 7.CNZR0 U . ZPSW 
UBAR\N,BAR I'.CALL S.LDR6 
UBARNN.BAR 7.CALL S.LDR7 
R10\N, BAR 

%CALL 



#501 . PQ 
SSDI .UB 
#P . VCID 
SVC. LOG 
SFM. CNT 
#FM. BAD 
SFM. OSK 



BUF 
RO\N 
RONN 
RO\N 



%J2R0 

%JZRO 



#<L .SDIO- 1 > , R10.Q 7.JZR0 



S -MLBO 

LG . CNT 
LG . BAD 
LG . DSK 



[EC0#21IF SDI.SW = O 

[EC0S21 THEN DONE/IF CONTINUING OR SUCCESS 

THEN SET SEO NUMBER RESET/ZAP SDI.SW 
R6=MSCP PKT PTR 
R7=0ATA BUFFER CONTROL PTR 
BARs VIRTUAL CIRCUIT ID PTR 
SET TO ERROR LOG ID 
IF CONTROLLER LOG (LAST FAILUREI 

THEN GO DO IT 
IF BUS ADOR LOG THEN GO 00 IT 
IF NO MATCH THEN CLEAR SLAT/RETURN 



ERROR LOG MESSAGE FORMAT 3 - SDI ERROR *»* 



003275 


010545 


007044 


123365 LG. 


SDI: ADO 


003276 


0I0S4S 


007045 


133365 


ADD 


0O3277 


010S45 


007050 


123365 


AOD 


003300 


010545 


00705 1 


133365 


AOD 


0033O1 


010545 


007052 


133365 


AOO 


003302 


010545 


007053 


123365 


ADO 


003303 


033742 


000070 


103314 


MOV 



SSDI .SI , UBARNN , BAR %CALL STBFLG 

#SDI .S2. UBARNN.BAR 7.CALL STBFLG 

«SDI .S4, UBARNN.BAR %CALL STBFLG 

#SDI .S5, UBARNN.BAR 7.CALL STBFLG 

#SDI .S6, UBARNN, BAR '.CALL STBFLG 

SSDI .S7. UBARNN, BAR 7.CALL STBFLG 

SSDI . LN.R2 7.JMP ER. UID 



RO=SDI STATUS WORD 1 

RO=SDI STATUS WORD 2 

RO=S0I STATUS WORO 4 

ROsSDI STATUS WORD 5 

RO:SDI STATUS WORD 6 

ROsSDI STATUS WORO 7 

GO SET UNIT ID, FINISH UP PKT/EXIT 



ERROR LOG MESSAGE FORMAT O - CONTROL LER ERROR *** 



003304 


013740 


007034 


135573 


LG . CNT : 


MOV 


SFAILUR.BAR 


7.CALL 


S . LDRO 


00330S 


1 12540 


000143 


10000 




CMP 


#99 . .RO 






003306 


1 12540 


030150 


013310 




CMP 


SBERMAX.RO 


%JNNEG 


1$ 


003307 


Ol 3440 


O3OO0O 


003312 




NOP 




7.JNNEG 


2$ 


003310 


015540 


000037 


OOOOOO 


1$: 


BIC 


#37.R0NN 






00331 1 


034460 


010000 


053312 




CLRNT 


RO 


XTNZRO 




003312 


010550 


007015 


13561 6 


2$: 


ADD 


#L .MLUN, RIONN 


BAR 7.CALL 


S.STRO 


003313 


033742 


000030 


103334 




MOV 


•CNT . LN, R2 


7.JMP 


ER. CIO 



ROjLAST FAILURE CODE 
[mjt07] make sure that we don't 
clear the bda specific values 
[mjt07] if <, go check codes < 37(q] 
lmjt07] if ok, go store it 
IF LAST FAIL CODE NOT VALID 

THEN R0 = 
STORE IN PKT 
R2:C0NTR0LLER LOG LENGTH 



COMMON EXIT POINT TO STORE UNIT 10. VOL SERIAL NUMBER. UNITS ««« 
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003314 
0O331S 
0033 1 6 
0033 17 
003320 
0O332 1 



000550 

010S4S 
13SS40 
000S40 
010545 
010545 



0000 1 5 
007038 
000200 
00000 1 
007061 
007062 



1 33675 
135573 
133370 
010O0O 

133365 
133365 



003322 010545 007043 125573 



003323 
003324 
003325 



003326 
003326 
003326 
003326 
003327 
003330 
003331 
003332 
003333 



135540 
010550 
000550 



014546 
OOOSSO 
010S46 
010546 
010546 
133540 



000360 
007004 
000014 



000001 
010001 
007002 
007003 
007OO6 
003040 



010000 
135616 
133401 



10000 
003334 
133365 
12336S 
135S73 
000000 



ADO 
AOD 
BIC 
ADD 
ADD 
ADD 
AOD 
ADD 
BIC 
BIC 
ADD 
ADO 



#<L . UNTO- 1 > ,R10,0 %CALL U.SUID 
#SDI .RS, UBARNN, BAR '/.CALL S.LORO 
#FOIAG,RO 7.CALL STROLG 

#1 ,0 

#SDI . V1 , UBARNN, BAR '/.CALL STBFLG 
#SOI . V2, UBAR\N, BAR XCALL STBFLG 
#SOI . CW, UBARNN. BAR %CALL S.LDRO 
#SDI .UN, UBARNN, BAR %CALL S.LDRO 
#DRV .UM.RO 
#DRV .SU.RO 

#L . UNIT, R10NN. BAR 7.CALL S.STRO 
#<L .MLUN- 1 > .R10.0 %CALL U.MLUN 



; POINT TO COMMON LOG PKT AREA 
,' RO=H/W B S/W VERSION NUMBER 
; but clear the PO bit 
; [EC0#1]SKIP OVER RETRY 
;[V05] ROsVOL SERIAL NUMBER #1 
;tV05] ROsVOL SERIAL NUMBER #2 
; IV051 RO=UNIT NUMBER 

NUMBER 

NUMBER 

NUMBER 

PKT 



TO STORE 
; [E121 1 

; [ E 1 2 i 1 



IV05] ROsUNIT 
ISOLATE UNIT 
ISOLATE UNIT 
STORE IN LOG 
GO CREATE AND STORE MULTI-UNIT CODE 



[rae06] 

[ raa06 ] 



o 



SET REFERENCE NUMBER, OTHER MSCP THINGS »«» 



ASSUME 

ASSUME 

ASSUME 

BIT 

ADO 

ADO 

ADD 

ADO 

BIS 



<PKTO20BBITO0>.E0.0 



M6K1MAKE SURE CHECK IS VALIO 



<<SDI.1!S0I.2!S0I.3(S0I . 4>«B I TOO , NE , O ; [ 16K1 DITTO 



<SDI.AT*,SITOO>,EO,0 

*BIT00,R6 

#<L .CRFO- 1 > ,R1O,0 %JNZRO ER.CID 

#P .CRF0.R6NN.BAR 7.CALL STBFLG 

#P . CRF1 ,R6XN ,BAR '/.CALL STBFLG 

#P . FLGS.R6NN.BAR '/.CALL S.LDRO 

#EF . LOG, RO, BUF 



( 16K10ITT0 

[16K1IF PKT IN SOI CNTRL BLK AREA 

THEN SKIP/ELSE POINT TO LOG REFERENCE NUMBER 

STORE LO REF # IN LOG PKT 

STORE HI REF # IN LOG PKT 
ROiMSCP FLAGS 

INDICATE ERROR LOG GENERATED 



ERROR LOG FILL IN CONTROLLER ID, H/W AND S/W VERSIONS *»* 



003334 000550 0OO007 137751 ER.CID 
00333S 

003335 03374O 000023 127750 



AOD #<L .CNTO- 1 > ,R10,0 %CALL U.SCIO 

ASSUME <L .CSVR>.EO, <L . CNT3*1> 

MOV #C0DVER,RO '/.CALL U . HWVR 



GO SET CONTROLLER 10 
MAKE SURE IS KOSHER 

RO:C0NTR0LLER SW VERSION NUMBER / 
SET IN HW VERSION NUMBER. 



; **« EXIT TO CLEAR SLAT FLAG IN SOI. ST AND OUE PACKET TO HOST «** 

003336 133746 000040 132375 U.CSLA: MOV #SLAT,R6 '/.CALL U.CLRS ; ZAP SLAT 

; *** EXIT TO SET LOGLEN EOUAL TO R2 ANO OUEUE PACKET TO HOST 

003337 013740 O071S4 135621 U.SLEN: MOV #LOGLEN,BAR 7.CALL S.STR2 ; SAVE PKT LENGTH (IN R2 ) 

; **« ENTRY TO OUEUE A PACKET TO SEND TO THE HOST **» 

003340 013740 007204 113222 U.OSNO: MOV *HSTOUE,BAR 7.JMP U.LNKP ; GO LINK TO CONTRO L L ER - > HOST QUEUE/RETURN 

; *»* ERROR LOG MESSAGE FORMAT 1 - UNIBUS ACCESS ERROR **» 



003341 


000550 


0000 1 5 


000000 


LC 


BAD: 


ADO 


003342 


010547 


007007 


123365 






ADD 


003343 


010547 


007010 


135573 






ADD 


003344 


135540 


000300 


123370 






BIC 


003345 


033742 


000034 


1 13326 






MOV 



*<L .8AD0- 1 > .R1O.0 

#BUF . UA, R7NN. BAR "/.CALL STBFLG 

#BUF . US.R7NN, BAR '/.CALL S.LORO 

#BAN0T,RO '/.CALL STROLG 

iKBA0.LN.R2 7.JMP ER.SRN 



OsSTART OF STORE AREA-1 

GET a SAVE LO UNIBUS ADORESS 

ROsHI UNIBUS ADDRESS 

IBOA] STORE IN LOG PKT 

GO FILL IN REST OF LOG PKT 



ERROR LOG MESSAGE FORMAT 2 - DISK TRANSFER ERROR 



KD B50. MICROCODE. .22-APR-I988 11:16:48.97 



f~~~^ 



KDBUP DIGITAL EQUIPMENT CORP. 

MSCP ANO OUP COMMAND ROUTINES 



2901 ASSEMBLER VERSION 32 



PAGE 203 



003346 
003347 
003350 
003351 
003352 
0033S3 

0033S4 
003355 
003356 
003357 



003360 
00336 1 
003362 
003363 
003364 

0O336S 
003386 
003367 
003370 



00055O 
010545 
133740 
010550 
013440 
010545 

000550 
010545 
010545 
033742 



000022 
007017 
000200 
007006 
010000 
007017 

000025 
007031 
007032 
000054 



010000 
123360 
O1OOO0 
1 35603 
1 13354 
1 25630 

000000 
133365 
133365 
103314 



ADD #<L . RTRY- 1 > , R10.0 

ADD #SDI .El .UBARNN, BAR %CALL STBFLH 

MOV #LF.SUC,RO 

ADO #L .FMT. R10NN.BAR IC1LL S.BITO 

NOP 7.JZR0 5$ 

ADD #SDI . El , UBARNN, BAR 7.CALL S.CLRB 

AOD #<L . HDRO-1 > , R10.0 

ADD #SOI . RL .UBARNN, 8AR XCALL STBFLG 

ADO #SDI . RH, UBARNN, BAR XCALL STBFLG 

MOV #DSK.LN,R2 %JMP ER.UID 



; (EC0#1]SET UP FOR RETRY FIELD 
i[V05l GET ANO SAVE RETRY COUNT 
; if this is a successful retry 
; then 

; CLEAR the retry state 



[E121 ] 
[E121 ] 
[EI21 ] 
[E121 ] 
IE121 1 

[EC0#2]SET UP FOR STORE 

IEC0#2] [EC0#1 ]GET LO HDR FROM SDI.RL 

IEC0*2] [EC0#1 1GET HI HDR FROM SDI.RH 

R2:DISK LOG LENGTH 



ROUTINES TO STORE INFORMATION SEOUENTIALLY IN ARRAY ACCESSED BY *«* 



033700 0OOO03 OOOOOO 

135540 010200 113370 

014540 000377 OOOOOO 

031440 010000 143364 

013440 OOOOOO 103370 



033700 
033700 
034540 
000640 



0OOO03 
000003 
000377 
007001 



103370 
OOOOOO 
010000 
105616 



STBFLG: 
STBBLG ; 



003371 010545 007003 115630 



MOV 

BIC 
BIT 
DECNF 
NOP 

MOV 
MOV 
AND 
ADD 

ADD 

. PAGE 



(BUF) , RO 
#BIT15,R0 
#L0BYT,RO 
RO 



(BUF) , RO 
(BUF) ,R0 
#LOBYT, RO 
#1,0, BAR 



7.T2R0 

7. J MP 



STROLG 
STROLG 



#SDI . SW, UBARNN, BAR 7.JMP S.CLRB 



; [V051STORE (BUF) IN RO 

; [mjtOS] [ V0S1CLEAR OERR AND STORE IN ARRAY 

: IffljtOS j check level of retries 

; [mjtOS Jdecr if not zero to reflect the proper sdi 

;[m.jtoa] then store it. 

; ENTER HERE TO STORE (BUF) IN ARRAY 

; ENTER HERE TO STORE LO BYTE OF (BUF) IN ARRAY 

; ISOLATE LO BYTE 

; ENTER HERE TO STORE RO IN ARRAY 

; ZAP STATUS WORD/RETURN 
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FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL PREPARE THE NECESSARY I/O PARAMETERS NEEDED 
TO PERFORM MAINTENANCE I/O 



INPUTS: 

RIO 

OUTPUTS : 
RO 

IUAR 
UBAR 



POINTER TO MSCP MAINTENANCE I/O PACKET 



TRANSFER BYTE COUNT (WILL BE EVEN] 
UNIBUS AODRESS 
CONTROLLER RAM ADORESS 



003372 
003373 

003374 
00337S 
00337S 
003377 
0O34OO 



010S50 
000640 
03004S 
010S50 
010550 
010S50 
OS5540 



007022 
OOOOI 2 
000005 
007012 
007013 
0O70 10 
00000 1 



135572 
135534 

oooooo 

135SOO 

125536 
135573 
137777 



U MIOP : 
U . MIOA: 



ADD 

ADD 

ADO 

AOD 

ADO 

ADO 

BIC\R 

. PAGE 



*P. RG0O,R1O\N, BAR %CALL S. 
#OMOOT,Q %CALL S. 

0, UBAR 

#P . SUFL ,R10\N, BAR 54CALL 
*P . BUFH , R10\N . BAR %CALL 
#P . BCN0.R10\N. BAR 5SCALL 



#1 , RO 



%RET 



LOOO : 0=RELATIVE POSITION IN MEMORY 

.FUNB ; [ 1 SKlUBARsOM.BEG AODRESS 

; (16K]UBAR:0M STARTING ADDRESS 

.LDIU : [ISKUUARsLO ORDER BUFFER DESCRIPTOR 

.SXBI : RI=HI OROER BUFFER DESCRIPTOR 

.LORO ; R0=» BYTES TO TRANSFER 

; GET * WORDS TO TRANSFER IN RO 
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ROUTINE NAME: 

U.MLUN (CREATE AND STORE MSCP MULTI-UNIT CODE) 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE CREATES AND STORES THE MSCP MULTI-UNIT CODE 
IN THE AREA POINTED TO BY 0. 




UBAR 



AREA WHERE MULTI-UNIT CODE IS TO BE STORED 
SDI CONTROL BLOCK POINTER 



OUTPUTS : 

MULTI-UNIT CODE STORED IN AREA POINTED TO BY 

»»• NOTE STACK AT MAXIMUM DEPTH *«« 



CREATE ANO FILL IN MULTI-UNIT CODE «>> 



003401 








ASSUME 


SDI . 1.E0 


13S5 


003401 








ASSUME 


SOI . 2, EO 


1 475 


00340 1 








ASSUME 


SDI .3,60 


1615 


00340 1 








ASSUME 


SDI . 4, EO 


1735 


0O340 1 


053440 


00O005 


OIOOOO 


J MLUN : MOV\R 


UBAR , RO 




003402 


053440 


OOOOOO 


O10OOO 


ROT\R 


RO, RO 




003403 


053440 


OOOOOO 


OIOOOO 


ROT\R 


RO, RO 




003404 


030S40 


00O004 


OIOOOO 


ADD 


#4 , RO 




003403 


O54540 


000006 


1 1 3370 


ANO\R 
. PAGE 


#6, RO 





[U52EC11MAKE SURE SCHEME FOR 
I U52EC1 1GETTING 0.1.2.3 AS 
I US2EC 1 1MULT I -UN IT COOES 
1U52EC1 IWILL WORK 
( 1 6K) R0:UBAR/2 
( 1 6KIRO:U8AR/4 
[ V05 IR0:UBAR/8 

(raeOI JADJUST TO MAKE 0.1,2.3 
not 2,3.0, 1 
[16K1RO:SOI CONTROL BLOCK PTR, STORE S RETURN 
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ROUTINE NAME: 

U.MNRD (MSCP MAINTENANCE READ COMMANO) 
'SEQUENTIAL COMMANO' 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL PERFORM THE MSCP 'MAINTENANCE READ' COMMANO. 
THE FUNCTION PERFORMED IS DEPENDENT UPON THE VALUE OF REGION 10 AND 
ARE DESCRIBED BELOW: 
REGION 10 > 1 

TRANSFERS DATA FROM THE CONTROLLER BUFFER MEMORV TO THE HOST 
BVTE COUNT AND REGION OFFSET DEFINE THE REGION OF BUFFER 
MEMORV TO BE TRANSFERED TO THE HOST. 






INPUTS: 



OUTPUTS : 

NONE 



003406 
0O34O7 


036542 
O33760 


OOOOOI 

010001 


oooooo 

042420 


U .MNRD: 

; ** * 


XOR #1,R2 
MOV\T #ST.CM0,RO 

MAINTENANCE READ C 


0O3410 
O0341 1 
003412 


013440 
013440 

01 3440 


OOOOOO 
10000 

oooooo 


123372 
036242 
1 13420 




NOP 

NOP 

TST RO 

. PAGE 



POINTER TO MSCP PACKET 



%JNZRO U.C2EP 



'/.CALL U.MIOP 
7.CNZR0 UNB.WR 
7.JMP U.MWDA 



IF REG ID NEC 1 THEN ERROR EXIT 



I16K1G0 CALCULATE I/O PARAMS 
WRITE BUFFER TO HOST 
TEST RO/CONTINUE 



KDS50. MICROCODE . 
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ROUTINE NAME: 

U.MNWR (MSCP MAINTENANCE WRITE COMMAND) 
'SEQUENTIAL COMMAND' 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL PERFORM THE MSCP 'MAINTENANCE WRITE' COMMAND. 
THE REGION ID AND BYTE ARE DECODED TO PERFORM THE FOLLOWING FUNCTIONS: 
REGION ID = 1 AND BVTE COUNT > O 

DOWNLINE LOADS FROM HOST MEMORY INTO CONTROLLER BUFFER STARTING 
AT THE REGION OFFSET. BYTE COUNT MUST BE EVEN. 



INPUTS : 

RIO 



OUTPUTS: 

NONE 





00341 3 


033760 


010001 


042420 


U . MNWR : 


MOV\T 




0034 1 4 


01 3440 


OOOOOO 


123372 




NOP 
BIS\F 




0034 1 5 


1 33544 


OIOI 20 


1 4342 1 




BIS\F 


u 

< 

Z3 


0034 1 6 


1 14544 


010020 


00341 6 


1$: 


BIT 














a 


003417 


013440 


OOOOOO 


125635 




NOP 


ii 


0O342O 


033760 


01001 1 


052420 


U .MWDA: 


MOV\T 


s 

cc 
O 

u. 


0O3421 


033740 


OOOOOO 


1 12420 


U.MWDB : 


MOV 












.PAGE 


co 
o 
co 















POINTER TO MSCP PACKET 



#ST.CMD,RO XJNZRO U . C2EP 

"/.CALL U.MIOP 

#<DMODE>,RLL *'.JZRO U.MWDB 

#<DMODE ! DXFO , RLL T.JZRO U.MWDB 

#DXFC,RLL "/.JNZRO 1$ 



#ST .HST.RO 
#ST .SUC, RO 



'/.CALL UNB.RD 
•/.JNZRO U.C2EP 
•/.JMP U.C2EP 



IF REGION NEQ 1 THEN ERROR EXIT 

[16K1G0 PREPARE FOR MAINT I/O 

i f O leng jump 

if O leng jump 
else wait for DPROC to clr DXFC 
indicating that it is now really 
in DMODE 

xfer data 

ROsHOST ACCESS ERROR/CHG TO END PKT 

ROsSUCCESS/GO CHG TO END PKT 



[ rae3-ct t9 ] 
Eraea-ct 19 ] 
Irae3-c1 191 
lrae3-cl 19 ] 
[rae3-c 1 19] 
E rae3-c 119 1 



r~\ 
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ROUTINE NAME: 

U.ONLN (MSCP ONLINE COMMAND I 

U.SUCH (MSCP SET UNIT CHARACTERISTICS COMMAND) 

•SEOUENTIAL COMMANDS' 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL PERFORM THE MSCP ONLINE COMMAND AND THE MSCP 
SET UNIT CHARACTERISTICS COMMAND. INITIAL ENTRY WILL OUEUE THE MSCP 
PACKET TO THE CORRECT SDI CONTROL SLOCK. THE SECOND 

ENTRY (WHEN THE PACKET IS ACTIVE) WILL INITIATE THE FUNCTION INVOLVING 
COORDINATION WITH THE DRIVE PROCESSOR. 

THE SET UNIT CHARACTERISTICS COMMANO IS FILTERED OUT AND 8YPASSES 
THE ONLINE SPECIAL PROCESSING. 



INPUTS : 



RIO 

UBAR 



MSCP OP CODE 

MSCP PACKET STATUS AND OUEUE WORD 

POINTER TO MSCP PACKET (1ST, 2ND, AND 3RD ENTRY I 

POINTER TO SDI CONTROL BLOCK (2ND AND 3RD ENTRY) 



O20OO0 








M 


SUCH 




000044 








M 
U 


SUCL 
SUCH: 




003422 


10374O 


000040 


010000 






MOV 


003423 


003640 


0OOO44 


1 13426 






BIS 


020000 








M 


ONLM : 


: a 


000047 








M 


ONLL : 


: s 


003424 


103740 


000040 


100OO 


U 


ONLN: 


MOV 


003425 


00364O 


000047 


000000 


U 


QNLO: 


BIS 


003426 


1 1 4541 


0OO100 


10000 






SIT 


003427 


01 3440 


010000 


003441 






NOP 



OUTPUTS: 

MSCP ONLINE 'ENO' PACKET 

MSCP SET UNIT CHARACTERISTICS 'END' 



MD.CSE 

MO. EXC !MD . SWP 



modifiers allowed for OP.SUC [rae02] 
Echio] modifiers allowed for OP . Sue [ rae02 J 



#M.SUCH ,0 
#M.SUCL,0 



MD . CSE 
: = MD . EXC !MD .SWP ! MD . 
#M. ONLH.O 
CM. ONLL ,9 



#PACTV, R1 



IMF! MO. RIP 



7.JNZR0 U.ONLB 



set mod i f i er s 

set legal modifier bits 

modifiers for OP.ONL 

modifiers for OP.ONL 

set legal modifier bits 

set legal modifier bits 



IF PACKET ACTIVE 

THEN ENTRY POINT #2 



[rae02] 
Irae02 1 

[rae02 1 

[Ohio] [rae02] 

[rae02] 

I rae02) 

; [ rae02 ] 



o 



ENTRY POINT #1 - INITIAL PACKET PROCESSING «» 



003430 


013440 


000000 


122263 






NOP 




003431 


033761 


1000S 


042S06 






MOV\T 


#<P.MOD-P> 


0O3432 


013440 


oooooo 


122256 






NOP 




003433 


034441 


010001 


002506 






CLR 


R1 


003434 


013440 


oooooo 


122241 






NOP 




003435 


013440 


010000 


0025O6 






NOP 




003436 


01344O 


oooooo 


122551 


U. ONLA: 


NOP 




003437 


033S60 


10O03 


042420 






BIS\T 


#ST . OFL ,RO 


KDBUP 




KDBSO .MICROCODE 


, 22 


APR 


-1988 1 


: 16: 43 . 97 



7.CALL 

7.JNZR0 

7.CALL 

7.JNZR0 

%CALL 

%JN2RD 



%CALL 

7.JNZRQ 



TSTMOD 
U.CMDA 
MLN44 
U. CMDA 
U. RSVA 
U . CMDA 



U .GSDI 
U.C2EP 



test for reserved modifier bits [rae02] 

it set then error [rae02] 

test that msg leng is large enough (rae02) 

if not declare error [rae021 

test reserved fields [rae02] 

if &rr call err rtn [rae02] 

U.ONLA called by U.AVAL, so do test [rae02l 

of resv. fields first. [ rae02 j 

GO FIND SDI CONTROL BLOCK/SAVE OP CODE IN R7 

IF NONE THEN OFFLINE/CHANGE TO END PKT[rae03) 
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ADD #SOI . PO, UBAR\N,BAR %JMP U.LNKP j GO LINK UP PKT/RETURN 
ENTRY POINT #2 - ACTIVE PACKET PROCESSING »*« 



; (E121 I 



00344 1 
003442 
003443 
003444 
003445 
003446 
003447 
0O345O 
00345 1 
003452 
003453 
003454 
003455 

003456 
0034S7 
003460 
003461 

003462 
O03463 

003464 
0034 65 
003466 
003487 
003470 
00347 1 
003472 
003472 
003473 
003474 
003474 
003475 
003476 
O03477 



003500 
003501 
003502 
O035O3 

KDBUP 



013440 
010545 
013740 
103740 
10545 
004600 
033442 
033450 
033447 
013440 
013440 
013440 
033540 

013440 
013740 
010545 
013440 

014542 
013440 

033746 
033740 
03374 1 
03376 1 
016547 
1 14640 

133760 

010S45 

1 14542 
013440 
033741 
033740 



01O545 
01 454 1 
033460 
013440 



OOOOOO 
007000 
007264 
000034 
OO700O 
000003 
000010 
000002 
OOOOOO 
OOOOOO 

10000 

oooooo 

000003 

oooooo 

007264 
OO7000 
OOOOOO 

O0O200 
O 10000 

000040 
O1OO03 
000020 
010005 
000012 
O lOO 10 

010001 
007044 

0400 10 
O1000O 

00000 1 
010003 



12S473 
125572 
125613 
10000 

oooooo 

135613 
12371 1 
010000 
OOOOOO 
122551 
1 13456 
135474 
102420 

133230 

125575 
125621 
1 35474 

OOOOOO 
003546 

122610 
1 1364 1 
124321 
052502 
OOOOOO 
1 13504 

153500 
135575 

1 13500 
103505 
12432 1 
053505 











in case we can't find the SDI block 


rati 1 1 










this t 


ime, is the drive has stopped 


rial 1 ) 










c 1 ock i 


ig, and must exit, clear up 


rael 1 1 










the SDI. ST word, but save it and 


rael 1 1 










restore it if infact we still do have 


rael 1 ) 










the SDI block 


rael 1 ) 


NOP 






%CALL 


P . LOCK 


lock out the Dproc while 


rael 1 ! 


ADO 


#SDI .ST 


UBAR\N 


BAR 7.CALL 


S . LDOO 


get current SDI status 


rae 1 1 j 


MOV 


#MSCPLN 


BAR 


7.CALL 


S .STOO 


and save it in temp storage 


rael 1 1 


MOV 


#<DRAVL 


DRVOL ■ ORDUP> ,0 




clear all but drive status 


rael 1 ] 


ADD 


#SDI .ST 


UBAR\N 


BAR 






rae 1 1 ) 


AND 


(BUF) ,0 




7.CALL ! 


. STOO 


and set back into SDI status 


rael 1 ] 


MOV 


R10.R2 




7.CALL 


J . ULKA 


temp unlink from SDI.PO 


raeos ] 


MOV 


R2.R10 








restore MSCP packet adrs 


raeos j 


MOV 


RO, R7 








save RO to R7 earlier 


raeos ] 


NOP 






%CALL 


1 GSDI 


refind SDI contl block 


raeos 1 


NOP 






7.JZR0 


0$ 


if there is none now, error 


rael 1 ) 


NOP 






5SCAIL I 


NLOCK 


unlock the dproc and then 


rael 1 ] 


BIS 


#ST. OFL 


RO 


7.JMP I 


. C2EP 


go create the end packet 


rael 1 ] 
rael 1 ! 


NOP 






7.CALL I 


. LNKH 


nowrelinktoSDI.PO 


raeos I 


MOV 


#MSCPLN 


BAR 


7.CALL ! 


. LDR2 


now restore the SDI status 


rael 1 ] 


ADD 


#SDI .ST 


UBAR\N 


BAR 7.CALL 


S .STR2 


and set it into R2 


rael 1 ] 


NOP 






SCALL L 


NLOCK 


and unlock the dproc now 


rael 1 1 


ADD 


#SDI .ST 


UBAR\N 


BAR 7.CALL 


S. LDR2 


R2=SDI STATUS 




BIT 


#XCMP,R2 






IF TRANSFER COMPLETE 




NOP 






7.JNZR0 I 


. ONLF 




raeOS ] 


MOV 


RO, R7 




%JN2R0 I 


. ONLF 


THEN CONTINUE 


raeOS ] 


MOV 


#SUSP, R6 


7.CALL I 


. GUCP 


GO GET UNIT CHAR PTR 




MOV 


#ST .OFL 


RO 


7.JZR0 I 


. DONE 


IF NOT THERE THEN MUST HAVE G0^ 


E OFFLINE 


MOV 


#MD SHO 


R1 


7.CALL L 


. TMOD 


GO TEST IF SHADOW MODIFIER PRES 


ENT 


MOV\T 


#<P . MOD 


P > , R 1 


7.JNZR0 L 


. CMDE 


IF SET THEN INVALID COMMAND 




XOR 


#OP.SUC 


R7\N 






IF SET UNIT CHAR CMD 




BIT 


#ORV . AV 





7.JZR0 I 


. ONLS 


THEN SET UNIT FLAGS 




ASSUME 


ST .SUC, EO, 






MAKE SURE ST. SUC IS ZERO 




MOV\T 


#SC .AOL 


RO 


5SJZR0 L 


. ONLZ 


IF UNIT ONLINE THEN FINISH UP 




ADD 


*SDI .SI 


UBARXN 


BAR %CALL 


S . LDR2 


R2=0RIVE STATUS 




ASSUME 


DRV . RU , EO, BI TOO 




MAKE SURE ORV . RU IS LSB 




BIT 


#DRV . DD 


R2 


7.JNLSB L 


.ONLZ 


IF NOT SPINABLE THEN SET STATUS 


/OUICK EX 


NOP 






7.JZR0 L 


. N L C 


IF NOT DISABLED THEN CONTINUE 




MOV 


#MD .RIP 


R1 


7.CALL L 


. TMOD 


IF PKT MODIFIERS ALLOW SELF-DES 


TRUCT 


MOV\F 


#ST .OFL 


RO 


%JNZRO L 


. ONLC 


THEN CONTINUE/ELSE ROsOFFLINE 


STATUS 



SET STATUS IN RO IN SDI.SW, THEN GIVE CHARACTERISTICS AT U.ONLL *** 



007003 125574 

00O0 17 0100OO 

10001 04363 1 

003000 103631 



ADD #SDI .SW. UBAR\N, BAR XCALL S.LDR1 

BIT #17, R1 

MOV\T R1.RO %JNZRO U.ONLL 

MOV RO.BUF 7.JMP U.ONLL 



BARsPTR TO MSCP STATUS [ mjt 06 1 make Sure nothing el 
[mjtO6]D0 A BIT TEST OF THE ERROR 
Imjt06]IF NOT ZERO, RELOAD RO AND BRANCH 
ELSE UNSPINABLE JUST GIVE INFO 
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SET UNIT CHARACTERISTICS COMMAND - CHECK IF UNIT ONLINE **» 
MO¥\T #ST.AVL,RO XJN2R0 U.ONLZ 
RESET SUBUNIT FLAGS ««* 



IF AVAILABLE THEN JUST GIVE INFO 



003S0S 


033742 


000003 


OOOOOO U.ONLC: MOV 


003506 


010550 


00701 1 


125573 


ADO 


003507 


033741 


OOO0O4 


124321 


MOV 


003SI0 


133S62 


010020 


04351 1 


BIS\T 


003S1 1 


034140 


000002 


OIOOOO 


AND 


0035 12 


010545 


007060 


12S574 


ADD 


0O3S13 


035141 


000002 


01OOOO 


BIC 


0O3514 


016547 


00OO12 


OOOOOO 


XOR 


003515 


033140 


013001 


10237S 


OR 



00351E 
003517 



003520 
00352 1 
003522 
003523 
003524 
003525 
003S2S 



003527 
003S30 



003531 
003532 
003533 
003534 



003S35 
003536 
003537 
003537 
0O3S40 
003541 



103740 
034441 



033441 
013440 
010545 
010550 
O1OS50 
030141 
10O260 



010550 

O10550 



010545 
1 13740 
O33440 
O1054S 



010545 
010545 

01 3740 
01344O 
135642 



000240 

000001 



010003 
OOOOOO 
007073 
0O702O 
007021 
OOOOOO 
020000 



007O2O 
007021 



007015 
003002 
000002 

007016 



007063 
007064 

007040 
003606 
000360 



OOOOOO 
1 13527 



1 13554 
122610 
125573 
125574 

1 3SS72 
OOOOOO 
143S27 



135520 

125613 



10000 
1 32473 
OOOOOO 
135630 



135601 
135600 

135625 
135620 
132764 



#UF.MSK,R2 

#P UNFL , R10\N,BAR '/.CALL S.LORO 

#MD.SWP,R1 %CALL U . TMOD 

»UF.WPS,R2 %TN2R0 

R2, RO 

#SDI . UF , UBARXN.BAR 7.CALL S.L0R1 

R2.R1 

#0P .SUC,R7\N 

R1.R0.BUF 7.JZR0 U.CLRS 



CALCULATE 1ST COPY XBN NUMBER *** 

MOV »XBNCOD,0 

CLR R1 IJHP U.ONLE 

UPDATE XBN TO NEXT COPY STARTING XBN ««« 

MOV R3,R1 %J2R0 U.ONLX 

nop %cal 1 u . gucp 

AOO #SDI . FC, UBARXN , BAR %CALL S.LORO 

ADD #P. LBN0,R10\N, BAR %CALL S.L0R1 

ADO #P. LBN1 .RIOXN , BAR '/.CALL S.L090 

ADD R0.R1 

INC\T XTCRY 

STORE STARTING XBN IN PACKET «** 

ADD #P . LBNO. RIOXN , BAR "/.CALL S.STR1 

ADD #P . LBNI ,RIO\N,BAR 7.CALL S.STOO 



R2=UNIT FLAG MASK 
ROsNEW UNIT FLAGS 
IF WRITE PROTECT MODIFIER 

THEN SET SOFTWARE WRITE PROTECT 
ISOLATE FLAGS CONTROLLER LIKES 
[V05] RIsEXISTING SUBUNIT FLAGS 
CLEAR FLAGS HOST CAN SET 
IF SET UNIT CHAR COMMAND 

THEN CLEAR SUSP/EXIT-OR INTO UNIT FLAGS 3, RESET 



O'XBN HEADER CODE 

ZAP LO STARTING XBN/CONTINUE 



D 



IF ALL COPIES TRIED THEN ERROR 
Restore the unit characteristics' 
IV051 RO=FCT COPY SIZE 
R1:L0 PREVIOUS START XBN 
9=HI PREVIOUS START XBN 
ADO IN FCT SIZE 
IF CARRY THEN UPDATE HI XBN 



SAVE LO XBN 
SAVE HI XBN 



poi nt er [ choi ] 



FORGE TRANSFER COUNT SO U.ALOC WILL ONLY ALLOCATE 1 BUFFER «*» 



ADD #SOI . XL , UBARXN.BAR 

MOV #SECSZ*2,SUF %CALL U.CSPT 

MOV R2.R0 

ADD #SOI . XH, UBARXN.BAR %CALL S.CLRB 



BAR=PTR TO LO TRANSFER COUNT 

SET IN 1 SECTOR'S WORTH/CO CALC SECS/TRK 

ROs# SECTOR'S PER TRACK 

ZAP HI ORDER BYTES REMAINING 



GET LBN CYLINDERS «** 



AOO 

AOO 

ASSUME 

MOV 

MOV 

BIC 



#SDI . HI .UBARXN.BAR 7.CALL 
#SOI . H2.U8ARXN, BAR '.CALL 



. L0R7 ; ( V05] R7=LBN CYLS 
.L0R6 MV05I R6:LBN CYLS HI 



* HI CYL NUMBER 



<CNVTV1S17> . LE.<17-<CNVTV4-CNVTV1 >> ; USE AUTO-INC TO PAINT CNVTVX 



#CNVTV1 .BAR 
R6.BUF 8>RUPF 
#XBNSTR,0,R2 



'/.CALL 
7.CALL 
%CALL 



S .STR7 
S .STR1 
U. IOPY 



SAVE LO LBN CYLS 

SAVE HI LBN CYLS/SAVE LO XBN 

ZAP XBN CODE FROM HI XBN 



SET SEEK REOUESTED BIT IN SDI STATUS 
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003542 
003542 
003643 
003544 
003545 



010545 
010550 
01 0550 
013440 



007003 
007024 
007025 
OOOOOO 



125630 

12560 1 
125606 
103034 



ASSUME ST.SUCEO.O 

AOO #SDI .SW.UBARXN. BAR '/.CALL S.CLRB 

ADD #S.CYLL .RIOXN, BAR 7.CALL S.LDR7 

ADD #S .CYLH, RIOXN. BAR 7.CALL S.LLB6 
NOP %JMP U.IOPZ 

SET UNIT CHAR DONE. ERROR OR PSEUDO AVAILABLE ENTRY POINT *«* 



MAKE SURE SUCCESS IS ZERO 
MAKE STATUSsSUCCESS OPTIMISTICALLY 
R7:L0 XBN CYL NUMBER 
R6 = HI XBN CYL NUMBER 
[U52EC2] BYE-BYE SUBUBITS... 



003546 


010545 


O07O03 


135576 


U. ONLF: 


ADD 


003547 


016547 


0000 1 2 


OOOOOO 




XOR 


OO3550 


014542 


01 0004 


1 13631 




BIT 


003551 


016543 


0101 10 


103631 




XOR 


OC3552 


1 1 1543 


OIOI 37 


153564 




SUBXF 


003553 


033441 


020003 


003640 




MOV 



R3=ERR0R STATUS 

IF SET UNIT CHAR CMD 

THEN CONTINUE/IF NOT ERROR 
#<ST. DAT1SC. HDR>, R3XN %JZRO U.ONLL; [U52EC1]THEN DONE/IF HOR NOT FOUND 
#<ST.MSK*SC. INV>, R3XN %JZRO U.ONLY; THEN CONTINUE/ELSE GET SUB-CODE 
R3.R1 7.JNCRY U.DONX ; IF LT/EO SC.INV THEN FATAL SDI LEV2 3 DONE 



#SDI .SW.UBARXN, BAR %CALL S.LDR3 

#0P.SUC,R7\N 

#DERR,R2 7.JZR0 U.ONLL 



MARK UNIT AVAILABLE SO . PROC WILL DISCONNECT **» 



003554 


010545 


0070O3 


135620 


U.ONLX: 


ADD 


003555 


010550 


007001 


125574 




AOO 


003556 


014541 


000002 


OOOOOO 




BIT 


003557 


033541 


013002 


053640 




BISXF 


003560 


010550 


007007 


OOOOOO 




AOD 


003561 


013740 


003001 


135476 




MOV 


003562 


035540 


003044 


105474 




BIC 










; [mjt061BIC 



#SDI .SW.UBARXN, BAR '/.CALL S.STR1 

#P . VCID.RtOXN.BAR '/.CALL S.LDR1 

#PONER, R1 

#P0NER,R1 .BUF %JNZRO U.DONX 

#P . MOD, RIOXN, BAR 

»MD SPO.BUF %CALL U . GMST 

#<SUSP+DERR> , RO, BUF %JMP UNLOCK 



SAVE ERROR CODE 

[U52EC3IR1 =VIRT CIRCUIT ID * FLAGS 

[U52EC3IIF ERROR ON AVAILABLE SE9. AFTER ONLINE FA 

[U52EC31 THEN FATAL ERR AND DONE/ELSE SET #PONER 

BARsPTR TO PKT MODIFIERS 

ROsMUTEXED SDI STATUS 

CLR SO ONLINE CAN WORK AGAIN 



#<SUSP+XCMP+DERR> ,RO,BUF %JMP UNLOCK ; CLR SO ONLINE CAN WORK AGAIN 

FCT READ COMPLETE ENTRY POINT **» 
CHECK FOR ECC ERROR *** 



003563 


033746 


000 100 


122375 


U 


ONLR: 


MOV 


003564 


O10545 


0O7O06 


135601 


u 


ONLY : 


ADO 


003565 


010547 


007001 


135573 






ADO 


003566 


033741 


00OO02 


134320 






MOV 


003567 


034460 


010000 


053500 






CLRXT 


003570 


1 14540 


000020 


OOOOOO 






BIT 


003571 


013460 


010000 


076450 






NOPXT 


003572 


033743 


010345 


143607 






MOVXF 



#SFSV,R6 XCALL U.CLRS 

#SOI . UB, UBARXN, BAR %CALL S.LDR7 
#BUF .ST,R7\N.BAR %CALL S.LDRO 
#MD.IMF,R1 '/.CALL U . TMOA 
RO 7.JNZR0 U.ONLZ 

#BECC,RO 

7.CN2R0 ECCC 
#<ST.MFE + SC.ECO.R3 %JZRO U.ONLI 



CLEAR BUFFER SERVICE 

R7:BUFFER POINTER 

I 1 6K]R0 = BUFFER STATUS WORD 

IF IGNORE MEDIA FORMAT ERROR MODIFIER SET 

THEN HE DOESN'T CARE/MAKE STATUS EO O 
IF ECC ERROR 

THEN CALL ECC ROUTINE 
IF CORRECTED THeN CONTINUE 



UNCORRECTABLE ECC OR EDC ERROR - INVOKE RECOVERY ««« 



003S73 


010545 


007034 


135574 


U .ONLG: 


ADD 


003574 


O1O550 


007010 


135573 




ADO 


003575 










ASSUME 


003575 


134541 


030017 


1O36O0 




AND 


003576 


00374O 


000010 


1 3550 1 




MOV 


003577 


133541 


00320O 


OIOOOO 




BIS 



00 3 600 


013440 


OOOOOO 


134731 


U 


ONLH: 


NOP 


003801 


033746 


010204 


037777 






MOV 


OO3602 


1 33546 


000100 


1 22375 






BIS 


003603 


010545 


007O17 


125630 






AOD 



#SOI . RC, UBARXN.BAR '/.CALL S.L0R1 

#P .RS06, RIOXN. BAR ".CALL S.LDRO 

0NLREC.EQ.BIT15 

#L0NIB*256. ,R1 IJMSI U.ONLH 

#8 . ,0 7.CALL S. RRRI 

#0NLREC,R1 , BUF 



INVOKE LEVEL 1 ERROR RECOVERY 



'/.CALL U.RREC 
#<XCMP ! OERR> , R6 7.RNZR0 
*ERRIP,R6 %CALL U.CLRS 

#S0I . E1 , UBARXN, BAR '/.CALL S.CLRB 



RIsFCT COPIES 

ROsCOPY LEVEL 

MAKE SURE ONLINE RECOVERY EO MSB 

ISOLATE FCT COPIES 

SWAP BYTES OF COPIES 

ACTIVATE COPY COUNT 



GO DO LEVEL I ERROR RECOVERY 
IF STARTED THEN RET 
ZAP DRIVE ERR.XCMP 8 LEV 1 ERR 
CLEAR LEVEL 1 ERROR RECOVERY 



""> 
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003604 010550 

003605 013440 

003606 034S40 



003607 016543 

003610 003740 

00361 1 010S47 



00361 2 
003613 
0O3614 
0O3615 

00361 6 

00361 7 
003620 
003621 



010547 
010547 
01OS47 
034541 
010547 
033743 
01 6503 
033763 



007010 
OOOOOO 
OOOO 1 7 



0001 10 
010336 
00701 2 

007013 
007014 
00701 1 
003377 
007002 
000105 
000003 
0101 12 



125614 
12S50S 
1 13520 



1 OOOO 
103573 
135630 

125630 
135630 
135574 
OOOOOO 
135575 
125175 
OOOOOO 
043573 



ADD 
NOP 
AND 



#P . RS06, R10XN.BAR XCALL S.DECB 



#LONIB, RO 
LATE EOC AND VERIFV 



y.cAii 

%JMP 



XOR 
MOV 
ADD 

ADD 
ADD 
ADD 
AND 
ADD 
MOV 
XOR 
MOV\T 



#<ST.DAT!SC.HDR>,R3XN 
#M0512SL0BYT,0 SJZRO 
#BUF .BC, R7\N, BAR XCALL 



S .RELC 
U.ONLD 



U . ONLG 
S . CLRB 



»BUF . U 1 , R7XN, BAR XCALL S.CLRB 

#BUF . U2 , R7\N . BAR '/.CALL S.CLRB 

#BUF . GP , R7\N, BAR '/.CALL S.LDR1 

#LOBVT, R1 , BUF 

#BUF . BP, R7\N,BAR XCALL S.L0R2 

#69 . , R3 %CALL U . CKEO 

(BUF I , R3\N 

#<ST .CNT+SC.EOO. R3 XJNZRO U.ONL 
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GO DECR RO AND RESET 

[16K1RELEASE THE BUFR CNTRL BLKS 
ISOLATE COUNT 



IF HEAOER COMPARE ERROR 

THEN DO ERROR RECOVERY 
ZAP BYTE COUNT 

CLEAR LOWER AOR 

CLEAR UPPER ADR AND COUNT 

[mjtoe] get SI Size in group 

Emjtoe] and strip off 

[ 16KIR2=BUFFER PTR 

|16K]R3=E0C START #/G0 CALC EDC 

IF EOC'S NEO 

THEN DO RECOVERY 



003622 010547 007002 135576 

003623 133640 0OO255 125505 

003624 010543 007000 135610 

003625 033761 010245 043554 



003626 000545 000060 OOOOOO 

003627 010543 007O02 133365 
003 630 

0O363O 010543 007003 123365 



033443 000005 133702 U.ONLL: 



003632 

003632 010545 007075 133365 
003633 

003633 010545 007076 133365 
003634 



003634 010545 007061 133365 
003635 

003635 010545 007062 1333S5 



003636 010550 007030 135630 

KOBUP KDB50. MICROCODE. , 22-APR 



EVERYTHING COOL ■ CHECK PACK FORMAT »»« 

ADD #BUF .BP, R7\N, BAR XCALL S.LDR3 

OR #MD5128HIBYT,0,RO XCALL S.RELC 

ADD #FCT .M0.R3XN, BAR XCALL S.XORO 

MOV\T #<ST .MFE+SC . N12> , R1 XJNZRO U.ONL 



[16K]R3»FCT DATA BUFFER PTR 

[16K1TEST FOR HI BYTE OF MODE CODE 

[16K1G0 XOR RO WITH (BUF) 

; IF NOT IN 512-BYTE FORMAT THEN ERROR 



PUT VOLUME IDENTIFIER INTO SUBUNIT CHARACTERISTICS BLOCK *«« 



ADD #<SDI . VI - 1 > .UBAR.O 

ADO #FCT . VI , R3XN.BAR XCALL STBFLG 

ASSUME SOI . V2, EO, SDI . V 1+1 

ADD #FCT . V2, R3\N , BAR XCALL STBFLG 

SET UNIT FLAGS, MU L T I - UN I T CODE , UNIT ID, 

MOV UBAR.R3 "/.CALL U.SUNI ; 

FILL IN UNIT SIZE (IN LBN'S) »'»■* 

ASSUME <P .UNSO- 1 > ,E«,P .SHST 

ADO #SDI . L 1 , UBARXN, BAR '/.CALL STBFLG 

ASSUME P . UNS 1 . EO.P UNSO+1 

ADO #SDI . L2, UBARXN, BAR '/.CALL STBFLG 

ASSUME P . VSEO. EO. P. UNS1+1 

FILL IN VOLUME SERIAL NUMBER *»* 

ADD #SOI .V1 . UBARXN. BAR '/.CALL STBFLG 

ASSUME P . VSE 1 , EO, P . VSEO + 1 

ADD #SOI . V2 , UBARXN , BAR '/.CALL STBFLG 

MAKE SURE LAST TWO WORDS ARE ZERO *** 

ADO #P . RCTS . RIOXN, BAR XCALL S.CLRB 

- 1936 11:16:48.97 



(US2EC2]0=START OF SEOUENTIAL STORE AREA;IE121] 

(US2EC21GET AND SAVE VOLUME ID LO 

MAKE SURE SEOUENTIAL 

[U52EC21GET AND SAVE VOLUME ID HI 

ETC. *** 

SET IN UNIT, MEDIA TYPE ID'S 



MAKE SURE SET UP RIGHT 

IV05] GET AND SAVE LBN'S IN HOST AREA (LO) 

MAKE SURE SEOUENTIAL 

(V05) GET AND SAVE LBN'S IN HOST AREA (HI) 

MAKE SURE SEOUENTIAL 



[V051 GET AND SAVE VOL SERIAL NUMBER LO 

MAKE SURE SEOUENTIAL 
[V051 ROsVOL SERIAL NUMBER HI 



ZAP WORD 22 
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»P . RBNS. RIOXN. BAR '.CALL S.CLRB 



PACE 213 



ZAP WORO 23 



ENTRY POINT #3 - ONLINE ERROR EXIT POINT «»* 
GENERAL EXIT POINT FOR ALL MSCP TERMINATIONS **« 

ADD «SDI SW. UBARXN, BAR XCALL S.LORO ; RO = APPROPRIATE STATUS CODE 

PACKET COMPLETE EXIT - RO HAS STATUS COOE «»« 



00364 1 


033446 


OOOO 10 


13371 1 


U . DONE : 


MOV 


003642 


0334SO 


000006 


132377 




MDV 


003643 


013440 


OOOOOO 


125505 




NOP 


003644 


010S45 


007025 


135600 




ADD 



R10.R6 XCALL U.ULKA 

R6.R10 XCALL U.C2E0 

'.CALL S.RELC 
OSOI . OM, UBARXN, BAR 7.CALL S.LDR6 



SAVE RIO (PKT PTR) IN R6 

GO CHANGE TO END PKT 

[ISK1RELEASE ALL BUFFERS! JUST IN CASE) 

(U52EC11IF CMO WAS OVERLAPPED 



EXIT POINT TO CLEAR SDI STATUS ANO DEACTIVATE A PACKET ««» 



003845 
003646 
003647 
003650 
0O385 1 
003E52 



010545 
013440 
013446 
134560 
035540 
010545 



007003 
OOOOOO 
000006 
013034 
003304 
OO7025 



125630 
125476 
OOOOOO 

145474 
125474 
105530 



• SOI SW. UBARXN. BAR %CALL S.CLRB 

'.CALL U.GMST 
R6 



(U52EC1 I ZAP STATUS 

GET MUTEXEO SDI STATUS IN RO 

(U52EC11IF R6ISDI.0M) EO 



ADO 
NOP 
TST 

ANOXT *<DRVOL+DRAVL*ORDUP>. RO.BUF %JZRO UNLOCK: (U52EC1) THEN ZAP STATUS/FREE O.PROC/RETU 
BIC »<XCMP ! BFSV10ERR> .RO. BUF %CALL UNLOCK: (US2EC1) ELSE JUST ZAP XCMP 3 BFSV/RETURN 
AOD XSDI.OM. UBARXN. BAR %JMP S.CLRB : (U52EC11ZAP SD I . OM/RETURN 
PAGE 
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ROUTINE NAME: 

U.SCCH (MSCP SET CONTROLLER CHARACTERISTICS) 
'IMMEDIATE COMMAND' 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL PERFORM THE MSCP 'SET CONTROLLER 
CHARACTERISTICS' COMMAND FOR THE CONTROLLER. 



o 



INPUTS : 

R10 



POINTER TO MSCP PACKET 



000001 








M.SCCL 
U.SCCH 


003653 


003740 


00000 1 


122263 




003654 


033761 


010005 


04250E 




003655 


013440 


000000 


122255 




003656 


034441 


010001 


002506 




003657 


010550 


007010 


135573 




003660 


033761 


O10OO6 


042506 





OUTPUTS : 

MSCP 'END' PACKET QUEUED TO THE HOST. 



VERIFY MSCP VERSION NUMBER »•« 

:• MD.FKC 

MOV *M.SCCL,Q 7.CALL TSTMOD 

MOV\T #<P.MOD-P> , R1 7.JN2R0 U . CMDA 

NOP '/.CALL MLN40 

CLR R1 7.JNZR0 U . CMDA 

ADD #P . VRSN,R10\N,BAR SCALL S.LDRO 

MOV\T #<P . VRSN-P> , R1 %JNZRO U . CMDA 

SET HOST TIMEOUT »»» 



00366 1 
003662 
003663 

003664 



003666 
003666 



010550 
013740 
O13740 
000550 



0O7012 
007200 
007 1 74 
0000 1 1 



125573 
13561 6 
13561 6 
010000 



033740 000170 



033740 0O0O23 127750 



ADD #P . HTMO , R10\N , BAR %CALL S 
MOV OHOSTMO.BAR SCALt S 
MOV #TMR.MC,BAR %CALL S 
ADD #<P . CTMO- 1 > , R10.Q 

SET CONTROLLER TIMEOUT «»» 

MOV #CTM0UT,RO "/.CALL S" 

SET CONTROLLER HARDWARE/SOFTWARE V 



LDRO 
STRO 
STRO 



ROLG 

ERSION 



ASSUME P.CSVR.EQ, P.CTMO+1 
MOV #C0DVER,RO %CALL 



U . HWVR 



Ichiol Modifier allowed for OP. sec 

[chiol test for reserved modifier bits [ra«02] 
it set then error [rae02] 

test that msg leng is large enough [rae02] 
if not declare error [rao02] 

ROsMSCP VERSION NUMBER 

IF NEQ THEN INVALID COMMAND 



ROsHOST TIMEOUT IN SECS 

SAVE HOST TIMEOUT 

START HOST TIMER 

QsSTART OF SEQUENTIAL STORE AREA 



STORE CONTROLLER TIMEOUT 

NUMBERS *>* 

MAKE SURE SEQUENTIAL 

ROsCONTROLLER SW VERSION NUMBER / 
SET IN HW VERSION NUMBER. 



0036S7 000550 



SET CONTROLLER ID NUMBER *** 

ADD #<P.CNTO- 1> ,R10,0 %CALL U.SCIO 

SET CONTROLLER FLAGS »«» 



003670 

003671 
O03672 



010550 
034540 

013740 



007011 125573 
003320 OOOOOO 
OO7170 135574 

KDB50. MICROCODE . 



ADD 
AND 

MOV 



#P .CNTF,R10\N,SAR ".CALL S.LDRO 

#CFLAGS.RO,BUF 

»CNTFLG,BAR 7.CALL S.LDR1 



GO SET CONTROLLER ID 



RO'CONTROLLER FLAGS 

ISOLATE FLAGS THAT CONTROLLER SUPPORTS 

R1:0LD FLAGS 
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003673 
003674 



134541 
0331 41 



000377 
0O3000 



01O0O0 
102303 



HI BVTE OF CNTFLG IS CON . ST (VAX PURGE, ERROR INTERRUPT FLAGS, ETC) «** 
%JMP U.IMEX 



AND #HIBYT,R1 
OR RO, R1 , BUF 
.PAGE 



CLEAR OUT OLD CONTROLLER FLAGS 

SET IN NEW ONES/TAKE IMMEO CMD EXIT 



i 
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U.SUIO (SET UNIT 10) 
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FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL SET THE UNIT IDENTIFIER IN THE AREA 
POINTED TO SV REGISTER 0. 



UBAR 




POINTER TO SOI CONTROL BLOCK 
POINTER TO UNIT ID STOREAGE AREA 



OUTPUTS: 

UNIT 10 IN AREA POINTED TO BV 



O03675 01054S 007037 133365 U.SUID: ADO 



003676 
003876 
003677 
003677 
003700 
003701 



O10S4S 007040 (33365 



010545 
010545 
133540 



00704 1 
007042 
000002 



1233S5 
135604 
103370 



ASSUME 

AOO 

ASSUME 

ADO 

ADD 

BIS 

. PAGE 



ftSD I - I 1 , USAR\N . BAR %CALL STBFLG 

P . UNT 1 , eo, P . UNTO+ 1 

»S01 . I2.UBAR\N. BAR 7.CALL STBFLG 

P . UNT2. SO . P . UNT 1 + I 

#S0 I . 13 . U8ARXN , BAR %CALL STBFLG 

»SOI . TI . UBAR\N. BAR %CALL S.LLBO 

#0CLASS,RO %JMP STROLG 



GET AND STORE UNIT ID 01 

MAKE SURE SEOUENTIAL 

GET AND STORE UNIT ID 02 

MAKE SURE SEOUENTIAL 

GET AND STORE UNIT ID »3 

RO DRIVE TVPE 10 CLO BYTE) 

SET IN DISK CLASS/STORE/RETURN 
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ROUTINE NAME: 

U.SUNI (SET UNIT ID, MEDIA TVPE 



FLAGS, ETC . ) 



FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL SET THE UNIT FLAGS, MULTI-UNIT CODE, 
THE UNIT IDENTIFIER, THE MEDIA TYPE I DENT I F I ER , THE SHADOW STATUS, 
AND THE SHADOW UNIT INTO THE END PACKET POINTED TO BV RIO. THIS 
FORMAT IS USED BV MSCP 'GET UNIT STATUS', 'ONLINE', AND 'SET UNIT 
CHARACTERISTICS' COMMANDS. 



INPUTS : 



RIO POINTER TO MSCP END PACKET 

UBAR POINTER TO SDI CONTROL BLOCK 



OUTPUTS : 

MSCP 



'END' PACKET WITH ABOVE DESCRIB60 FIELDS FILLED IN 



0O3702 000550 000007 12340 1 



003703 

003703 010545 007060 



003704 OO0S5O 0000 13 133675 



ADD #<P . MLUN- 1 > , RIO, %CALL U.MLUN 
SET UNIT FLAGS ANO UNIT ID FIELDS *** 



O'START OF SEOUENTIAL STORE AREA 



ASSUME 
ADD 



P . UNFL ,E0, P .MLUN+1 ; MAKE SURE SEOUENTIAL 

#SDI .UF,UBAR\N, BAR SCALL STBFLG ; [V051 GET ANO STORE UNIT FLAGS 



003705 

003705 010545 00707 1 
003706 

003706 010545 007072 



003707 

003707 03444O 000000 

003710 

003710 03444O 000000 



123365 
123365 



133370 
103370 



FILL IN UNIT IDENTIFIER **» 

ADD #<P . UNTO- 1 > ,R10,0 XCALL U.SUIO 

FILL IN MEDIA TVPE IDENTIFIER «** 

ASSUME <P.MED1 - 1 >, E9.P. UNT3 

AOO #SDI .M1 , UBAR\N,BAR 7.CALL STBFLG 

ASSUME P .MED2, EO.P .MID 1*1 

ADD #SOI .M2, UBAR\N,SAR 7.CALL STBFLG 



OsSTORE AREA/GO SET UNIT 10 



MAKE SURE SET UP RIGHT 

[V05] GET ANO STORE 1ST WORO OF MEOIA TVPE 

MAKE SURE SEOUENTIAL 

IV051 GET AND STORE 2N0 WORO OF MEOIA TVPE 



FILL IN SHAOOW UNIT AND SHADOW UNIT STATUS 



ASSUME 
CLR 

ASSUME 
CLR 
. PAGE 



P SHUN, EO. P .ME02* 1 

RO %CALL STROLG 

P SHST , EO . P . SHUN+ 1 

RO %JMP STROLG 



MAKE SURE SEOUENTIAL 

zero Shadow unit (new MSCP) 

MAKE SURE SEOUENTIAL 

ZAP SHADOW STATUS/RETURN 



.' I E 1 2 1 1 
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ROUTINE NAME: 

U.ULNK (UNLINK PACKET FROM OUEUE HEAO) 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL UNLINK A PACKET FROM A OUEUE HEAD PASSED 
IN R7 AND BAR. 



*»t*^ 



R7, BAR 
UBAR 



POINTER TO OUEUE HEAO 

POINTER TO SDI CONTROL BLOCK IU.ULKA ENTRY) 



OUTPUTS: 

CURRENT PACKET RELEASED 

NEXT PACKET REMOVED FROM OUEUE 

RIO NONZERO = POINTER TO NEXT PACKET 

ZERO = NO MORE PACKETS IN OUEUE 



00371 1 


0334*7 


OOOOOS 


000000 


U 


ULKA: 


MOV 


UBAR, R7 




003712 


O30547 


007022 


000000 






ADD 


#SDI . P0,R7,BAR 




003713 


033710 


O00OO3 


010000 


U 


ULNK: 


MOV 


(6UF) ,R10 




0037 14 


013440 


007010 


135602 






MOV 


RIO, BAR 


•/.CALL 


O0371S 


013740 


003000 


000000 






MOV 


#0,BUF 




003716 


1 15550 


000300 


010000 






BIC 


#0.STAT,R10\N 




003717 


O34470 


010010 


143720 






CLR\T 


R10 


V. T Z R 


003720 


013440 


0O7007 


105626 






MOV 
.PACE 


R7.8AR 


%JMP 



R7=SDI CONTROL BLK PTR 

BAR,R7=0UEUE HEAD POINTER 

RIOrPTR TO OUEUE HEAD 

R10=PKT STATUS 3 NEXT LINK PTR 

FREE THIS PACKET 

ISOLATE NEXT LINK FIELD 

IF EO O THEN LAST PKT 

RESET OUEUE HEAD 
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ROUTINE NAME: 

U.STUD (SERVER TASK FOR UTILITIES AND DIAGNOSTICS, AKA OUP) 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE PERFORMS THE INITIAL VALIDATION OF THE DUP COMMAND 
AND VECTORS INTO THE VECTOR TABLE TO PROCESS EACH LEGAL COMMANO . 

INPUTS: 

CCsZERO IF VIRTUAL CIRCUIT IS DUP (DIAGNOSTIC/UTILITIES PROTOCOL) CIRCUIT 
RO=0PCODE OF DUP PACKET 

OUTPUTS: 

DUP COMMAND IS PERFORMED, RETURN TO IDLE LOOP. 

DMODE AND DMBEG FLAGS IN RLL AND DM DATA BASE MODIFIED. 



003721 013440 

003722 01 1540 

003723 030540 

003724 133540 



01OO00 
1O00 6 
020330 
002377 



052176 
1 1 2231 
1 12231 
000000 



U.STUD: TST\F 
SUBC 
ADD 
BIS 
. PAGE 



RO %JNZRO U.VCER 

#MAXSTC,RO\N 7.JZR0 U . CMER 
#ST0TBL- 18L0BYT.RO %JCRY U . CMER 
#HIBVT,RO, PAR 



BR IF ILLEGAL VIRTUAL CIRCUIT 

IP OP CODE EO THEN ERROR/CHK HI RANGE 

IF SO, ERROR: ELSE DISPATCH 

ON OUP OPCODE 



o 



i 
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ROUTINE NAME: 

U.GSST (GET DUST STATUS COMMAND) 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE PERFORMS THE GET DUST STATUS COMMAND 



PACKET OFFSET OF P.BCN1-1 



OUTPUTS : 

DUST STATUS 



O0372S 
OQ3726 
003727 
003730 
00373 1 
003732 
003733 
003734 
00373S 
003736 



033740 
! 33540 
033740 
t 1 4544 
1 33560 
1 33S40 
01 3440 
010545 
010545 
03374O 



U . GSST : ; ADO 



000102 
OOO 1 04 
000 10 1 
000040 
O 1 OO 1 o 
0O00O1 
OOOOOO 
0070O6 
0070O7 
OOOOOO 



O 1 OOOO 
1 23370 
OIOOOO 
O1OOO0 
053732 
133370 
135S34 
123365 
133365 
1 12420 



#<P . BCNO- 1 > , R 10, %JMP U.GSST 



MOV 


# '8 , RO 






BIS 


## ' D , RO 


%CALL 


STROLG 


MOV 


# ' A. RO 






BIT 


"DMBEG . RLL 






BIS\T 


#8TR0TH , RO 


%TN2R0 




BIS 


#STDALN,RO 


■:CALL 


STROLG 


NOP 




XCALL 


S FUNS 


AOD 


#OSTSL , UBAR\N 


BAR '.CALL 


STBFLG 


ADD 


0OSTSH , UBARVN 


BAR '/.CALL 


STBFLG 


MOV 


#ST .SUCRO 


'/.JMP 


U.C2EP 


. PAGE 









IN VECTOR TABLE 

SET DEFAULT FILE EXT TO 'BOA' 

SEE IF A DM PROGRAM IS EXECUTING 
SET ■BETROTHED' STATE IF SO 
ALSO SET 'STANDALONE' BIT 
I 1SK]UBAR:0M. BEG ADDRESS 
[ISKIMOVE PROGRESS INDICATOR 
[ISK1FR0M OMBEG+DSTSL SDM . BEO ♦ OS TS H 
AND RETURN SUCCESSFUL 
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c 



FUNCTIONAL DESCRIPTION: 

THIS ROUTINE PERFORMS THE EXECUTE SUPPLIEO PROGRAM COMMAND. 



BIT 'DMBEG' TESTED IN RLL 
OUTPUTS : 









U . EXSP : I BIT 


#OMBEG,RLL 


%JMP 


U . EXSP 


EXECUTED IN VE 


O03737 


133544 


010120 


047733 


BIS\F 


#<DMODEIDXFC> 


RLL %JN2R0 U.STER 


[ 1 6KJERR0R IF 


















else set DMOD 


O0374O 


t 14544 


010020 


003740 1$: 


BIT 


#DXFC,RLL 


7.JN2R0 


1$ 


wait for DPRO 
i nd i cat i no. t h 
really in OMO 


003741 


004240 


OOOOOO 


133373 


CLR 





7.CALL 


U MIOA 


t 16K1CLR O/SET 


003742 


1 30441 


00000 1 


OOOOOO 


INC 


R1 






PREPARE FOR AD 


003743 


030546 


000040 


125540 


AOD 


*<0FFSET«2> . IUAR '/.CALL 


S . AXAB 


(BOA) BUMP UNIB 


003744 


03444 1 


OOOOOI 


OOOOOO 


CLR 


Rl 






[ c 1 1 9 TflaS 1 c 1 e 


003745 


031540 


000020 


OOOOOO 


SUSC 


UOFFSET.RO 






CHECK FOR ILLE 


003746 


I3044O 


030000 


035635 


INC 


RO 


7.CNMSB 


UNB . RD 


BYTE COUNT FOR 


003747 


03376O 


O1001 1 


OS2420 


MOV\T 


#ST . HST.RO 


V.JN2R0 


U . C2EP 


IF ILLEGAL SC 


0037SO 


013441 


OOOOOI 


OOOOOO 


TST 


Rl 






t qda 1 test edc 


00375 1 


033760 


OI001 1 


052420 


MOV\T 


#ST . HST.RO 


%JN2R0 


U . C2EP 


[ qda 1 error if 


003752 


01055O 


007014 


125573 


AOD 


»P 8UF2.R10\N 


BAR 'CALL 


S . LORO 


GET AODR OF CO 


003753 


013440 


OOOOOO 


135534 


NOP 




%CALL 


S . FUNB 


[ 1 6K1UBAR:A00R 


003754 


01054S 


007005 


1356 16 


ADD 


»OOTCA. UBARVN 


BAR '/.CALL 


S STRO 


[ 1 6K1AN0 STORE 


O0375S 


000545 


OO00O5 


OOOOOO 


ADO 


#<OSTSL - 1 > . USAR . 




I 1 6K]Q:DUST ST 


003756 


034440 


OOOOOO 


133370 


CLR 


RO 


'.CALL 


STROLG 


I 1 6K1 INIT LO 


003757 


034440 


OOOOOO 


133370 


CLR 


RO 


%CALL 


STROLG 


I 1 6K i I N I T HI D 


003760 


010550 


007020 


1 23365 


AOD 


»P . LBNO, R10\N 


BAR '.CALL 


STBFLG 


[ 16K1GET 3 STO 


003761 


010550 


00702 1 


133365 


ADO 


»P . LBN 1 , R10\N 


BAR CALL 


STBFLG 


I ISKlGET S STO 


003762 


133544 


000040 


1 12303 


BIS 

. PACE 


OOMBEG, RLL 


%JMP 


U IMEX 


OOWNLINE LOAD 



[E122] 
IE122] 
[E1221 
[E122] 



ECTOR TABLE 
PROGRAM ALREADY EXECUTING 
and DXFC then 
to clr DXFC 
hat it is now 
DOE 

UP XFER PARMS 
D TO (Rl , IUAR) 
BUS AODR PAST HEADER 

EDC incase unb.ro is 
EGAL BC AND ADJUST 

HEADER (NO XFER IF NULL) 
OR XFER FAILURE THEN ERROR 

not zero 
ONSOLE TTY FOR OMOT 
RESS OF DM. SEC 

I T AWA Y 
TATUS LOC-1 
OUST STATUS 
OUST STATUS 
ORE LO OVERLAY ADOR 
ORE HI OVERLAY AODR 
DONE • START OM 8 EXIT 



ot call ed 
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ROUTINE NAMES: 

U.EXLP (EXECUTE LOCAL PROGRAM - NOT LEGAL ON CONTROL L ER ) 

U.DATA (SEND DATA ANO RECEIVE DATA DUP COMMANDS) 

U.SABT (ABORT PROGRAM DUP COMMAND) 

FUNCTIONAL DESCRIPTION: 

THESE ROUTINES PERFORM THE ABOVE MENTIONED DUP COMMANDS. 



BAR = XXOUE (POR U.DATA) 






OUTPUTS : 

NONE 



;MOV 



003763 
003784 
003765 



1 14544 
0337SO 
013440 



0O0O4O 
10001 
000000 



010000 
152420 
103222 



;MOV 
BIT 
MOV\T 
NOP 

;BIC 

. PAGE 



#ST. CMD ,R0 

#XXOUE, BAR 
#DMBEG , RLL 
»ST . CMD.RO 



%JZRO 
%JMP 



.C2EP 
. LNKP 



#<OXFC ! DMBEG> , RLL %JMP U.IMEX 



EXECUTED IN VECTOR TABLE 

EXECUTED IN VECTOR T8L - XXsMR OR MW 

VERIFY THAT A PROGRAM IS EXECUTING 
IF NOT, COMMAND ERROR 

LINK PACKET ON OUEUE AND EXIT 

[ 16KIEXECUTED IN VECTOR TASLE/CMD ALWAYS SUCCEEDS 
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.SBTTL U.PROC BUFFER ALLOCATE, READ, AND WRITE ROUTINES 
+ 09-AUG-S3 U0A5O-A Version 5 MICROCOOE 

ROUTINE NAME: 

U.CSOI (CHECK SOI STATUS) 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE ANALYZES THE SDI STATUS OF THE INTERCONNECT 
ASSOCIATED WITH THE SOI CONTROL BLOCK POINTED TO BY UBAR.THE 
FOLLOWING CHECKS/ACTIONS ARE PERFORMED: 



1 . 



IF THE 'SLAT' FLAG IS SET THEN ENTER THE ATTENT I ON/ L OG ROUTINE. 

IF THE 'RVCT' FLAG IS SET THEN ENTER THE REVECTORING DISPATCHER. 

IF THE 'XCMP' FLAG IS SET THEN ENTER THE TRANSFER COMPLETE ROUTINE. 

IF THE 'BFSV FLAG IS SET THEN ENTER THE BUFFER SERVICE ROUTINE. 

IP THE 'BFRQ' FLAG IS NOT SET THEN RETURN. 

ELSE FALL INTO THE BUFFER ALLOCATION ROUTINE. 



BIT #PKIP , R1 

R1 

UBAR 



SENSE OF PKIP BIT IN SDI STATUS 

SDI CONTROL BLOCK STATUS 

POINTER TO SDI CONTROL BLOCK TO STATUS CHECK 



Q 
< 

D 


003766 


1 1 4541 


O1O040 


102101 U .CSDI : BIT 


#SLAT,R1 


7.JZR0 


U 


SEKO 


003767 


1 1 454 1 


01O2O0 


013233 


BIT 


#RVCT,R1 


7.JNZR0 


U 


LOGS 


II 


003770 


014541 


010200 


004137 


BIT 


#XCMP,R1 


XJNZRO 


U 


RVCT 


s 

O 

LL 


0O3771 


01454 1 


010100 


005230 


BIT 


#BFSV, R1 


•'.JNZRO 


U 


XCMP 


003772 


014541 


1O02O 


014147 


BIT 


#BFRO, R1 


•/.JNZRO 


u 


BFSV 


003773 


000545 


017006 


177777 


ADD\F 


#SD I .UB,UBAR,0,BAR%RZRO 




003774 








ASSUME 


U . ALOC, EO. . 
















. PAGE 










co 




















o 




















co 





















IF PKIP EO O THEN GO 00 SEEK ORDERING 

IF LOG OR ATTENTION TO SeND 

THEN GO PROCESS/IF REVECTORING REQUIRED 

THEN GO DO IT/IF TRANSFER COMPLETE 

THEN GO PROCESS/IF BUFFR SERVICE 

[16K1THEN GO PROCESS/IF BUFFER REQUEST NOT SET 

[U52EC1] THEN RETURN/ELSE BAR=PTR TO U.PROC BCB 

MAKE SURE U.ALOC FOLLOWS 
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ROUTINE NAME: 

U.ALOC (ALLOCATE BUFFER CONTROL BLOCKS) 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE PERFORMS THE BUFFER CONTROL BLOCK ALLOCATION. BUFFER 
CONTROL BLOCKS WILL BE ALLOCATEO FROM THE BUFFER CONTROL BLOCK LIST, 
BUFFER CONTROL BLOCKS ARE FREE IF THEIR LINK POINTER (FIRST WORD) IS 2ER0 
OTHERWISE THEY ARE IN USE. A RING WILL BE FORMED USING UP TO 33 OF THE 
BUFFER CONTROL BLOCKS. 



INPUTS: 

UBAR 



POINTER TO SOI 
POINTER TO SOI 



CONTROL BLOCK 



OUTPUTS : 

UPDATED SDI CONTROL BLOCK 
BUFFER CONTROL BLOCK RING 



AAAAAAA 



L L 

L L 

L L 

L L 

LLLLLLL LLLLLLL 



TTTTTTT 



A A 

A A 

AAAAAAA 

A A 

A A 



003774 
0O3775 
003776 
003776 



003777 
004000 



004001 
004002 
0O40O3 
0040O4 

OO40O5 

OO40OS 
004006 



033703 
033766 



000003 OOOOOO 

010060 042375 



013740 0O72S6 OOOOOO 



MOV (BUF),R3 

MOV\T #<SUSP! BFRO> ,RB %JN2R0 

ASSUME BUF.NL.EO.O 

MOV #TEMP,BAR 



[U52EC1 1 I 16K]R3 = PTR TO U . PROC BUFR CNTRL BLK 
[US2EC1 ] [ 1 6K] IF ALREAOV ALLOCATED THEN CLR BFRO/RE 
MAKE SURE BUF.NL IS ZERO 
set up to init current buf ctl blk pt r ; [ E 1 2 1 ] 



CHECK FOR ZERO BYTE COUNT (SEEK, NO TRANSFER, AND SUCCESS) *«* 



013740 
1 14540 



010545 
014540 
013440 

034440 



1 3374 1 
1 3046 1 



003000 

010377 



135224 
14005 



MOV 

BIT 



00, BUF 
#HI8YT,R0 



•/.CALL 
7.JNZR0 



U .CKTC 
10$ 



CLR BCS PTR, CHECK XFER COUNT ;[E12I] 

(U52EC11IF O THEN 00 COMPLETION PROCESS I NG ; [ E 1 2 1 ] 



SEEK ONLY, MUST WAIT FOR SEEK TO COMPLETE •< 



007000 135573 

000002 10000 

010000 027777 

OOOOOO 1 1 4472 



10200 
10OO1 



164127 
054007 



AOO 
BIT 
NOP 
CLR 



MOV\F 
INC\T 



#SDI .ST, UBAR\N, BAR "/.CALL S.LDRO 
#SEEK,RO 

•/.RNZRO 
RO 7.JMP U.XCMA 



<SECSZ*2> , EO, 5 1 2 
#BIT1S,R1 



7.CZR0 
%TNZRO 



[U52EC1 1RO.S0I STATUS 

[U52ECI1IF SEEK STILL GOING 

[U52EC1 ] THEN RETURN 

(U52EC11 ELSE DONE/GO FINISH COMMAND 



IF XFER CNT < 2**24 

THEN R1 >QU0,RO=REM/ELSE SET BIG OUO 

IF REMAINDER > THEN INCR R1 



t E 1 21 ] 
[E121 1 
(E121 ! 

CE121 1 

(E121 1 
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CALCULATE NUMBER OF SECTORS BEFORE SEEK REOUIREO 

SECTORS UNTIL SEEK : MINISECTORS IN RED, 

[(GROUPS/CYL -CUR. GROUP )*TRKS/GROUP-CUR.TRK]«SECS/TRK] 



004007 
004010 

00401 1 
0040 1 1 
004012 

00401 3 

00401 4 

00401 5 

00401 6 

00401 7 
004020 
004021 
004022 
004023 
0O4O23 
004024 
004025 
0O4O26 
0O4O27 
0O4030 
00403 1 
004032 
004033 
0O4034 
004035 



004036 
0O4O37 
0O4O40 
00404 1 
004042 



010545 
010550 

010545 
131 146 
112141 

033467 

010545 

10550 
131146 
010545 
010550 
132146 

010545 
131147 
112 14 1 
033467 
013740 

01 OS 4 5 
1 12547 
033767 
010550 
O13740 
033441 



033742 
01 3440 
03 1 442 
013702 
030560 



007022 
007030 

007074 
000002 
0OOOO6 
020001 

007065 
007026 
OOOOOO 
007066 
007027 
000007 

007074 
00OO02 
000007 
020001 
007036 
O07014 
00004 1 
02004 1 
007006 
007144 
000007 



135602 
125575 

125606 
OOOOOO 
100O0 

144027 

1 25606 
135573 
010000 
125560 
135606 
OOOOOO 

125560 
O100O0 
OOOOOO 
144027 
1 2S625 
135625 
OOOOOO 
044033 
135574 
1 2561 7 
OIOOOO 



ADD 

ADD 

ASSUME 

ADD 

SUB 

CMP 

MOV\T 

ADD 

ADD 

SUB 

ADD 

ADD 

RSUS 

ASSUME 

ADD 

SUB 

CMP 

MOV\T 

MOV 

ADD 

CMP 

MOV\T 

ADD 

MOV 

MOV 



#SOI . PO, UBAR\N,BAR 7.CALL S.LD10 

#S .SECS, R10\N, BAR 7.CALL S.L0R2 

LBNMSK.EO, L08YT 

#SDI . 12,UBAR\N,BAR %CALL S.LLB6 

R2.R6 

R6,R1 

R1.R7 %JCRY 20$ 

#SDI ,GC,UBAR\N, BAR 7.CALL S.LLB6 

*S .GRUP, R10\N,BAR %CALL S.LDRO 

R0.R8 

OSDI . TG,UBAR\N, BAR 7.CALL MULBYT 

#S .TRAK, R10\N,8AR %CALL S.LLB6 

R7.R6 

LBNMSK, EO, LOBYT 

#SOI . 12, UBAR\N,BAR 7.CALL MULBYT 

R2 ,R7 

R7.R1 

R1.R7 7.TGTE 

#SEX2SK,BAR %CALL 



S .STR7 
STR7 



#SDI .SS.UBARXN, BAR 7.CALL 

#BUFLMT , R7 

#BUFLMT,R7 %TNCRY 

*P . OPCD.RIOVN, BAR 7.CALL S.LDR1 

•OPCODE, BAR 7.CALL S.SLB1 

R7.R1 



R 1 : MS C 

R2 

MAKE SU 

R6 

R6 

compare 

if > = , 

avoid 1 

(V05) R6 
RO=CUR 
RSsGROU 

fVOS] R7 
R 6 : C U R 
R6: (GRP 
MAKE SU 

[V051 R7 
R7=T0TA 
IF R7 G 

THEN 
SAVE » 
SET # S 
I 16K] [U 
[ 16K] (U 
fetch 
and St o 
store 



P PKT PTR 

rt i ng se 
RE MASK I 
N 's/t rack 
N 's left 

aga i nst 
r eq fits 
engt h i er 
=GR0UPS/C 
GROUP 
P/CYL-CUR 

R6*TRKS/ 
TRACK (hi 
/CYL-CUR. 
RE MASK I 

R6*SECS/ 
L SECTORS 
TE SECS/R 
R7 = # SECT 
SECTORS U 
ECTORS 8 
526C1 1 IF 
52EC1 ) 
pcode fro: 
re low by 
1 loc 1 



ct or 

LO BYTE 

in track 
sees in req 
on track - 
comput at i on 
YL 

.GROUP 
GROUP 

byte has SDI op) 
GRP)*TRKS/GRP-CUR. TRK 

LO BYTE 
TRK 

THIS GROUP 
EO 

ORS IN REQUEST 
NTIL SEEK 
4 SEEK/IN REQUEST 
R7 GR/EO BUFFER LIMIT 
HEN R7=BUFFER LIMIT 
m MSCP packet ; 

te in OPCODE ; 

in R1 (was in ALOLMT) 



t El 21 1 

t E 1 2 1 ) 

[E121 1 
[E121 1 
[E121 ] 

[E121 ] 
[E121 I 

[E121 ] 
I E 121 ] 
[E121 1 

IE 1 2 1 1 
1E1211 



[E121 1 



[E121 ] 

[E121 1 
[E121 ] 
[E121 1 



IE121 1 
IE121 1 
; [E121 ] 



SUFFER CONTROL BLOCK ALLOCATION LOOP **« 



000201 135532 

007000 O1OOO0 

000002 OOOOOO 

010003 104062 

017015 054040 



#NBCB+1 , R2 
RO, BAR 



7.CALL 



S . FBC1 



MOV 
MOV 

DEC 

MOV (BUF),R2\N 7.JZR0 U.ALOL 

ADD\T #BUF . LL , RO , 8AR %JNZR0 U.ALOH 

UNUSED BUFFER CONTROL BLOCK FOUND *«* 



[16K1R2=# BUFR CNTRL BLKS/RO=A00R OF IS 
BAR=RO(ADDR OF 1ST BUFR CNTRL BLK) 
[16K1IF LAST BUFFER 

THEN OONE/EXIT 
[16K1IF AVAILABLE I EQ 0) THEN PROCESS 



0O4043 010540 007006 



#BUF . SD, RO\N, BAR %CALL S.STUB i SAVE PARENT SDI CTRL BLK PTR IN SUFFER 



004044 

004045 



004046 
004047 
004050 



0O4O51 
KDBUP 



1374O 
033447 



010S45 
010545 
033746 



007256 
013000 



125572 
014052 



MOV 
MOV 



#TEMP,BAR 
R0.R7.BUF 



7.CALL 
%JNZR0 



S . LDOQ 

10$ 



Q s pointer to previous 8CB 
update BCB ptr, br if not 1st BCB 



FIRST BUFFER CTL BLOCK SPAWNS SOME SPECIAL ACTIONS ««* 



007006 1356 16 

007007 1256 16 
OOOO60 132375 



000007 104053 
KDB50 . MICROCODE . 



AOO 
ADO 
MOV 



MOV 



#SDI . US,UBAR\N,BAR 7.CALL S.STRO 
#SDI . DB,UBAR\N,BAR 7.CALL S.STRO 
#<SUSP!BFRQ> , R6 %CALL U.CLRS 



R7.R0 



20$ 



store as beginning of upper chain 
store as beginning of lower chain 
get the lower going - we can 
build the buffer chain before 
it needs i t . . . 
restore RO (U.CLRS kills it) 



[E121 
[1121 

[E121 
[E121 
[E121 
[E121 
[E121 
[E121 
[E121 
(E121 
(E121 
[6121 
[E121 
IE121 
(E I 2 1 
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OO4052 
004053 
OO40S4 
O04054 
0040S4 
0040S4 
004054 
004055 
004056 
004057 
004060 
004061 



000640 
013740 



01 4547 
033447 
01374O 
031 447 
021341 
030540 



007000 
007144 



O00O06 
010000 
007036 
000007 
003007 
017015 



1 2561 6 
13560t 



010000 
135 101 
125601 
000000 
000000 
014040 



10$ : 
20$ : 



ADO 

MOV 

ASSUME 

ASSUME 

ASSUME 

ASSUME 

BIT 

MOV 

MOV 

DEC 

DECB 

ADD 



#BUF . NL , O.BAR %CAIL S . STRO 

♦ OPCODE, BAR 7.CALL S.LDR7 

OP .WR66 , NE ,0 

OP . ERS86 , NE , O 

OP . RPLS6 , NE , O 

<OP.RDIOP.ACC10P.CMP!0P.0NL>a6.6Q,O 



not 1st BCB - chain to ppav 
get MSCP opcode in R7 



#6,R7 
R0.R7 
#S6X2SK,BAR 



7.C2RO 
'/.CALL 



U . CPRM 
S . LDR7 



R7\0. R1 ,BUF 

#BUF . LL , RO, BAR '.JNZRO 



check for disk-reading opcode 

if SO, calculate buf params now 

Get sectors until seek 

Decrement them 

and restore - also decrement alloc lim 

I16K1IF N60 THEN CONTINUE 



U . ALOH 

END BUFFER CONTROL BLOCK ALLOCATION LOOP •■•• 

MAKE RING AND PRESET U . PROC ANO O.PROC BUFFER POINTERS *«« 

Note that the values of 8UPLMT and NBCB insure we found at least one BCB 



[E121 ] 
[E121 ] 
[ei21 ] 
[E121 ] 
IE121 1 
[E121 1 
161211 
[El 2! 1 
[EI21 1 
[E121 ] 
IE121 ] 
t ; 16121 I 
[E121 ] 
(E121 ] 
[ 61 21 1 
CE1211 
(E121 1 
[E121 1 



o 











U . ALOL : 




004062 


010545 


007006 


135601 




ADD 


O04063 


013740 


007256 


1 35602 




MOV 


004064 


013740 


007036 


125573 




MOV 


004065 


133567 


010200 


144066 




BIS\T 


004066 


010550 


007000 


125602 




ADD 


O04067 


033150 


003007 


OIOOOO 




OR 



#S0 I . UB , UBAR\N , BAR '/.CALL S.L0R7 
VT6MP.BAR '/.CALL S.LD10 

#SEX2SK,BAR %CALL S.LDRO 
#BLAST,R7 %TZRO 

#8UF . NL ,R10\N,BAR %CALL S.LD10 
R7, RIO, BUF 



IEC0#2]R7sPTR TO FIRST BUFFER 

[V05] [ECO#2]R10iPTR TO LAST ASSIGNED BUF 

R0 = # SECTORS UNTIL SEEK 

IF O THEN LAST BUF B-4 SEEK 

R10:LINK WORD 

OR IN PTR TO 1ST BUFFER 



CHECK IF MAPPING ACTIVE ON THIS COMMANO AND IF SO INIT MAPPING STRUCTURES if necessary 



004070 
00407 1 
004072 
004072 
004073 
O04074 
004074 
0O4O74 
004075 

004076 

004077 
OO4100 
004101 
OO4102 



004103 
OO4104 
004105 
004105 
004 105 
004 105 

KDBUP 



01O54S 

010550 



01 3740 
033700 



01 4540 
01 6540 

013440 
010545 
01 3440 
01 3440 
033767 



010S4S 
01374O 



007022 

0070 1 3 



037144 
0O0O03 



00002O 
1001 1 

10000 
0O7 1 15 
010000 

oooooo 

010026 



0O7024 
007144 



135602 
125574 



004 103 
OOOOOO 



10000 
004 103 

1O4103 

125574 
014 103 
125232 
052071 



125630 
125574 



ADD 

ADD 

ASSUME 

MOV 

MOV 

ASSUME 

ASSUME 

BIT 

XOR 

NOP 
ADD 
NOP 
NOP 
MOV\T 



#SDI . PO, UBAR\N , BAR %CALL S.L010 

ftp . BUF 1 , R 1 0\N , BAR %CALL S.LDR1 

MAPVAL , EO, BIT15 

#OPCO0E,BAR 7.JNMSB U.ALOZ 

(BUF) ,R0 

<0P.RPL«0P.ACC«0P.8RS>8 2O.N6,O 

<0P.R0!0P.WR!0P CMP !OP.ONL>8 20,60 

#20, RO 

#0P.0NL,RO\N 7.JNZR0 U.ALOZ 



#MAP . ST , UBARNN 



#ER .MRR, R7 



7.JZR0 
BAR 7.CALL 
7.JNZR0 
'/.CALL 
%JNZRO 



U ALOZ 
S . LDR1 
U . ALOZ 
U .MINT 
U .UERR 



[OOAIRIO'MSCP PACKET PTR 

(00A1GET HI ORDER FIRST LONGWORD BUF DESC;IE121] 



[E121 1 
IE121 1 
IE121 1 
[E121 I 
16121 ] 



[OOA] 

[00A1IF NO MSB THEN NO MAPPING 

[chlllGET THE OPCODE 

IchltlMAKE SURE CHECK WILL WORK 



(Ch11]SEE IF ACC, ERS, OR RPL 

[ChMJSEE IF ONLINE/BVPASS MAP TEST 
ACC, ERS, OR RPL 

[chilli* ONLINE, BYPASS MAP CHECK TOO 
[QDA1SEE IF MAPPING INIT NEEDED 
[0DA1IF INIT OONE, CONTINUE WITHOUT CALLING INIT 

[OOAIINIT MAPPING VARS AND READ IN PTE'S 

(0DA1IF NOT ZERO THEN ERROR IN BUS ACCESS [rae4- 



IF 



CHECK FOR WRITE OR ERASE FDR IMMMEDIATE BUFFER FILL *«* 



5 .CLRB 
. LDR1 



ADD #SDI . OE,UBAR\N,BAR XCALL 

MOV #OPCODE,BAR %CALL ! 

ASSUME 0P.WR86,NE.O 

ASSUME OP . 5RS86.NE.O 

ASSUME OP . RPL86,NE,0 

ASSUME <0P . RDIOP.ACCIOP. CMP! 0P.0NL>86,eO. 



[U52EC11ZAP OVERLAP ENABLE FLAG 
R1 ■ MSCP opcode 



[E121 ] 
IE121 ] 
[E121 1 
[E1211 
IE1211 
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004105 
004106 



014541 
03S54I 



0O00O6 
010041 



010000 
054147 
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#6, R1 

#0P .RD.R1 



check for disk-writing opcode 
if write/erase/replace, start 
else R1 s o if opcode is READ 



MUST BE READ OR ACCESS OR COMPARE COMMAND **» 

OVERLAP IS ONLV POSSIBLE ON SIMPLE READS TO SINGLE-UNIT DEVICES *** 



004107 


133740 


010340 


004 1 17 




MOV 


004 1 10 


010S45 


007043 


135 603 




ADD 


004 1 1 1 


033740 


O10O01 


014117 




MOV 


004 1 12 


010545 


007060 


125603 




ADO 


004 1 13 


010545 


017022 


014117 




ADD 


004 1 14 


033706 


000003 


OOOOOO 




MOV 


004 1 1 5 


1 0546 


007007 


I2SS73 




AOD 


004 1 16 


010545 


017024 


125631 




ADO 


0041 17 


01 3740 


007036 


125573 


10$ : 


MOV 


OO4120 


010545 


007014 


1056 16 




ADO 


00412 1 


033701 


000003 


010000 


CKWROM- 


MOV 


004122 


010545 


017022 


044 124 




AOO\F 



#<DRV U2 IDRV U3>0RV.U4> , RO 7.JNZR0 10$ 

#SDI . UN, UBAR\N,BAR XCALL S.BITO 

#UF.CMR,RO "/.JNZRO 10$ 

#SDI .UF, UBAR\N, BAR '/.CALL S.BITO 

#SOI . PO, UBAR\N, BAR 7.JNZR0 10$ 

(BUF) , R6 

ftp . MOO , R6\N , BAR '/.CALL S.LDRO 

#SDI . OE , UBAR\N, BAR 7.CZR0 INIT1 

#SEX2SK,BAR XCALL S.LDRO 

#SDI . SS ,UBAR\N,BAR 7.JMP S.STRO 



Overlap on reads only 
No overlap if multi-unit driv 
No overlap if auto-compare 



; (E121 ] 
f i 1 1 ing Buf s; IE121 1 
16 12 1 1 
IE121 ] 
IE1211 
IE1211 
IE1211 
(E121 I 
IE121 I 
[6121 j 
(E121 ] 
[6121 1 
[6121 ] 
(6121 ] 



(BUF) , R1 ; 

*SOI.PO,UBAR\N, BAR "/.JNZRO CKWREA; 



[US2EC11GET 0PC0D6 MODIFIER 

[US26C11IF 50 O TH5N OK TO OVERLAP THIS CMD ; [ E 1 2 1 ] 
[Q0A]RO=# SECTORS UNTIL SEEK ; E 6 1 2 1 1 

[16K1ST0RE REDUCED SECTORS UNTIL S66K/R5TURN ; [ E 1 2 

; [E121 ! 

(U526C1 1R1 :SDI . OM (PTR TO 0VERLAPP6D CMD) 
[U52EC11IF OM NEO O THEN CONTINUE 



ROUTINE TO CHECK FOR WRITE, ERASE, OR REPLACE COMMANO *** 

SETS "OPCODE" TO MSCP OPCODE FROM P.0PCDIR1O) AS A SIDE EFFECT **» 



004123 


033701 


000003 


010000 


CKWRER: 


MOV 


0O4124 


030541 


007006 


125574 


CKWREA : 


AOD 


004125 


013740 


007144 


125617 




MOV 


004 126 










ASSUME 


004126 










ASSUME 


004126 










ASSUME 


004126 










ASSUME 


004126 


014S41 


000006 


137777 




BIT 



'/.CALL 

"/.CALL 



S . LDR1 
S SLB1 



RIsPKT PTR 
R1:0P CODE 
SAVE LO BVTE OF OP CODE 



004127 


105541 


000375 


10000 


DI VS 12 : 


SIC 


#177000 


R1 ,0 






OO4130 


134541 


00O376 


OOOOOO 






ANO 


#177000 


R1 






004131 


073141 


OOOOOO 


134136 






BIS\L 


R0,R1 




'/.CALL 


U . L1R1 


004132 


073441 


00000 1 


124136 






MOV\L 


R1 ,R1 




'/.CALL 


U . L1R1 


004133 


073441 


000001 


124136 






MOV\L 


R1 ,R1 




"/.CALL 


U . L 1R1 


004134 


073441 


000001 


OOOOOO 






MOV\L 


R1 ,R1 








004135 


033240 


OOOOOO 


137777 






MOV 


O.RO 




'/.RET 




004136 


073441 


000001 


127777 


U 


L 1R1 : 


MOV\L 

. PAGE 


R1 , R1 




7.RET 





(BUF) ,R1 

#P . OPCD, R1 , 8AR 

#OPCODE,BAR 

OP WR36. NE.O 

OP. ERSS6, NE.O 

OP RPLaS , NE, O 

<OP.R0IOP.ACC!OP. CMP !OP.ONL>S6,EO,0 

#S,R1 %RET ; Return if not write/erase/replace 

Divide 32-bit # in RO ( h i ) , R1(lo) by 512 - Quo in R1, rem in RO . O is scratch 

has remainder 
isolate To quotient 
combine quo 8 start shifting 
rotate R1 left 7 places 

;Put rem in RO and exit with RO CC's 



[E121 
[E121 
[E121 
(6121 
(6121 
[E121 
[EI21 
[6121 
[E121 
[E121 
(6 121 
[6121 
(5121 
[6121 
[E121 
[6121 
[6121 
[5121 



o 
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FUNCTIONAL DESCRIPTION: 

IF REVECTORING IS IN PROGRESS ON THIS SOI ANO AN UPPER PROCESSOR ACTION IS 
REQUIRED, DISPATCH TO THAT ACTION ROUTINE 



004137 
004 140 
004141 
004142 
004143 
004 144 
004145 
004 146 



013740 
013740 
016505 
013740 
033701 
037761 
013740 
120341 



007254 
047232 
000003 
017250 
OO0OO3 
01 3052 
007250 
002001 



13S574 
127777 
000000 
027777 
010000 
154 1 45 
000000 
O 10000 



U8AR 
OUTPUTS : 



MOV 

MOV 

XOR 

MOV 

MOV 

COM\T 

MOV 

INCB 

. PAGE 



POINTER TO SDI CONTROL BLOCK 



#RVCFLG,BAR %CALL S.LDR1 

#RVCSDI,BAR 7.RNLSB 

(BUF) , UBAR\N 

#RVECUP.BAR 7.RN2R0 

(BUF) , R1 

#< - V . URVC- 1 >S377, R1 , 8UF %TZRO 

#RVECUP, BAR 

R1\0 , R1 , PAR 



(UQAIR1 :OISPATCH VECTOR 

IF NOT U . PROC TURN THEN RETURN 

[US2EC23IF THIS SDI NOT ACTIVE 

[UOA] THEN RETURN 

[UOA] ELSE R1:U.PR0C VECTOR 

[UQAJIF EO O THEN INIT VECTOR 

IU0A1BARJRVECUP 

OTHERWISE OISPATCH TO ROUTINE S INC VECTOR 
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U.PROC WRITE AND ERASE ROUTINE 



004147 
004 ISO 
00415 1 
004152 
004153 
004154 

004 155 

004 156 

004 157 
004 1 60 



c 



013740 
0137 40 
010545 
033766 
013440 
O10547 
010545 
1 14540 
1 14540 
033746 



003040 
0O7OO6 
010100 
OOOOOO 
007000 
007025 
010100 
0102O0 
000040 
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.SBTTL U.PROC WRITE AND ERASE ROUTINE 



ROUTINE NAME: 
U . BFSV 



BUFFER SERVICE) 



FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL FILL EMPTY SUFFERS FROM THE HOST (WRITE], EMPTY FULL 
BUFFERS TO THE HOST (READ), COMPARE BUFFERS WITH HOST DATA (COMPARE], ZERO 
EMPTY BUFFERS (ERASE). OR PERFORM EDC ANO ECC CHECKS ON BUFFERS (ACCESS] AT 
THE REQUEST OF THE DRIVE PROCESSOR. 



INPUTS : 



UBAR 



POINTER TO SOI CONTROL SLOCK 



OUTPUTS: 

UPDATED I/O PARAMETERS 

EMPTY SECTOR SUFFERS (READ) 

FULL SECTOR BUFFERS ( WR I TE /ERASE ) 

COMPAREO SECTOR BUFFERS (COMPARE) 

EDC, ECC CHECKS (ACCESS! 



007236 OOOOOO U.8FSV: MOV 



10000 

13S601 
142375 
131622 
125573 
134 121 
1 14327 
104165 

1 12375 



MOV 

AOO 

MOV\T 

NOP 

ADD 

ADD 

SIT 

BIT 

MOV 



#BTCNT, BAR 
#SPURT, BUF 

#SOI . UB.UBARVN, BAR %CALL S.LDR7 
#BFSV,R6 %JZRO U.CLRS 

%CALL U.HTMO 
#BUF . NL , R7\N, BAR "/.CALL S.LDRO 
#SDI . OM, UBAR\N, BAR %CALL CKWROM 
#BFULL,RO 5SJZR0 U.BMTY 

#SLAST,RO 7.JZR0 U.BFLA 

#SUSP,R6 %JMP U.CLRS 



transfer 5 sectors before 
returning to idle loop for polling 

[U52EC1 ]BAR=PTR TO SPURT CNTR 

IU52EC11SET UP SPURT CNTR 

[U52EC1 ]R7=BUFFER UPROC SUSPENDED ON 

[U52EC11IF R7=0 THEN CLEAR BFSV/RETU 

(U52EC1 1RESET HOST TIMEOUT 

! 16KIR0=BUFFER STATUS 

[U52EC11IF NOT WRITE/ERASE OP CODE 

M6K] THEN MUST BE COMPARE , ACCESS 

fast check - br if buf needs filling 

otherwise clear suspend a return 



(E121 
(E121 
[E121 
(E121 
IE121 
(E121 



R READ ; (EI21 1 

IE121 1 

IE121 ] 



W RRRRRR 



W 

w 
w 

W W RRRRRR 



TTTTTTT EEEEEEE 
T E 
T E 



EEEEEEE 











; * * * 


FILL 


SECTOR BUFFERS WITH HOST 


DATA IWRI 










. * * * 


SEE 


IF U.PROC DONE WITH THIS REQUEST ««« 


004 1 6 1 


010547 


0O70OO 


125573 


U .BFIL : 


ADO 


#BUP . NL ,R7\N,BAR '/.CALL 


S . LDRO 


004 1 62 


1 1 4540 


00O1OO 


OOOOOO 




BIT 


#BFULL , RO 




004 1 63 


1 14540 


1 0200 


104165 




BIT 


OBLAST.RO 7.JZR0 


U . BFLA 


0041 64 


033746 


OO004O 


1 12375 




MOV 


0SUSP.R6 %JMP 


U .CLRS 


KD8UP 




KDBSO. MICROCODE 


, 22-APR 


■ 1986 


11:16:48.97 





(WRITE COMMAND) «»» 



I 16K]R0:BUFFER STATUS 

(16K1TEST IF BUFFER FULL 

116K1IF BUFFER EMPTY THEN CONTINUE 

[16K1 ELSE CLEAR SUSPEND AND RETURN 
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004 I 65 
004 1 66 



004167 
004 1T0 



004171 

004172 
004 173 
004174 



00417S 
004176 
004177 
004200 
0O4201 
004202 
004203 
004204 
004204 



010545 

033740 



013740 
013440 



010545 
105544 
101640 
013440 



025544 
033703 
031464 
130444 
010547 
013440 
010547 



017014 
10002 



007236 
O43O01 



025574 
104471 



134636 
004337 



007000 125603 

010300 114175 

000201 000000 

O30OO0 127777 



007001 
040O03 
O 10004 
O00OO4 
OO7O02 
O03003 
0O70O1 



000000 

144175 
044201 
127777 
000000 
125101 
135576 



033746 040040 022375 



133743 000001 



004206 016542 010042 154241 



0O4207 
004210 

0O421 1 
0O4212 
004213 
0O4214 
004215 
0042 1 6 



004217 
004220 
0O4221 



033442 
033741 

053440 
010547 
033700 
05554O 
05344O 
033442 



033443 
133741 
037463 



010005 
000105 

OOOOOO 
01701 1 
000003 
000377 
10000 
10005 



10421 1 
104217 

135635 
004247 
OOOOOO 
134503 
035636 
014247 



000001 125175 
000O2O 124320 
010003 054222 



3PLA: ADD #SD I . SS , U8AR\N , BAR %CNZRO S.LDR1. 
MOV #SEEK,RO %JZRO U.BLST 



[ 1 6K] (US2EC1 ] IF NOT LAST THEN CONTINUE 
[16KIIF LAST SUFFER THEN DONE ;IE121] 



CHECK IF SPURT COUNT HAS EXPIRED AND IF SO, GO IDLE *»* 



MOV 

MOV 



#BTCNT,BAR 
R1 , BUF 



7.CALL 
%JLSB 



U . LRR1 
U .BDSM 



IU52EC1 1SHIFT SPURT CNTR 
[U52EC1IIF LSB THEN DISMISS 



CHECK IF SEEK STILL IN PROGRESS, IF SO THEN LIMIT FETCHAHEAO 



ADO #SDI .ST, UBAR\N, BAR "/.CALL S.BITO 

BIC #DMOOEIPLOCK, RLL.O %JZRO 10$ 

SUB #BUFPS2- <NBUFR«2>+ 1 6 . , 
NOP 7.RMSB 



(16K1IF SEEK NOT IN PROGRESS 
I 16K] THEN CONTINUE 
otherwise don't allow the last 
eight free buffers to be scarfed 
(eight is arbitrary - one is enough 
to prevent deadlock) 



OBTAIN BUFFER TO FILL I 1 6K ] «*« 

Bug fix • old routine U.ALBF could return with screwy cond codes if buffer found 



BIC 

MOVVF 

OEC\T 

INC 

ADO 

MOV 

AOO 

ASSUME 

MOV 



7.JNLSB 
%JNZRO 
■/.RET 



#1 , RLL\0 , BAR 

(BUF) ,R3 

RLL, RLL 

RLL.RLL 

#BUF .BP, R7\N, BAR 

R3.BUF XCALL 

#BUF .ST,R7\N,BAR "/.CALL 

BGRUP.EO.BITOO 

#SUSP,R6 7.CLSB 



1 OS 
20$ 



U .CPRM 
S . L0R3 



i f buf f er lock c 1r 

then wait 

if buffer then deer R11 to alloc a unl 

else incr R11 to unlock 8 return 

BAR s ptr to bufr addr 

go calculate params 

see if new group selected 

if so, get a jump on things 

by unsuspending the lower now 



; IE121 1 
; [E121 ] 
; [6121 1 
; [E121 1 
1 [E121 ] 

; IE121 ] 

; [E121] 
; (E121 ] 
; IE121 1 
; IE121 1 
; [E121 ] 
; [E121 ] 

. [E121 ] 

ock; [ E12 1 
i IE121 1 

; IE121 1 
; IE12U 
; [ E 1 2 1 1 
; [EI21 1 
; [E121 ] 



o 



ENTERED FROM REVECTORING TO REFILL BUFFER USED FOR RCT READS «*« 

MOV #SECSZ,R3 SCALL U . BSET ; [16K1SET R3 IN CASE REPLACE/GO SET UP I/O PARAMETE 

DETERMINE IF WRITE, ERASE, OR REPLACE COMMAND *** 



XOR\F #0P.WR,R2\N 



MOV 
MOV 

ROT\R 

ADO 

MOV 

BIC\R 

MOV\R 

MOV 



UBAR, R2 
#EDSEED.R1 



%JZRO 
SJMP 



U .UNRD 
U .BFLF 



RO 7.CALL UNB.RO 

#BUF .GP, R7\N, BAR 7.JNZR0 U.UNER 
(BUF) ,R0 

#L0BYT,RO %CALL U . CPGC 

RO.RO %CN2R0 UN . SRC 

USAR.R2 %JNZRO U.UNER 



[mjt071 I 16K] Iqda] IF WRITE COMMAND [ r ae9 • C 1 1 9 ] 
handle invalid pt e (from U.PTEL) if necy;[G121] 
[16K] THEN GO FILL BUFFER 
116K] ELSE DO ERASE/REPLACE COMMAND 

[ODAlGO READ RO WORDS FROM BUS/00 SEG REA0;[E121) 
(0DA1D0 READ OF FIRST SEGMENT : [ E 1 2 1 ] 

(ODA)ERROR IF NOT ZERO : [ E 1 2 1 ] 

[BDA1GET GROUP FOR SEG 2 ;[E12t) 

CHECK PAGE XING, SET UP SEG 2 ADR ; [ E 1 2 1 ] 
READ NEXT SEG IF WE NEED TO ;(E121] 

(US2EC31 [ 1 6K1 IF NEO O THEN ERROR 



BUFFER FULL, CHECK IF EDC FULLY CAL CULATEO , STORE IN BUFFER «*« 
NOTE - FOR ERASE AND REPLACE COMMANDS U.CKEB ZEROES ENTIRE BUFFER 
AND CALCULATES EDC, BECAUSE UBAR = POINTER TO START OF BUFFER *** 

[tGKIFINISH EDC CALC IF NEEDED 
[16KICHECK FOR FORCE ERROR MODIFIER 
THEN 1'S COMPLEMENT EOC 



u 


BFLF : 


MOV 


R1 , R3 


'/.CALL 


U .CKEO 






MOV 


#MD . ERR.R1 


%CALL 


U . TMOA 






COM\T 


R3, R3 


%TNZRO 
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PAGE 231 



0O4222 
004223 
004224 
004224 



004225 
004226 
004227 
004230 
004231 



Ol 3440 
013440 



010545 
010547 
050144 
033700 
133540 



007002 
OO3003 



007014 
1 7000 
000004 
O20OO3 
003300 



OOOOOO 
124323 



035560 043001 047015 



125614 
014234 
OIOOOO 
044227 
OIOOOO 



CHECK IF CALLED FROM REVECTORING »•• 

•/.CALL U.RVCK 



MOV 
MOV 
ASSUME 
BICXT 



R2, BAR 

R3.BUF 

RVWRIT.EO.BITOO 

#RVWRIT,RO,BUF XJLSB U.RV3B 



[16K]BAR:PTR TO EDC WORO 

[16K1ST0RE EDC IN BUFFER 

MAKE SURE RVWRIT IS LSB 

[US2EC21IF REVECTOR CALL THEN RETURN 



DECREMENT NUMBER OF SECTORS BEFORE SEEK »*» 



ADD #SDI .SS,UBAR\N,SAR %CALL S.OECB 

ADD #BUF.NL ,R7\N, BAR %JN2R0 U.BFLH 

ADD\R RLL.RLL 

MOV\F (BUF).RO '/.JNCRY 10$ 

BIS #<BFULL+SLAST> , RO, BUF 



GET AND DECREMENT SECOTRS TIL SEEK ;[E121) 
IF NOT ZERO THEN CONTINUE ; I E 1 2 1 1 

Attempt to lock out D proc ;IE121] 

loop until success / RO = buffer St at us ; ( E 1 2 1 ] 
INDICATE LAST BUFFER BEFORE SEEK 



CLEAR SUSPEND AND BUFFER SERVICE REQUEST AND RETURN 



004232 
0O4233 



004234 
004235 
004236 
004237 
004240 



010545 
033746 



OS0144 
033707 

1 13547 
010545 
1 15547 



OO7000 
0001 40 



OO0OO4 
020003 
0O3 100 
007006 
0O3200 



135573 
102376 



OIOOOO 
044234 
134232 
OOOOOO 
104161 



ADD 

MOV 



#SDI .ST.UBARYN.BAR "/.CALL S.LDRO 
#<SUSP+BFSV> ,R6 %JMP U.CLSX 



ROsSDI STATUS (MUTEXED) 

RESET SUSPEND AND BUFFER SERVICE / 



UPDATE PARAMETERS, CHECK FOR NEXT BUFFER EMPTY *•« 



ADD\R 

MOV\F 

BIS 

AOO 

BIC 

. PAGE 



RLL.RLL 

(BUF1.R7 %JNCRY U.BFLH 

#BFULL ,R7\N, BUF '/.CALL U.BFLX 
ffSDI .UB,UBAR\N, BAR 
#BLAST,R7\N,BUF XJMP U.BFIL 



Attempt to lock out proc ;[E121] 

loop until success / R7 a buf link ;[E121] 
GO LOCK OUT O.PROC/SET SDI STATUS ;[E121] 
BARsPTR TO U.PROC BUFFER INDEX ,16121] 

[16K1SAVE CURRENT PTR/GO TRY TO FILL NEXT BUFFER 



L 
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PAGE 232 



c 



EEEEEEE 


RRRRRR 


RRRRRR 




ooooc 




RRRRRR 


E 


R R 


R R 










R 


E 


R R 


R R 







a 


R 


EEEEEE 


RRRRRR 


RRRRRR 







a 


RRRRRR 


6 


R R 


R R 







a 


R R 


E 


R R 


R R 







a 


R R 


EEEEEEE 


R R 


R R 




3OOO0 




R 



FATAL UNIBUS TRANSFER ERROR - UPF SET IF TIMEOUT/NOT SET IF PARITY *** 



00424 1 
004242 
O04243 
004244 
00424S 



03374S 
01 3440 
010545 
01 4540 
03144S 



0002S3 
10000 
007000 
000010 
010006 



I3S474 
I 14248 
135S73 
OlOOOO 
014242 



004246 033746 000001 114255 



004247 
004250 

004251 



037143 
010S47 
033746 



000003 
007006 
O0OO0 1 



125633 
135577 
134324 



U. UNED 
1$: 



U .UNEE : 
U . UNER : 



( It 
MOV 
NOP 
ADO 
BIT 
DEC 

MOV 

XNOR 

ADO 
MOV 



waits up to 310 usees for drive responses to come back) [mjtoa] 



#179., R6 '/.CALL UNLOCK 

V.JZRO U.UNEE 
#SD I . ST , UBAR\N , BAR 7.CALL S.LDRO 
#VECT, RO 
R6.R6 XJNZRO 1$ 



#FM. BAD, R6 



7.JMP 



R3.R3 '/.CALL 

#BUF .SO, R7XN.BAR 7.CALL 
#FM.BA0.R6 7.CALL 



U.UNEA 

UNB . RS 
S. LDUB 
U .OERP 



004252 031443 000003 000000 U.UNEC: DEC 



004253 
004254 



004255 
004256 
004257 
004260 

O04261 
004262 
004263 
O04264 
004265 
004266 
O04267 
004270 
004271 
O04272 
004272 



004273 
004274 



033743 
033763 



01 0545 
133740 
033742 
01 5540 

01 4540 
133542 
01 3740 
01 6505 
013760 
010545 
033540 
035140 
013440 



010151 
06001 1 



007003 
000240 
000100 
003020 

O0OO2 1 
010200 
007232 
00OOO3 
13000 
007000 
000244 
003002 
000000 



044252 
054255 



125622 
124625 
134323 
125473 

000000 
054266 
010000 

oooooo 

1 44266 
135573 
10000 
135474 
134577 



MOV\F 
MOV\T 



#<ST .HST + SC . N0M>,R3 7.JNZR0 U.UNEC 
#<ST.HST>,R3 %TNUPF ; 



tmjt07] make sure everything is unlock to avoid 

Emjtos] if timed out, exit 

[mjt07l get the current status 

[mjt07] hang around until VECT is cleared 

[mjt07] too avoid the drive 

Imjt07] getting a fault (90 for 60's. a7 for 81's 

[mjt07] make sure rS has correct errorlog code 

[US2EC31RESET NPR/CLEAR UNIBUS 

[U52EC31REST0RE UBAR 

[U52EC31 IUS2EC1 ]R6»BUS ADDR ERROR LOG CODE 

[U52EC3IG0 DO ERROR CLEANUP IN CASE OVERLAP 

[US2EC310ECR CNTR-GIVE TIME FOR D.PROC TO 

[U52EC31FINISH SEEK COMMAND 

; [U52EC11L00P ON R3/R3=MSCP STATUS 

[mjt07] [U52ECI ] IF NOT UPF. THEN SET NO SUBCODE 



FATAL DISK DATA ERROR - RS HAS ERROR LOG CODE, R3 HAS STATUS «** 



000550 007016 133213 



ADD #SDI .SW.UBARXN, BAR %CALL S . STR3 

MOV #<RVCT !SLAT> ,R0 V.CALL U.WTST 

MOV #BFSV,R2 %CALL U . RVCK 

BIC #RVACTV,RO\N,BUF "/.CALL P. LOCK 

BIT #<RVWRIT!RVACTV> , RO 

BIS\F #RVCT,R2 %JNZRO U . UNEB 

MOV #RVCSDI,BAR 

XOR (BUF ] ,UBAR\N 

MOV\T #0, BUF '/.TZRO 

ADO #S01 .ST.UBARNN. BAR 7.CALL S.LDRO 

BIS #<XCMP+OERR+SUSP> , RO 

BIC R2.R0.BUF V.CALL UNLOCK 

NOP 7.CALL U.GLBN 

ASSUME S . LBNH ,EO,S . LBNL+1 

ADO *S . LBNL , RIO, Q.BAR V.CALL STR1R2 



SAVE FATAL ERROR CODE 

GO WAIT FOR D.PROC TO BLOCK 

IU52EC1 IROsSOl . ES 

[U52EC21L0CK OUT D.PROC TO PREVENT RVCT RACE 

[U52EC21ZAP RVACTV 

(U52EC21IF REVECTOR WRITE OR ACTIVE 

CU52EC2] [US2EC1 ] THEN CONTINUE 

(U52EC21BAR>PTR TO ACTIVE REVECTORING SDI CONTROL 

(U52EC2IIF REVECT SDI SAME AS THIS ONE 

IU52EC2] THEN MUST 2AP RVCSDI TOO 

[U52EC2]RO=SDI STATUS 

[U52EC11SET ERROR, TRANSFER COMPLETE 

[US2EC1 ICLEAR SITS IN R2/UNL0CK D.PROC 

[U52EC1 1 [EC0#1 JGET LBN IN R1 R2 

MAKE SURE SEQUENTIAL 

[EC0#1]ST0RE LBN IN S.LBNL/H 



CHECK FOR ERROR LOG TO SEND AND IF ENABLED SET SLAT *** 
R3 HAS STATUS, R6 HAS ERROR LOG CODE ■*•■» 



016543 

016S43 



000010 
010007 



OOOOOO 
137777 



XOR 
XOR 



#<ST.DAT(SC.FER>,R3\N 
#ST. CMP, R3\N 7.RZR0 



[U52EC1MF FORCED ERROR 

[U52EC1] THEN DONE/IF NOT COMPARE ERROR 
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004275 
004276 
004277 
004300 
O04301 
004302 
004303 
004304 
004305 
004306 
004307 
004310 
O0431 1 

00431 1 
004312 

00431 2 
004313 
004314 
004315 
00431 6 
0043 16 
0043 17 



004320 
004321 
004322 



033740 
010550 
033740 
01 3740 
013440 
013440 
014540 
1 14540 
133564 
133S40 
01O545 
010545 



010020 
007005 
O10O20 
007 170 
010000 
OOOOOO 
000200 
010040 
010200 
003040 
007003 
007010 



004300 

125573 
137777 
1 35603 
114314 
125476 
OlOOOO 
004306 
054314 
135474 
125622 
135624 



000547 007004 123211 



000545 
013440 
010545 
013440 

035560 
013440 



010545 
010550 
014501 



007031 
OOOOOO 
007017 
OOOOOO 

043001 
OOOOOO 



007022 
007007 
000003 



12321 3 
114315 
125630 
124323 

047 14 4 
127777 



135602 
OOOOOO 
127777 



U .CLGB 
U . CLGC 



U . TMDA: 
U . TMOO: 



MOV 

ADD 

MOV 

MOV 

NOP 

NOP 

BIT 

BIT 

BIS\T 

BIS 

ADD 

ADO 

ASSUME 

ADD 

ASSUME 

ADD 

NOP 

ADD 

NOP 

ASSUME 

BIC\T 

NOP 



#CF .T 
#P .RS 
#CF . T 
#CNTF 



HS,RO 
03, R1 
HS, RO 

LG , BA 



7.JNZR0 

0\N,BAR 7.CALL 

7.RZR0 

7.CALL 

7.JZR0 

".CALL 



#XCMP 

#SLAT 

#PLOC 

#SLAT 

#SOI 

#SDI 

BUF . H 

#BUF 

SDI . 

#SDI 



,R0 
,R0 

K , R L L 
, RO, B 
SW, UB 
IT, UB 
H.EO, 
HH, R7 
H.EO 
RL , U 



#SDI E1 , UB 



RVWR 
#RVWR 



T.EO 
IT, RO 



7. J 

7. J 

UF 7.C 
AR\N , BAR 
AR\N,BAR 
BUF .HL+1 
O.BAR % 
SDI .RL-M 
AR, O.BAR 

7. J 
ARXN.BAR 

7.C 
BITOO 
BUF 7. J 

%R 



NZRO 
NZRO 
ALL 

7.CA 
7.CA 



U . CLGA 
S . LORO 

S . BITO 
U . CLGB 
U . GMST 

U.CLGD 

U .CLGB 

UNLOCK 

LL S.STR3 

STR6 



CALL LDR2R1 



7.CA 
MP 

7.CA 
ALL 

LSB 
ET 



LL STR1R2 
U . C L G C 

LL S.CLRB 
U . RVCK 

U . RVFA 



RO = C 

IF C 



TH 
EL 
[U52 
[U52 
[ECO 
[U52 
[U52 
[U52 
MAKE 
GET 
[ODA 
[ODA 
CONT 
ZAP 
RELE 
MAKE 
IF F 
EL 



EN CONTINUE 

OMPARE MOOIFIER RETRY WORD 

OMPARE THEN RETURN INO LOGS) 

OGS NOT ENABLED 

EN CONTINUE 

SE SET SDI SW/RO:MUTEXE0 SDI STATUS 

EC11IF TRANSFER DONE 

EC 11 THEN USE THIS LOG/ELSE IF LOG QUEUED 

4 17-Feb-1984] THEN FREE D.PROC/OROP LOG 

EC11ELSE SET SLAT/FREE D.PROC 

EC11SAVE STATUS COOE 

EC11SAVE ERROR LOG CODE 

SURE SEOUENTIAL 
BUF. HH/BUF . HL IN R2/R1 
{MAKE SURE SEOUENTIAL 
1SAVE LBN IN SDI RL/SOI.RH 
INUE 

ERROR RECOVRY WORD 
ASE O.PROC/CHK FOR REVECTOR CALL 

SURE RVWRIT IS LSS 
ROM REVECTORING THEN JUMP BACK 
SE RETURN 



ROUTINE TO TEST MSCP MODIFIER IN R1. RIO -> MSCP PKT *»« 



004323 010545 007026 115573 U.RVCK: 



ADD #SOI .PQ, UBAR\N, BAR 7.CALL S.LD10 

ADD #P.MOD, R10XN.BAR 

BIT (BUF).RI %RET 

CHECK IF CALL FROM REVECTORING *** 

ADD #SOI .ES.UBARXN, BAR 7.JMP S.LDRO 

REAO FATAL ERROR CLEANUP ROUTINE «»» 



O04324 010545 007025 125575 U.DERP: ADD 



#SDI .OM.UBARNN, BAR 7.CALL S.LDR2 



004325 
004326 



013740 
033450 



013000 
000002 



137777 
1 1 3230 



MOV 
MOV 



#0, BUF 
R2, R10 



7.RZR0 
7.JMP 



R10=MSCP PKT POINTER 

BARsPTR TO MSCP MODIFIERS 

TEST 1BUF0 WITH BIT IN R1/RETURN 



RO:SD! EXTENDED STATUS 



[U52EC1 !R2sP0SSIBLE OVERLAPPED CMO 
clear overlap indicator and 
[U52EC3/EC1 ] IF NONE THEN RETURN/elSe 
[U52EC3/EC1 ]LINK TO HEAD OF QUEUE/RTN 



[E121 ] 
1E121 ] 
[E121 1 



REPLACE COMMAND BUFFER FILL ROUTINE - R3 HAS I* WORDS *•> 



ADD 



ADD 
ASSUME 

ADD 
DEC 
ADD 
BIS 

MOV 



#BUF SD, R7\N,8AR 7.CALL S.LDR1 



#SDI .PQ.R1 \N, BAR 7.CALL 

P . RBN1 ,E0. P . RBNO+1 

#P . RBN1 , R1 ,Q, BAR 7.CALL 

UBAR , 

R3. UBAR 

ORBNCOD , R2 

MOV\F #EDSEED,R1 

UBAR.R2 7.JMP 



RETRIEVE SDI CTL 8LK PTR FOR A MINUTE 



ADD 

#2, R3 



#1 , Q, BAR 



%JNZRO 
U.BFLF 



7.CALL 

U . BFLS 



SO WE CAN GET MSCP PACKET PTR 

MAKE SURE SEQUENTIAL 

ANO FETCH THE REPLACEMENT RBN 

Q=START OF DATA BUFFER- 1 

[ 1 6K1UBAR:PTR TO EDC WORD 

SET RBN HEADER TYPE IN HI ORDER 
U.BFLT ; I16KMF NOT OONE THEN CONTINUE 
; [ 1 6K]*»N0TE*« EDC OF ANY REPEATING PATTERN 
; WITH PERIOD 2»*N, N<8. IS START SEEO 
STR1R2 ; [16K1INCR O/SET BAR/GO STORE R1 ANO R2 
i [16K1RE0UCE BYTE COUNT ANO LOOP 
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. PAGE 
.SBTTL 



U.PROC REAO , COMPARE, ACCESS ROUTINE 



RRRRRR 
R R 



EEEEEEE 



EEEEEEE 



A A 
A A 
AAAAAAA 
A A 
A A 
A A 



DODDDD 
D 

D 

D 
DDODDD 



EMPTY SECTOR SUFFERS AND SEND TO HOST (READ COMMAND) •** 
CHECK IF D.PROC HAS FILLED THIS BUFFER *** 



004327 


016541 


010O1 1 


137777 


U .BMTV : 


XOR 


004330 


013440 


OIOOOO 


103583 




NOP 


0O4331 


010S47 


O07OOO 


12S57B 


U . BMTX : 


ADD 


004332 


010545 


007024 


1 2S574 




ADD 


004333 


114543 


030100 


1 14S37 




BIT 



#0P.0NL,R1\N 



7.R2RO 
7.JZR0 



I1SK1IF BUFFER EMPTY THEN RETURN 
I16K1IF ONLINE THEN SPECIAL CODE 



004334 


133740 


010026 


127777 


U . BMTW: 


MOV 


004335 


013740 


007236 


134636 




MOV 


004336 


013440 


043001 


104341 




MOV 


004337 


013440 


OOOOOO 


125476 


U . BDSM: 


NOP 


004340 


033748 


000100 


1 13107 




MOV 


004341 


033540 


0OO04O 


10000 


U . BMTZ: 


BIS 


004342 


010547 


OO700 1 


125603 




ADD 


004343 


033700 


010003 


1 04403 




MOV 


004344 


135540 


0O302O 


OOOOOO 




SIC 


00434S 


010545 


0O7O47 


OOOOOO 




ADO 


004346 


1 1 4540 


00OO04 


OOOOOO 




BIT 


004347 


0O3760 


01 3 ISO 


054382 




MOV\T 


0O43SO 


1 1 4540 


00OOO2 


OOOOOO 




BIT 


004351 


003760 


013213 


044362 




MOV\T 


004352 


014540 


00OO4O 


OIOOOO 




BIT 


004353 


OO3760 


0131 lO 


044362 




MOV\T 


004354 


13374 1 


000002 


124320 




MOV 


004355 


013460 


010600 


1 86450 




NOP\T 


004356 


010545 


017047 


154373 




ADO\F 


004357 


003740 


O0335O 


OIOOOO 




MOV 


OO4360 


010547 


O07001 


135573 




ADO 


004381 


133540 


003040 


OOOOOO 




BIS 


004362 


133741 


00000 1 


124320 


U . BMTK: 


MOV 



*BUF . NL,R7\N,BAR "/.CALL S.LDR3 
#SOI . OE.UBARVN, BAR "/.CALL S.LDR1 
#BFULL,R3 7.JMSB U.OVLP 



CHeCK IF ECC CORRECTION NEEDED *»» 

#<BECC+BLRWR+BDSNF> , RO 7.RZR0 



[E12I 1 
IE121 1 
IE121 1 



[ 1 6K] [U52EC1 ]R3=BUFFER STATUS 

[U52EC1 ]R1 ^OVERLAP ENABLE FLAG 

I 1 6KHUS2EC1 ] IF OVERLAP THEN DO IT/ELSE CHK IF BFR 



#BTCNT, BAR 
R1 , BUF 



'/.CALL 
7.JNLSB 
'/.CALL 
7.JMP 



#BFSV,R6 

#BRCTS, RO 

#BUF .ST, R7NN.BAR 7.CALL 

(BUF).RO 7.JZR0 

#BECC,RO, BUF 



U. LRR1 
U . BMTZ 
U . GMST 
U . STSX 

S. BITO 
U. BMTC 



#S0I .2T, UBAR\N, BAR 

#B0SNF , RO 

#<ST .DAT+SC. DSY> ,0, BUF %JNZRO 

#BLRWR, RO 

#<ST . DRV+SC . RWR> , 

OBRCTS, RO 

#<ST . DAT+SC . HOR> , 

#M0 .SEC.R1 

IPRUPF 7.CZR0 
#SOI . 2T,UBAR\N, BAR %JZR0 U . BMTA 
#<ST.DAT!SC.ECO.O,BUF 
#BUF -ST,R7\N,BAR MALL S.LORO 
#BECER,RO,BUF 
#M0.SER,R1 %CALL U . TMDA 



READ ECC ERROR RECOVERY PROCESSING *** 



, BUF 7.JNZR0 



,BUF %JNZRO U 
7.CALL U.TMDA 



ECCC 



[ 1 6K] IF 

[U52EC1 

[U52EC1 

[U52EC1 

[U52ECI 

[EERREC 

[ 1 6K ] CH 

( VOS ] IF 

! V05 ]CL 

( VOS ]A 

(EERREC 

(EERREC 

BMTK ; (E 

; (EERREC 

BMTK ; IE 

) (EERREC 

BMTK ; IE 

ELSE 

ELSE 

(EERREC 

(EERREC 

[mjtOSa] 

[mjt09a] 

GO CHEC 



NOT FULL 
]G0 SHIFT 

] IF NOT L 
1GET MUTE 
]SET BUFF 
[CHECK FO 
ECK FOR E 
NO ECC E 
EAR BECC 
BUFFER FO 
(SET UP B 
JOIO DATA 
ERREC] IF 
]DID LOSS 
ERREC1 IF 
] WAS RCT 
ERREC] IF 
CHK FOR S 
CALL ECC 
] IF EO 
]ELSE SET 
fetch sta 
i ndicate 
K IF RECO 



THEN 

SPUR 
SB TH 
XED S 
ER SE 
R RCT 
CC ER 
RROR 
IN CA 
R HOS 
UF FO 

SYNC 
SO, 

READ 

SO, 

SEAR 

SO S 
UPRES 
ROUTI 
THEN 

ERRO 

tus 

that 
VERY 



RETURN 
T CNTR 
EN CONTINUE 
01 STATUS 
RVICE/EXIT 
S ALSO 
ROR 

THEN CONTINUE 
SE COMPARE CANNOT OBTAIN 

DATA AND MUST RE-ENTER LATE 

ERROR COOE 
NOT FOUNO? 
ET UP PROPER ERROR CODE AND E|(IT 
/WRITE READY 0CCUR7 

SET UP PROPER ERROR CODE AND £XIT 
CHED7 
ET UP ERROR COOE AND EXIT 

ERROR CORRECTION 
NE/0>RUPF TO DO CORRECTION 
CORRECTED 



a Fatal ecc error occurred 
SUPPRESSED 



004363 
004364 
004365 



01 4440 
013440 
010545 



OIOOOO 134731 
OIOOOO 027777 
007047 12SS72 



CLR 
NOP 
ADD 



,RO\N %CZRO U.RREC 

7.RNZR0 
#SDI ,2T, UBAR\N, BAR JSCALL S.LDOO 



IF NO SUPPRESS THEN DO READ RECOVERY 
IF SUCCESSFUL THEN RETURN 
[EERREC] STORE ERROR INTO SW 
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004366 010545 

004387 010547 

004370 I 14540 

004371 013440 



007OO3 135613 

007001 135573 

000040 OOOOOO 

OIOOOO 1 1 4431 



ADD 


#SOI .SW,U 


ADO 


#BUF.ST, R 


SIT 


VBECER, RO 


NOP 





FATAL ECC ERROR, 



; ; [ 

; ; [ 



m jt 09a] 
m jt 09a] 



ADD 
BIS 



BAR\N,BAR 7.CALL S.STOO 
7\N , BAR %CALL S . LDRO 

7.JZR0 U.BMTE 

BUT NEED BEST GUESS DATA 

%JMP U.BMTC ; 

»BUF ST,R7\N, BAR 7.CALL S 
•8ECER.RO, BUF 7.JMP U 



[EERREC] 
[mjtoSa] fetch buffer status 
[mjt09a] (EERREC] WAS IT AN ECC ERROR? 

[EERREC] IF NOT, BRANCH 

. R7 -> BUFFER »•» 

[m jt09a ] i nd i cat e ecc go transfer best guest data 

LDRO ; ( 1 6K]R0:BUF . BP (FLAG FOR FATAL ERRORS) 
BMTC ; INDICATE FATAL ECC GO TRANSFER SECTOR 



ECC CORRECTED 



HOORAY FOR MIKE, CHECK FOR THRESHOLD VIOLATION OR LOGS »** 



004373 
004374 
004375 
004376 
0O4377 
004400 
004401 
004402 



010545 
1 3454 1 
013740 
112141 
033441 
003740 
030541 
010S4S 



004403 003445 



004404 
004405 
004408 

004407 
004410 
0044 1 1 
004412 
004413 
004414 



004415 
004416 
004417 
004420 
004421 



004422 
004423 
004424 
004425 
004426 

KDBUP 



01 6S42 
018542 
033741 

053440 
010547 
0337O0 
055540 
053460 
013440 



133740 
033462 
010547 
010545 
Ol 3440 



033443 
016503 
017503 
033740 

003740 



00703S 
000377 
007134 
OOOOOO 
02O00O 
000013 
000350 
007047 



010040 
010020 
010105 

OOOOOO 
01 701 1 
000003 
000377 
010000 
010O00 



125574 
125504 
125573 
010000 
014403 
13S501 
OIOOOO 
135620 



154246 
114667 
104415 

126242 
004247 
OOOOOO 
134503 
076243 
014247 



ADD 

AND 

MOV 

RSUB 

MOV 

MOV 

ADD 

ADD 



#SOI .ECU 
#HIBYT,R1 
#ECOUNT, B 
RO,R1\N 
RO, R1 
#1 1 . ,0 
#<ST . DAT* 
#SOI .2T 



BAR\N,BAR 7.CALL S.LDR1 

%CALL S.SWB1 
AR %CALL S.LDRO 



%JNCRV U.BMTC 
%CALL S.RRR1 

SC .ECO , R1 

BAR\N,BAR 7.CALL S.STR1 



I/O OK - CALCULATE I/O PARAMETERS *«* 



CHECK FOR COMPARE COMMAND »*« 



R1:SDI ECC THRESHOLD 

ISOLATE ECC THRESHOLD/SWAP BYTES 

R0=# OF SYMBOLS IN ERROR 

IF LT THRESHOLD 

[EC0#2] THEN CONTINUE 

ADJUST # SYMBOLS LEFT 5 BITS 

[EC0#2]R1 sCOMPOSITE STATUS 

[EC0#2]SAVE STATUS IN SDI.2T 



GO SET 1ST PARAMETERS 

return O if error fetching PTE 



; [E121 ] 



XOR\F 

XOR 

MOV 

ROT\R 

ADD 

MOV 

BICVR 

MOVNRT 

NOP 



#0P . CMP, R2\N 
OOP . ACC, R2\N 
#EOSEED, R1 



7.JZR0 
7.JZR0 
7.JZR0 



U.UNEE 
UNB .CM 
U.BMTD 

RO 7.CALL UNB.WR 

#BUF .GP,R7\N,BAR V.JN2R0 U.UNER 
(BUF) , RO 

#L0BYT,RO XCALL U.CPGC 

RO.RO HCNZRO UN.BWC 

%JNZRO U.UNER 



[mjt07] [V051IF COMPARE COMMAND I r ae9 - c 1 1 9 ] 
[VOS] IF ACCESS COMMAND 

THEN SKIP UNIBUS WRT/ELSE MUST BE COMPARE 



[ODAIGO WRITE THE BUS/00 SEGMENT WRITE 
I0DA1D0 WRITE OF FIRST SEGMENT 
(OOAIERROR IF NOT ZERO 
(BOA) GET NEXT SEGMENT'S GROUP 



IE121 ] 
IE121 ] 
IE121 ] 

IE121 ] 



CHECK PG XING, LOAD SEG2 AODR IF NEEDED ;[ E 1 2 1 1 



WRITE NEXT SEG IF NECESSARY 



1US2EC3] (U52EC1 ] IF ERROR THEN GO PROCESS 



; IE121 ] 



UNIBUS I/O OK, SECTOR BUFFER SENT TO HOST, CHECK IF EDC FULLY CALCULATED 



000040 124624 

010005 144422 

007006 135577 

007047 135573 

OOOOOO 1 14570 



0004O1 
000003 
10003 
010010 
0001 12 



135 175 
OOOOOO 
104431 
104573 
104512 



MOV #BECER,RO 7.CALL U.TBEC 

MOVNT UBAR.R2 XJZRO 1$ 

ADD #BUF.SD,R7\N,BAR %CALL S.LDUB 

ADD #SOI . 2T.UBAR\N,BAR 7.CAIL S.LDRO 
NOP %JMP U.DERF 



MOV R1.R3 USUPF 7.CALL U.CKED 

XOR (BUF),R3VN 

XNOR (BUF),R3\N XJZRO U.BMTE 

MOV #<ST . DAT+SC . FER> , RO %JZRO U . DERO 

MOV #<ST . CNT+SC .100,4 %JMP U . BMTR 



IF BECER SET IN BUF.BP 
[mjt09a] I16K] THEN FATAL ECC ERROR 
[m jt09a ] r eset ubar for error 
I m jt 09a 3 get error code 
[mjt09a]go save error code 

[mjt09a]set up temp ubar for u.cked 
[16K1FINISH EDC IF NEEDED 
[V0S1IF BUFFER EDC EO CALCULATED EDC 

THEN CONTINUE/IF EO 1'S COMPLEMENT EDC; [El 

; THEN HARD FORCED ERROR ;[E121 

ELSE DO ERROR RECOVERY ;[E121 



21 ] 

] 
] 
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COMPARE SECTOR 8UFFER MATCHES - CHECK FOR FORCED ERROR EOC *** 



d 



004427 
004430 



004431 
004432 
004433 



004434 
00443S 

004436 
004437 
004440 
00444 1 
O04442 
004443 
004444 



01O54T 
033740 



010547 
010545 
013740 



010547 

1 14640 
014S40 
013440 
010545 
033746 
133546 
033443 
013740 



007006 
0300 10 



007002 
007047 
01 3O00 



007001 
000006 
010060 
010000 
007017 
000002 
000200 
000000 
007236 



135577 
1 14573 



125514 
135573 
1 14445 



125572 
010000 
044570 
014570 
125630 
134577 
124604 
124273 
135632 



UNB.CX: ADO 
MOV 



#BUF .SD, R7\N, BAR '/.CALL S.LOUB ; I EC0#2 ] RESTORE UBAR 

#<ST .OAT+SC. FER> , RO 7.JMSB U DEID [6C0#2]IF FORCED ERROR THEN PROCESS 



CHECK IF BAD BLOCK ERROR LOG NEEDED ON THIS SECTOR «»* 



ADO 
ADO 
MOV 



#BUF .BP, R7\N, BAR XCALL S 
#SOI .2T, UBAR\N,BAR 7.CALL 



. RELF 
S . LORO 



I16KIRELEASE DATA BUFFER 

[EC0#2]R0=MSCP STATUS 

[ECM21IF NEO O THEN GO SET UP LOG 



MARK BLOCK BAD, SEND LOG, ETC. RO HAS MSCP STATUS •*« 

BUT ONLY IF NUMBER OF ECC SYMBOLS IN ERROR EXCEEDED THRESHOLD 



ADD #BUF .ST, R7\N, BAR '/.CALL S.LDOO 

BIT #<BDSNF I BLRWR>,0 

BIT\F #<BRCTS ! BRARS> ,0 7.JNZR0 U.OERF 

NOP 7.JNZR0 U.OERF 

ADD #S0I .El ,UBAR\N, BAR 7.CALL S.CLRB 

MOV #FM.DSK,R6 7.CALL U.GLBN 

BIS #LF. SUC.R6 5CALL U.SLBN 

MOV R0.R3 7.CAIL U.CLOG 

MOV #BTCNT,BAR 7.CALL INITM1 



[EERR 
[EERR 
[injtOS 
[mjtOS 
c lear 
E ECO# 
{U52E 
[U52E 
Set s 
this 
the I 
the U 
log p 
recov 
next 



ECIO=S 
ECIWAS 
] [EER 
1 [EER 
error 
2] [ECO 
C2] [EC 
C1 1 [EC 
purt c 
forces 
DLE lo 
. LOGS 
acket , 
ery St 
buf far 



TATUS 

ERROR EITHER DATA SYNC NOT FOUND OR LO 
REC1IF SO, EXIT/WAS RCT SEARCHED? 
REC1IF SO, EXIT 

recovery state ;[E121] 

#1]G0 GET LBN IN R1,R2 

0#2HEC0#1 1THEN GO REPORT BAD BLOCK 
0#2!REST0RE STATUS TO R3/G0 CHK FOR LOG 



aunt er to - 1 

the 6MTY loop to be exited 
op to be passed thru, and 
to be called to send the 

before the SDI.E1 error 
atus can be reused if the 

also requires recovery. 



[6121 ] 
[E121 ] 
[6121 ] 
[EI21 1 
[E121 1 
[E121 1 
[E121 ] 



O04445 

004446 
004447 



004447 
004450 

O0445 1 



010547 
010547 



1 14541 
1 14541 
I3S542 



00700 1 
007000 



125574 
125575 



; *** 
U . 8MTF : 



CHECK FOR LAST BUFFER IN REQUEST OR LAST BEFORE SEEK REOUIREO •«'». 



ADD #BUF .ST.R7AN, BAR %CALL 
AOD #BUF ,NL , R7\N, BAR 7.CALL 
ASSUME BLAST, EO, BIT 15 



. LDR1 
. LDR2 



[16K1R1=READ RECOVERY FLAGS 
R2:CURRENT STATUS/NEXT LINK 
MAKE SURE BLAST IS MSB 



IF BLAST SET THEN CHECK FOR I/O RETRY ».«■» 



030200 014460 
010100 1 14471 
013200 054471 



BIT #BRTRY,R1 
BIT #BLSTB,R1 
BIC\F #BLAST , R2, BUF 



7.JNMSB U.BMTI 
7.JZR0 U.BLST 
7.JNZR0 U.BLST 



IF NOT LAST THEN CONTINUE 

[U52EC11IF NOT RETRY THEN DONE 

[U526C11IF RETRY AND NOT REALLY LAST THEN ZAP BLAS 




( B L RWR i 



We distinguish this case by the following features: 

1) We have just finished a recovery - BRTRY is set but not BLSTB 

2) S0I.U8 : SOI. OB so the lower is hung on this buffer 



[E121 ] 
[E121 ] 
[E121 ] 
[E121 ] 
[EI21 ] 
[El 21 ] 
[E121 ] 
[E12I ] 
[E121 J 
[E121 ] 
[E121 1 
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004452 
004453 
004454 
004455 
004456 
004457 



010542 
010545 
006507 
105640 
1 14550 
1 15562 



007000 
007007 
000003 
O003O0 
010100 
013300 



125602 
010000 
000000 
10000 
004460 
1 54450 



3! 



AOD 
ADD 
XOR 
BIC 
BIT 



BFULL is clear in the successor to SDI.OB, so this is not 
a case where the lower ran completely around the ring on 
an ECC error correction attempt. 



*BUF .NL ,R2\N,BAR 7.CALL S.L01O 

*S0I .OB, UBARVN, BAR 

(BUF) ,R7,0 

»BLAST1BFULL ,0 

0BFULL.R1O 7.JNZR0 U.BMTI 

#<BLAST!BFULL>,R2\N, BUF 7.TZR0 



RIO = link word of Successor 

get SOI .08 

compare with SDI.UB 

remove extraneous bits 

If equal, see if successor is full 

If so, this must be the case - fix 



UPDATE PARAMETERS, CLEAR D.PROC FLAGS, CHECK FOR LAST BUFFER »»* 



[E121 1 
[EI21 I 
[E121 ] 
[E121 ] 
[6121 ! 
[6121 ] 
[6121 ] 
16121 I 
[6121 ] 
[6125] 
[61211 



004460 


010545 


00701 4 


135573 


U 


BMTI : 


ADD 


#SDI .SS, UBARVN, 


BAR '.CALL S.LDR 


004461 


031440 


010000 


154465 






D6C\F 


RO.RO 




•LJ2R0 


U 


BMTJ 


004462 


013440 


003000 


oooooo 






MOV 


RO.BUF 










O04463 


133562 


O10200 


144464 






BIS\T 


•BLAST, R2 




7.TZR0 






004464 


135542 


000100 


135101 






BIC 


OBFULL, R2 




7.CALL 


U 


CPRM 


O04465 


01OS47 


007000 


135473 


U 


BMTJ: 


ADD 


#BUF .NL , R7\N 


, BAR '.CALL 


P 


LOCK 


004466 


033447 


003002 


124232 






MOV 


R2.R7, BUF 




7.CALL 


u 


BFLX 


004467 


010545 


007006 


OOOOOO 






ADO 


#SOI . UB , UBARVN, 


BAR 






004470 


1 1SS47 


003200 


1 1433 1 






BIC 


#BLAST, R7\N, 


BUF 


7. J MP 


u 


BMTX 



ROsSECTORS UNTIL SEEK/END 

IF NEO O THEN DECR/ELSE CONTINUE 

RESET SECTORS UNTIL SEEK 

IF NOW O THEN SET BLAST 

[16KIG0 CALCULATE PARAMETERS 

[16K]BAR:PTR TO NEXT LINK/LOCK OUT O.PROC 

RESET R7/G0 CLR SUSP S BUFFER SERVICE 

BAR=PTR TO U.PROC BUFFER INDEX 

[16K1SAVE CURRENT PTR/GO TRV TO DUMP NEXT BUFFER 



LAST BUFFER READ/WRITTEN - FINISH UP REQUEST *«» 



O04471 


033746 


000062 


135224 


U . BLST : 


MOV 


O04472 


033766 


010240 


144473 


U. XCMA: 


MOVVT 


004473 


010545 


007025 


125602 




ADO 


004474 


033766 


010240 


063230 




MOV\T 


004475 


013440 


OOOOOO 


12 5 4 7 6 




NOP 


O04476 


014540 


000O22 


OOOOOO 




BIT 


O04477 


035566 


10022 


044500 




BIC\T 


004500 


035540 


OOO10O 


123103 




BIC 


004501 


014546 


000002 


124655 




BIT 


004502 


013440 


OOOOOO 


1 15505 




NOP 



#<SUSP!BFRO!SEEK> , R6 7.CALL U.CKTC 
#<SUSP!XCMP> ,R6 %TZRO 
#S0I .OM, UBARVN, BAR '/.CALL S.LD10 
#<SUSPI XCMP> ,R6 %CNZRO U.LNKH 
%CALL U.GMST 
#<BFR01SEEK> , RO 
#<BFRO!SEEK> ,R6 %TNZRO 
#8FSV,R0 
*SEEK,R6 



XCALL 
XCALL 
SJMP 



U . SETX 
U . CROS 
S . RELC 



; [U526C11IF TRANSF6R COUNT 60 O 
[U526C11 THEN R2aXCMP AND SUSPEND 
[U526C 1 ] RIOsPOSSIBLE OVERLAPPED CMD 
(U52EC11IF EXISTS THEN LINK TO HEAD OF 
[US2EC11GET MUTBXEO SOI STATUS IN RO 
[U52EC11IF OVERLAPPED FRAGMENT SE6K 
[U525C1] THEN DON'T RESET SEEK 
[U52EC11G0 SET BITS/RETURN 
[U52EC11G0 UPDATE GROUP 
[ 1 6K] IU52EC1 1RELEASE ALL BUFR CNTRL BL 



Routine to load seg2 address and byte ct 

Inputs: wd ct in R0< 1 4 : 7> ( BOA ) or R0<14: 

R7 -> buf ct 1 blk, R1 = EOC 

Outputs: R0<8:0> = byte ct, ( I UAR , SAVUAR )= addr , R t preserved. R3 scratch 



if Seg2 wd ct is non-zero 
:6> CODA), cond codes reflect RO 



O04503 


053440 


10000 


127777 


U . CPGC: 


MOV\R 


RO, RO 




7.RZR0 




004504 


033443 


00000 1 


125223 




MOV 


R1 , R3 




7.CALL 


U . R1R0 


004505 


010547 


007013 


125600 




ADD 


#BUF .U1 


R7VN 


BAR 7.CALL 


S . LDIU 


004506 


010547 


00701 4 


135536 




ADD 


#BUF ,U2 


R7\N 


BAR 7.CALL 


S .SXB1 


004507 


033441 


000003 


125223 




MOV 


R3.R1 




7.CALL 


U.R1R0 


004510 


053440 


OOOOOO 


010000 




MOVVR 


RO.RO 








0045 1 1 


053440 


OOOOOO 


105223 




MOV\R 
. PAGE 


RO, RO 




•4JMP 


OHIO 



shift wd ct right, exit if 

save EDC tamporari ly 

I UAR a low address 

R1 i SAVUAR = hi addr 

restore eOC to R1, Shift RO 

[ BDA ] Keep sh i f t i ng 

finish shift, exi t 



KS 


; [E121 1 


; [ E121 ] 


; [E1221 


i I E 1 2 1 1 


, [El 21 ! 


: [E121 1 


; [E121 ] 


: [E 1 22 ] 


. IE121 ] 


: [6121 1 


; [5121 1 


: 16121 ] 


: [6 1 2 1 ] 


; [6121 ) 
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; IE121 ] 
; IE121 ] 



EEEEEEE 
E 

E 
EEEEEE 



EEEEEEE 



RRRRRR 
R R 
R R 
RRRRRR 
R R 



00000 

a o 
a o 
a o 



RRRRRR 
R R 
R R 
RRRRRR 

R R 
R R 



00007 1 






ALGERR : : 


0045 12 


O0374O 


00007 1 


10000 


MOV 


004513 


137740 


000374 


010000 


MOV 


004514 


1 13S40 


OO7O70 


125574 10$ 


BIS 


004515 


1 13541 


007074 


000000 


BIS 


00451 6 


01 6500 


000003 


000000 


XOR 


004517 


03 1 440 


10O00 


O10O27 


DEC 


004520 


013440 


OIOOOO 


004514 


NOP 


004521 


1 13740 


007070 


135574 


MOV 


004522 


1 13541 


007074 


125574 


BIS 


0O4523 


1 3754 1 


000374 


010000 


XOR 


004524 


013440 


1 oooo 


010027 


NOP 


004S25 


010545 


007022 


1 35502 


ADO 


O04526 


010545 


007024 


125630 


ADD 


004527 


010545 


007024 


125630 


ADD 



EDC ERROR RECOVERY *** 



Check the LOC and ANTILOG RAMS to verify they have good contents. 

Bad contents can produce EDC errors on ECC correction. 

I f bad contents found, halt i mmodiate 1 y - something is seriously wrong* 

error code to report 

in case of error, set value 
initialize x s 1023. 
R1 :AL0G(RO) 

BAR ppints to LOG ( AL OG ( R 1 ) ) 
i f x not = LOG(ALOG(x) ) 
then fatal error/else update x 
1 oop unt i 1 x:0 
then test special case 

1777 = LOG ! ALOG [ O ) ) 

IU52EC1 IRIOsPKT PTR 

1U52EC1 {DISABLE OVERLAP SEEK 

[US2EC1 1ELIMINATE D.PROC WINDOW 

CHECK FOR SEEK IN PROGRESS AND WAIT UNTIL DONE *** 



#ALGERR,TSTCNT 






1777.RO 






#ALGA0R,RO\N,BAR '/.CALL 


S . LDR1 


#LGADR, Rl \N,BA( 






(BUP) , RO\N 






RO 


%JNZRO 


ERRB1 Z 




SJN2R0 


10S 


0ALGADR, BAR 


•/.CALL 


S . L0R1 


#LGADR, Rl \N , BAF 


'/.CALL 


S . LDR1 


#1777, Rl 








SJNZRO 


ERRB1 2 


#SDI . PO, UBAR\N, 


BAR 7.CALL 


S . L01O 


#SDI .OE.UBAR\N, 


BAR SCALL 


S . CLRB 


•SOI .OE,UBAR\N, 


BAR '/.CALL 


S . CLRB 



IE121 
[E121 
[E121 
[E121 
[E121 
[E121 
[E121 
[E121 
[E121 
[E121 
[E121 
IE 12 1 
[E121 
[E121 
[E121 
IE121 
[E121 
IE121 
I E 1 2 1 
IE121 



004530 


010545 


O07OO0 


125574 


U . BMTT : 


ADD 


004531 


Ol 454 1 


000002 


OOOOOO 




BIT 


004532 


014S41 


010020 


1 14535 




BIT 


004533 


01054S 


0O7O20 


125575 




ADD 


004534 


014S4 1 


030020 


014530 




BIT 


004535 


010545 


017003 


1 14542 


U.BMTU : 


ADD 



#S0I .ST,UBAR\N, BAR SCALL S.LDR1 
#SEEK, Rl 

*BFRQ,R1 %J2R0 U.BMTU 

#SDI . EO,UBAR\N, BAR SCALL S.LDR2 



#BFRQ, Rl 

#SDI . SW, UBAR\N. 



SJNMS8 U.BMTT 
3AR '/.JZRO U.BMTV 



OVERLAPPED SEEK EDC ERROR RECOVERY »»• 



004536 
004537 



004540 
004541 



013740 
013440 



010550 
133541 



003000 
OOOOOO 



007007 
003040 



12SS0S 
134324 



12S574 
103131 



MOV 
NOP 



ADD 
SIS 



".CALL 
SCALL 



#P . MOD, R10\N , BAR SCALL 
»MD . N0V.R1 ,BUF '/.JMP 



S . RELC 
U. DERP 



S . LDR1 
U . IOPJ 



[U52EC1 1R1 = SDI STATUS 

[US2EC1 ] IF SEEK SET 

[UB2EC1] THEN CHK BFRO 

[U52EC1 ]R2=S0I ERROR RECOV WORO 

[U52EC11IF NO RECOV THEN LOOP 

IUS2EC11IF NOT OVERLAPPED FRAGMENT THEN CONTINUE 



(US2EC1 IRELEASE ALL BUFFERS, ETC 

U.DERP will clear the overlap flag and ;[E121] 

if overlaping in progress queue the ; [ E 1 2 1 I 

correct packet to the head of the list ;[E121] 

[U52EC1IGET MODIFIER FIELD 

[U52EC11SET NO OVERLAP MODIFIER/RESTART COMMANC 
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004542 


013440 


OOOOOO 


134731 


U 


BMTV : 


NOP 


004S43 


Ol 3440 


O10O0O 


002O1 4 






NOP 


004544 


033740 


OOO 1 1 2 


1 1 4573 






MOV 



2901 ASSEMBLER VERSION 32 



NON-OVERLARPED EDC ERROR RECOVERY ■««* 



SCALL U.RREC 
SJNZRO U.VAXP 
#<ST CNT ISC . EDO , RO 7.JMP U . OERD 



PAGE 239 



[U52EC11G0 DO READ RECOVERY 
[U52EC11IF OK THEN CHK FOR VAX PURGE 
[U52ECI] ELSE FATAL EOC ERROR 



COMPARE COMMAND ERROR RECOVERY ANALYSIS **> 

IROsNON-EXISTENT MEMORY ERROR CODE 
IIP NOT UPF THEN PARITY ERROR 
1REST0RE UBAR 

11REST0RE RIO (PKT PTR) [raelll 
ilGINAL OP CODE [rael 1 I 

O THEN MUST BE COMPARE COMMAND [raelll 
IJRESTORE RIO (PKT PTR) 
IlGINAL OP CODE 

O THEN MUST BE COMPARE COMMAND 
(]EC0#2]ELSE RIsCMP OP CODE 6 FLAGS 
ND TIME THRU 

[16KIIEC0#2] THEN F I N ISHEO /ELSE ISOLATE 
»2]0R IN ORIG OP CODE 
EC1 1SAVE STATUS IN R3 
\n FOR BITS TO BE SET 
IRELEASE ALL BUFR CNTRL BLKS 
EC2] ( 16K1SET R2 TO DISK ERROR LOG 
SC21G0 CHK FOR ERROR LOG 

ORIG OPERATION 

FATAL DATA ERROR, JUST GAVE BEST GUESS, R7 -> BUFFER, SDI.SW HAS ERROR STATUS **« 



004545 


033740 


000151 


010000 U.BMTO: MOV 


#<ST HSTISC.NOM> , RO 






[ V05 1 


004546 


033760 


06021 1 


054547 


MOV\T 


#<ST . HSTISC.PAR> , RO STNUPF 




[V051 


004547 


010547 


007006 


135577 


ADD 


#BUF.SD,R7\N,BAR "'.CALL 


S 


LDUB 


I V051 


004550 


010545 


007022 


135602 


ADD 


#SOI . PO,UBAR\N, BAR '/.CALL S 


. LD10 


[Ch04 


004S5 1 


010550 


007005 


135600 


ADO 


#P . RS03,R10\N, BAR SCALL 


S 


LDR6 


R6«0R 


004552 


136546 


013001 


154247 


XOR\F 


#BI T08 , R6 , BUF SJZRO 


u 


UNER 


IF EO 


004553 


010545 


007022 


135602 U.BMTS: ADD 


#SDI . PQ,UBAR\N,BAR SCALL 5 


. LD10 


[Ch04 


004554 


010550 


007005 


135600 


AOD 


#P . RS03,R10\N, BAR '/.CALL 


s 


LDR6 


R6 = 0R 


004555 


136546 


013001 


154573 


XOR\F 


#6IT03.R6, BUF SJZRO 


U 


DERD 


IF EO 


004556 


OIOSSO 


007006 


13S574 


ADD 


#P . 0PCD,R10\N,BAR 7.CALL 


s 


LDR1 


I [ 16K 


004557 


1 14546 


00000 1 


OOOOOO 


BIT 


#BIT08,R6 






IF 2N 


004SSO 


13454 1 


010340 


104S73 


AND 


#<EF.BBRIEF.BBUIEF.LOG> 


R 


7.JZR0 


U.DERD 


004561 


033141 


003006 


OOOOOO 


OR 


R6,R1 , BUF 






[ECO# 


004562 


033443 


OOOOOO 


01 OOOO 


MOV 


R0.R3 






[U52E 


004563 


133740 


000240 


124625 


MOV 


#<RVCTISLAT> , RO SCALL 


U 


WTST 


GO WA 


004564 


013440 


OOOOOO 


125505 


NOP 


SCALL 


s 


RELC 


[ 16K] 


004565 


033746 


000002 


OOOOOO 


MOV 


#FM. DSK.R6 






[US2E 


004566 


133546 


OOO 100 


134273 


BIS 


#LF.C0N,R6 SCALL 


u 


CLOG 


[US2E 


004567 


013440 


OOOOOO 


113131 


NOP 


SJMP 


u 


IOPJ 


RETRY 



MiCP FLAG 



004570 


010545 


007003 


135616 


U.OERF 


00457 1 


010547 


007006 


135577 


U DERC 


004572 


01054S 


007003 


135573 





ADD #SDI SW,UBAR\N, BAR SCALL S.STRO 
ADD #BUF SO, R7\N. BAR '/.CALL S.LDUB 
ADD #SDI ,SW,UBAR\N, BAR '/.CALL S.LDRO 



Im jt 06 1 I EERREC 1 must store error status from u . bmt c 
RESTORE UBAR 
RO:ERR0R STATUS 



FATAL DATA TRANSFER ERROR - RO HAS MSCP STATUS, 



R7 



> BUFFER **» 



004573 


013440 


OOOOOO 


134324 


U .OERO: 


NOP 






%CALL 


U 


DERP 


004574 


013440 


OOOOOO 


134577 


U .DERE: 


NOP 






SCALL 


u 


GLBN 


004575 


033746 


000002 


124604 




MOV 


#FM. OSK 


RE 


SCALL 


u 


SLBN 


004576 


033443 


OOOOOO 


104255 




MOV 
.PAGE 


RO, R3 




SJMP 


u 


UNEA 



(U52EC11G0 00 ERROR CLEANUP 
[ U52EC1 1 1 16K] [EC0#1 1GET LBN IN R1.R2 
[U52EC11G0 SET FLAGS/SET BAD LBN, ETC. 
[U52EC11G0 CHECK FOR LOGS ENABLED AND FINISH UP 



'L> 
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RRRRRR 


OOOOO 


u 


R R 










u 


R R 










u 


RRRRRR 










u 


R R 










u 


R R 










u 



U TTTTTTT 

U T 
U T 
U T 
U T 



N 


EEEEEEE 


N 


E 


N 


E 


N 


EEEEE 


N N 


E 


NN 


E 


N 


EEEEEEE 



004S77 


010545 


0O7022 


13S602 


U. GLBN: 


ADO 


004600 










ASSUME 


004600 


0OO547 


007004 


12321 1 




ADO 


004601 


1 I4S42 


000360 


000000 




BIT 


004602 










ASSUME 


004602 


000545 


01 7032 


03321 1 


U . GLBX: 


ADD 


004603 


135542 


0OO360 


127777 




BIC 



SUBROUTINE TO GET LBN IN R1.R2 



#SDI .PO,UBAR\N,BAR %CALL S.L010 

BUF .HH.EO. BUF . HL-H 

#BUF .HH,R7,0, BAR XCALL L0R2RI 

#H0C0D,R2 

SOI . RH, EO.SDI . RL+ I 

#SDI .RH, UBAR, O.BAR %CNZRO L0R2R1 

#H0C0D,R2 7.RET 



( ECOO 1 ] RESTORE R10IMSCP PKT PTR) 
[EC0#11MAKE SURE SEQUENTIAL 
[EC0#1 1R2/R1 sHI/LO BAD LBN 
IEC0#1 I IF NOT LBN 
[QDA1IEC0#1 1MAKE SURE SEQUENTIAL 

[QDAJ [U52EC2] [EC0S1 ] THEN R2,R1=HI/LQ SAVEO LBN 
1EC0#1)STRIP OFF HEADER CODE/RETURN 



SUBROUTINE TO CHECK FLAGS, PUT BAD LBN IN PKT, ETC., ROaMSCP STATUS 



004604 


010S4S 


0O7022 


135602 U.SLBN: ADD 


004605 


010550 


007006 


125576 


ADD 


004606 


01 6540 


0OOO1O 


OOOOOO 


XOR 


004607 


01 6540 


010007 


114614 


XOR 


004610 


01 8540 


010112 


137777 


XOR 


00461 1 


1 14543 


010200 


114 6 14 


BIT 


004612 


133563 


013100 


067777 


BIS\T 


004613 


013440 


OOOOOO 


104622 


NOP 


00461 4 


OI054S 


007047 


125572 1$: 


ADD 


004615 


O10550 


01 700S 


127777 


ADO 


00461 6 


004640 


000037 


OOOOOO 


AND 


00461 7 


01 6640 


OOOOIO 


OOOOOO 


XOR 


004620 


1 14543 


010200 


027777 


BIT 


004 S 2 1 


133563 


01 3 100 


067777 


BIS\T 



#501 .PO, UBAR\N, BAR XCALL S.LD10 
#P . FLGS, R10\N,8AR %CALL S.LDR3 
#<ST.OAT!SC.FER>,RO\N 
#ST.CMP,RO\N XJZRO 1$ 
#<ST .CNT ISC. EDO , RO\N XRZRO 
#EF . BBR, R3 XJZRO 1$ 
#EF BBU, R3.BUF XRNZRO 

%JMP 2$ 

#SDI .2T,UBAR\N,BAR '/.CALL S.LDQO 

#P . FLGS, R10\N, BAR XRZRO 

#ST .MSK.O 

#<ST .0AT> ,0\N 

#EF.BBR,R3 XRNZRO 

#EF .BBU, R3, BUF XRNZRO 



R10=MSCP PKT PTR 

R3:MSCP FLAGS 

1EC0#11IF FORCED ERROR 

Imjt09 ) [EC0#1 J THEN NOT BAD/IF COMPARE ERROR 

[EC0J1ITHEN NOT BAO/IF EOC ERROR 

[mjt09 ] [EC0#1 ] THEN NOT BAD BLK/IF BAD BLK REPORT 

THEN MARK UNREPORTEO/RETURN 
[mjt09] branch to set bbr 

[ mjt 09a ] what was temp error? 

[ m jt09 l.r et urn if zero/reset bar 

[ mjt 09a ] mask data error 

[mjt09a]did an ecc (data) error occur? 

Imjt09 1 [EC0#1 1 THEN NOT SAD BLK/IF BAD BLK REPORT 

ImjtOS] THEN MARK UNREPORTEO/RETURN 



BAD BLOCK - NOW LET'S DETERMINE WHAT TO REPORT *»* 



004622 
004623 
004623 



133543 
000545 



003200 OOOOOO 
007O27 103213 



BIS #EF .BBR, R3, BUF 

ASSUME SOI .BH, EO.SDI . BL+ 1 

ADD #SDI .BL.U8AR, Q.BAR 7.JMP STR1R2 



IEC0#11ELSE INDICATE BAO BLK REPORTED 
[US2EC11MAKE SURE SEQUENTIAL 
[U52EC1 1ST0RE III SOI CNTRL BLK/RETURN 



O04624 010S47 007001 



004625 
004626 
004627 



013740 
037142 
006544 



007156 125630 
000002 OOOOOO 
010135 137777 



U.WTST : 
U.WTSA: 



ROUTINE TO SEE IF BITS IN RO ARE SET IN BUF. ST [16K] *** 

ADD #BUF .ST, R7\N, BAR %JMP S.BITO ; [1SK1G0 SEE IF RO BITS SET/RETURN 
ROUTINE TO WAIT FOR BITS IN RO + SUSPIXCMP TO BE SET IN SDI.ST *** 
XCALL S.CLRB 



MOV 

XNOR 

XOR 



#NSEEKS, BAR 

R2.R2 

#<BUFP42- <NBUFR«2> > . RLL . XRZRO 



[ EC0»2 ] PREVENT DEAD L OCK , I . E . D. READ/WRIT MUST GET 
[U52EC1 ]R2:L00P LIMIT IAPPROX 65 MSECSI 
[Oda] tch04 ! (U52EC I 1 
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OO4S30 

004631 



004632 
004633 
O04634 
004635 



004637 
004640 



004641 
004642 
004643 



OO4640 
031442 



000376 
010002 



OOOOOO 

I 14627 



AND 
DEC 



#376.0 
R2 



010545 0O7000 125603 

010565 017025 165572 

033540 010260 114625 

013440 OOOOOO 127777 

; * ** 

053701 000003 137777 U.LRR1 



XJZRO U.WTSA ; 

CHECK IF BITS (RO) SET IN SOI STATUS **» 

ADO #SDI .ST,UBAR\N,BAR XCALL S.BITO ; 

ADO\T #SOI . OM, UBAR\N , BAR XCZRO S.LDOQ i 

BIS #<XCMPISUSP !BFRQ> , RO XJZRO U.WTST 
NOP XRET ; 



Q = XOR OF STK PTR AND NULL BUFFER PTR 

; 1U52EC11IF NO BUFFERS LEFT (IGNORE LOCK BIT) 

[U52EC110ECR LOOP COUNTER AND LOOP IF NONE LEFT 



IF RO BITS NOT SET 
IU52EC11 THEN IF SOI. DM EO 

; [U52EC21 (U52EC1 1 THEN SET SUSP IN RO 3 LOOP 
ELSE RETURN 



ROUTINE TO LOAD R1 (SHIFTED RIGHT) FROM THE BUFFER **» 

MOV\R (BUF),R1 XRET ; [U52EC1JGET R1 SHIFTED RIGHT 

ROUTINE TO PROCESS NEXT COMMAND/FRAGMENT SEEK OVERLAP ■»** 
BAR points to SDI.OE(UBAR) 



013740 
010545 



003000 
017022 



135224 
1 1 4644 



MOV 
ADD 



#0, BUF '/.CALL U.CKTC 

#S0 I . PQ, UBARNN , BAR %J2R0 U.OVLB 



Clear ovlp flag; if transfer ct s o 
then try to overlap next command 



(E121 1 
[E121 ] 
[E 121 ] 
[EI21 ] 



OVERLAP SEEK OF NEXT FRAGMENT *** 



033746 000062 123102 
014546 0OO002 124655 
114543 OOOIOO 114334 U.OVLA: 



MOV 
BIT 

BIT 



#<SUSP I BFR0!SE6K> , R6 XCALL U . SETS ; 
#SEEK,RS XCALL U . CROS ; 

#BFULL,R3 XJMP U . BMTW ; 



IU52EC1ISET SEEK. BFRQ. 
IUS2EC11G0 UPDATE GROUP 
(US2ECI ] CONTINUE 



ANO SUSPEND 



CHECK FOR SEEK OVERLAP OF NEXT COMMAND **• 



The f o 1 low i ng code was deleted by RL, 7/31/S7, because it 
doesn't do anything except inhibit all overlap (since we got 
here from u . BMTX , P . OPCO cannot be OP . ERS I ) 



004644 
004645 
004646 
004647 
004650 
004651 



004652 
004653 
O04654 



033706 OOO0O3 OOOOOO 

013440 007006 125575 

105542 000300 OOOOOO 

010562 017006 075572 

014640 00O04O O 1 OOOO 

013440 010000 104843 



010S45 007025 135624 
010545 007022 125621 
013440 OOOOOO 102101 



ADD #SDI .PQ, UBARVN, BAR XCALL 

ADD #P .OPCO, R6\N, BAR XCALL S 

XOR #0P.ERS,R2\N 

NOP XJNZRO L 

MOV (8UP1.R6 

MOV R6. BAR '/.CALL S 

BIC #<PSTAT I PACTV> , R2 , 

AODXT #P . 0PCD,R2\N, BAR XCNZRO S 

BIT #<0P . RD30P . CMP30P .WR> , Q 

NOP j XJZRO L 



> . LDRS 
LDR2 



E m jt 07 ] r 6=cur r ent end ptr 
Emjt07]get opcode 
[mjt07]is it an erase? 
Imjt07] if it is, exit 

IU52EC1 )R6:CURRENT CMD PTR 
IUS2EC1 )R2:LINK WORD FOR THAT CMC 
IUS2EC112AP CONTROL BITS 
[U52EC11IF PTR NEO O THEN LOAD IT 
[U52EC1IIF NEXT CMD NEQ RD.WRT, OR CMP 
(U52EC1) THEN GO BACK 3 CONTINUE 



(E12 I 
(E!2! 
(EI21 
[EI21 
[EI21 
[E 121 
(EI21 
IEI21 
[E 121 
IEI21 



OVERLAP SEEK OF NEXT READ, WRITE, OR COMPARE COMMAND *«* 



ADD 
ADO 
NOP 



#SDI .OM,UBAR\N .BAR XCALL S.STR6 
#SOI .PQ, UBAR\N, BAR XCALL S.STR2 
XJMP U.SEKO 



[U52EC11 ELSE SET SDI.OM 

(US2EC11PUT NEXT CMD ON HEAD OF QUEUE 

[U52EC11G0 SELECT NEXT CMD 3 START SEEK 



ROUTINE FOR CYLINDER CROSSING CYLINDER AND GROUP UPDATE 
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004655 
004656 
0046S7 
004660 
004661 
004662 
004663 



013440 
000545 
130441 
130442 
010545 
010S4S 
01OSSO 



004664 O1O5S0 

004665 010S4S 

004666 010S45 



10000 
O07O12 
000001 
O1OO02 
O070 1 2 
0O7O22 
007026 



007026 
007013 
00700S 



137777 
12321 1 
135620 
044662 
12562 1 
135602 
125630 



135573 

12561 6 
10S61 6 



NOP %RZRO 

ADO #SDI .CH, UBAR.Q, BAR 7.CALL L0R2R1 

INC R1 ,R1 7.CALL S STR1 

INCXF R2.R2 7.JNZR0 U . CRSA 

ADD #SDI . CH, UBAR\N,8AR %CALL S . STR2 

ADD #SDI . PO, UBARNN, BAR "/.CALL S.L010 

ADO *S . GRUP, R10NN.BAR "/.CALL S.CLRB 

GROUP UPDATE ROUTINE «»« 

ADD #S. GRUP, R10\N, BAR "/.CALL S.LDRO 

ADD #SDI . GP, UBARXN, BAR "'.CALL S.STRO 

AOD #SOI . UG, UBAR\N, BAR %JMP S.STRO 
. PAGE 



[U52EC11IF NO SEEK THEN RETURN 
[US2EC1 ]R1 ,R2:L0,HI CYL NUMBER 
[U52EC11INCR LO CYL/RESET 
IU52EC1IIP NE9 O THEN INCR HI CVL 
1U52EC11 ELSE BUMP HI CYL/RESET 
IUS2EC1 ]R10=MSCP PKT PTR 
(U62EC1 1RESET GROUP VALUE 



[US2EC1 IROsGROUP NUMBER THIS CMD 
[U52EC11SAVE AS MASTER GROUP NUMBER 
[US2EC1JSAVE AS U.CPRM GROUP/RETURN 



kJ 
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ROUTINE NAME: 

UNB.CM (UNIBUS COMPARE SUBROUTINE) 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE ACQUIRES A BUFFER THEN FILLS IT WITH BUF . BC 
WORDS FROM THE HOST. THE DATA FROM THE HOST (CMPBUF) IS THEN COMPARED WITH 
THE DATA JUST READ FROM THE DISK (BUF.8P). IF ALL BUF . BC WORDS MATCH THEN 
THE EDC'S ARE CHECKED. 



INPUTS : 



I UAR, UAR 
R7 



STARTING UNIBUS ADDRESS REGISTER IMAGE 
BUFFER CONTROL AREA POINTER 



OUTPUTS : 

SUCCESS - MERGE 
FAILURE - ENTER 



BACK INTO READ CODE 

U.BMTS {COMPARE FAILURE) OR U.BMTO (I/O FAILURE) 



COMPARE SECTOR BUFFERS WITH HOST DATA (COMPARE COMMANO ) *** 



004667 
004670 
004671 
004672 
004673 
004674 
00467S 
004676 
004677 
004700 



004701 
004702 
004703 



133740 
033760 
033743 
033442 
133740 
01 6503 
017503 
003760 
010547 
103640 



010547 
053440 
013740 



000O4O 
010350 
000105 
007005 
000001 
000003 
10003 
010112 
007006 
003200 



124624 
054571 
000000 
10000 
135220 
000000 
104701 
044512 
135572 
000000 



MOV 

MOV\T 

MOV 

MOV 

MOV 

XOR 

XNOR 

MOVXT 

ADD 

BIS 



0BECER.RO 



V.CALL U.TBEC ; 
#<ST . DAT+SC. ECO. RO %JN2R0 U . DERC 
OEDSEED. R3 
UBAR, R2 , BAR 
#SECSZ,RO 
(BUF) , R3\N 

(BUF),R3\N %JZRO UNB.CA 
#<ST . CNT+SC . EDO , 7.JNZR0 U , BMTR 
»BUF . SD , R7\N, 8AR SCULL S.LDOO 
#BIT15,0,BUF 



•/.CALL U.CKEB 



GO SEE IF FATAL ECC ERROR 

; IF FATAL ECC ERROR THEN EXIT 

MOVE SEED INTO R3 

BAR,R2:BUFFER POINTER 

FINISH EDC IF NEEDED 

IF BUFFER EDC EO CALCULATED EDC 

THEN CONTINUE/IF NEQ 1'S SOMPLEMENT EDC 

THEN DO ERROR RECOVERY : [ E 1 2 1 ] 

ELSE RESTORE O/SET BIT15 OF SDI POINTER 
TO INDICATE FORCEO eRROR 



ACQUIRE BUFFER FOR HOST OATA RE-READ **« IV05] 



007012 125573 
000000 010000 
007242 125577 



#BUF.BC,R7\N,BAR %CALL S.LDRO 



ADO 

ROT\R 

MOV #CMPBUF,BAR 

PREPARE FOR AND PERFORM HOST DATA RE-READ 
UNIBUS READ SEGMENT ROUTINE 



[V0S1R0=BYTE COUNT 

[Ch041 CONVERT BYTE COUNT TO WORD COUNT 

(Ch04) POINTER TO THE DEDICATED COMPARE BUFFER POf 



004704 


013440 


OOOOOO 


125635 


UNB 


SR: 


NOP 


004705 


013440 


010000 


044545 






NOP\F 


004706 


010547 


00701 1 


125573 






ADO 



"/.CALL UNB.RD 

7.JN2R0 U.BMTO 

#BUF . GP, R7\N, BAR %CALL S.LDRO 



1O0A10O READ OF FIRST SEGMENT 
[OOAIERROR IF NOT ZERO 
[BDAIGET SEG 2 GROUP 
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O04707 
O04710 



f 0047 1 1 
' 0047 12 



055540 
013740 



0S3440 
O t 3440 



000377 
007244 



lOOOO 
1000O 



134503 
135616 



03S636 
014S45 



BIC\R 
MOV 



#LOBYT , RO 
*MAPSAV,BAR 



7.CALL 

'/.CALL 



. CPGC 
.STRO 
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; CHECK PG XING, LOAD SEG2 PARAMS IF NECME1211 

; [ch02]Save SEG 2 byte count for later use;[E121] 



NOTE THAT UBAR IS STILL SET UP FROM THE PREVIOUS CALL 
TO UNB.RO ANO POINTS TO THE CORRECT OFFSET WITHIN THE 
0E0ICAT60 COMPARE BUFFER FOR THE SEGEMENT 2 DATA 



lon041 
lcn04] 
(Oh041 



MOV\R 
NOP 



%CNZRO 
'/.JNZRO 



UN. BRC 
U . BMTO 



(ODAlElse read SEG 2 

[VOSIIF ERROR THEN GO PROCESS 



004713 


010S47 


00701 2 


125573 


ADD 


#BUF .BC 


R7\N 


BAR 


'/.CALL 


S . LDRO 


004714 


013740 


007244 


125574 


MOV 


#MAPSAV 


BAR 




"'.CALL 


S . LDR1 


004715 


0301 40 


00000 1 


000000 


ADD 


Rl . RO 










0047 16 


010547 


007002 


125574 


ADD 


#BUF . BP 


R7\N 


BAR 


•/.CALL 


S . L0R1 


004717 


013740 


007242 


135575 


MOV 


#CMPBUF 


BAR 




•/.CALL 


S. LDR2 


004720 


120341 


007001 


135572 UN8 


. CB : INCB 


R1\0,R1 


BAR 




%CALL 


S . LD99 


004721 


120342 


007002 


010000 


INC8 


R2\0,R2 


BAR 








004722 


0O66OO 


000003 


010000 


XOR 


(BUF) ,0 










O04723 


131 540 


10002 


014726 


SUB 


#2, RO 






% JN ZRO 


UNB . CC 


004724 


013440 


10OOO 


0O4720 


NOP 








•/.JNZRO 


UNB . CB 



004725 013440 OOOOOO 114427 



PERFORM COMPARE FUNCTION ( R3 = EDC OF HOST DATA BUFFER) *** 

[VOSJROsBVTE COUNT 

[ ch02 ] Rest or e SEG 2 byte count 

[ch02]Add SEG 2 byte count to SEG 1 

[V051R1=DISK DATA BUF PTR 

IV05]R2:H0ST DATA BUF PTR 

[V05]Q=W0RD FROM DISK BUFFER 

[V05]BAR=PTR TO WORD FROM HOST BUFFER 

[VO51C0MPARE DATA FROM HOST ANO DISK 

[V05JIF ERROR THEN PROCESS ELSE DECR CNTR 

[VOSIIF NEO THEN LOOP ELSE BARsPTR TO HOST BUFR 

DATA FROM HOST MATCHES DATA FROM DISK - NOW CHECK EDC'S *** 

NOP 7.JMP UN8.CX ; [ V05 1 GO CHECK FOR FORCED ERROR 

SECTOR SUFFER HAS COMPARE FAILURE - PERFORM COMPARE RECOVER/ AS APPROPRIATE «** 



004726 


033740 


0O0OO7 


OOOOOO 


UNB 


CC : 


MOV 


004727 


010547 


007006 


135577 






ADD 


004730 


013440 


OOOOOO 


104553 






NOP 
. PAGE 



#<ST . CMP> , RO 
#BUF ,SD,R7\N, BAR '/.CALL 
%JMP 



S. LOUB 
U . BMTS 



[ VO5]RO:C0MPARE ERROR CODE 
[VO5IREST0RE UBAR 
[VO51G0 PROCESS ERROR 
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004731 010545 007047 135S13 



004732 
004733 
004734 
004735 



004736 
004737 
0047 40 
004741 
004742 



O04743 
004744 



010545 
I 14540 
014S4O 
013440 



025544 
003700 
130444 
014540 
034460 



010545 
010545 



0O7OO0 
000240 
010244 
OIOOOO 



007001 
040003 
010004 
000204 
10000 



007035 
0070 17 



135573 
10000 
004741 
01474 1 



OOOOOO 
154736 
004732 
OOOOOO 
OB7777 



135604 
125572 
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.SBTTL READ RECOVERY ROUTINE 



NAME : 
.RREC (READ 



RECOVERY ROUTINE] 



FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL INITIATE RE 
LEVEL 11 FOR SECTORS READ IN ERROR. 

1. IF LEVEL 1 ERROR RECOVERY 

WILL PERFORM A REAL TIME 

2. ERROR RECOVERY LEVEL 1 WI L 
NUMBER OF RETRIES WILL BE 
COMMAND IS USED. 

3. IF 2) ABOVE FAILS THEN A D 
BE PERFORMED AT EACH ERROR 

4. IF THE REAO SUCCEEDS AT ON 
DRIVE IS LEFT AT THAT RECO 

5. IF THE READ CONTINUES TO 
ARE EXHAUSTED THEN THE ROU 



AO RETRY ANO RECOVERY (ERROR RECOVERY 

THE FOLLOWING SEOUENCE IS FOLLOWED: 
IS NOT ACTIVE THEN THE FIRST RETRY 
GROUP SELeCT. 

L BE ACTIVATED AND A DRIVE SPECIFIED 
PERFORMED BEFORE THE SOI ERROR RECOVERY 

RIVE SPECIFIED NUMBER OF RETRIES WILL 

RECOVERY LEVEL THE DRIVE SUPPORTS. 
E OF THE ERROR RECOVERY LEVELS THE 
VERY LEVEL FOR THE NEXT OPERATION 
AIL AFTER ALL ERROR RECOVERY LEVELS 
TINE WILL RETURN A HARD ERROR. 



UBAR 



MSCP ERROR CODE OF RETRY CAUSING ERROR 
SETTING IS OPTIONAL 

POINTER TO SECTOR BUFFER IN ERROR 
POINTER TO SOI CONTROL BLOCK FOR DRIVE 



OUTPUTS : 

ACTIVATED LEVEL 1 ERROR RECOVERY 

CONDITION CODE ZERO ■ HARD FAILURE 

CONDITION CODE NONZERO - ERROR RECO VERY /RETRY INITIATED 



. RREC : 

*** 
. RRCA: 



10$: 

U .RRCX : 



AOO #SDI . 2T, UBAR\N, BAR '/.CALL S.STOO 
MAKE SURE . PROC IS REALLY BLOCKEO »«« 



SAVE ERROR FOR SUCCESS ERROR LOG 



ADD 
BIT 
BIT 
NOP 



#SDI .ST, UBAR\N,BAR %CALL S.LORO ; RO:SDI STATUS 
#<SLAT»RVCT> , RO ; IF SLAT OR RVCT SET 

#<DERR+XCMP+SUSP> , RO %JNZRO U.RRCX ; [I6K1IF SUSPEND SET 

[ 1 6K] THEN CONTINUE 



7.JNZR0 U.RRCX 
IF NO BUFFERS LEFT THEN TREAT AS SUSPEND 



BIC 

M0V\F 

INC 

BIT 

CLR\T 



#1 , RLL\0,BAR 
(BUF) ,0 
RLL ,RLL 

#<DERR*XCMP> , RO 
RO 



%JNLSB 

•/.JNZRO 



1 OS 

U. RRCA 



CHECK IF LEVEL 1 



XRNZRO 
ERROR RECOVERY ACTIVE ««* 



1 1 6K] (cn031 IF BUFFER LOCK CLR 
[16K)[cn031 THEN WAIT FOR IT 
I16K1IF BUFFERS THEN LOOP 
[1SKJ ELSE CHECK FOR ERRORS 
IF ERROR THEN RETURN 



ADO 
ADO 



#SDI . ER,UBAR\N, BAR "iCALL 
#SOI . El ,UBAR\N, BAR '/.CALL 



. LLBO 
. LOOO 



ROsERROR RECOVERY LEVELS 
QsLEVEL 1 ERROR STATE 
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004745 
004745 
004746 
004747 
004750 
0O4751 
004752 
004753 
004754 



004755 
004756 
0047 57 
004760 
O04761 
004762 



100440 
103640 
010S47 
035541 
135541 
013440 
033561 
154640 



010545 
074542 
073762 
070142 
Ol 61 40 
014640 



O3000O 
000201 
O07O01 
000002 
00000 1 
000000 
013O0 1 
000017 



007034 
000360 
10100 
000002 
000002 
010377 



154754 
10000 
125574 
000000 
100OO 
000000 
044754 

oooooo 



125575 
OIOOOO 
144760 
OOOOOO 
010000 
004767 



L S.LDR2 



004763 001240 010000 167777 



004764 


105640 


000017 


010000 




BIC 


004765 


010545 


007026 


125573 




ADO 


004766 


03354O 


0O30O2 


OIOOOO 


; * * * 


BIS 
UPDA 


004767 


OI0545 


007017 


OOOOOO 


U . RRCE : 


ADO 


004770 


100640 


000377 


125613 




ADDC 



ASSUME ERRINP, EO. SIT15 

INC\F R0,0 %JMSB U.RRCC 

BIS #<ERRINP+2S6. > ,0 

ADO #BUF.ST, R7\N , BAR V.CALL S.LDR1 

BIC #BCGRP,R1 

BIC #BERDN,R1 

TST RO 

BIS\T #BGRUP,R1 , BUF 7.TNZR0 

ANO\R #RETCNT.Q,RO 

ISOLATE DRIVE'S RETRV COUNT *•* 

ADO #SOI . RCUBARVN, BAR '/.CAL 

ANO\L #HINIB,R2 

MOVNTL #ERRRTC«1 6 . , R2 '/.TZRO 

ADD\L R2.R2 

XOR R2,R0\N 

BIT #LOBVT,0 %JN2R0 

MAXIMUM RETRY COUNT EXCEEDED, D 

0EC\F 7.RZR0 

CLEAR RETRIES AND INDICATE POTE 

#RETCNT,0 

#SDI . ES, UBARVN, BAR SCALL S.LDRO 

#OFFTRK, RO.BUF 



MAKE SURE ERRINP IS MSB 

IF ERROR RECOVERY ACTIVE THEN CONTINUE 

ELSE ACTIVATE ERROR RECOVERY 
[ 16K1R1 -CURRENT BUFFER STATUS WD 
[16KJCLEAR GROUP OONE FLAG 

[EERREC] CLEAR ERROR RECOVERY CMD DONE FLAG 
ISOLATE ERROR RECOVERY LEVELS 

DO GROUP SELECT ON FIRST RETRY (TO RECENTER HEAD I 
ISOLATE RETRY COUNT 



R2=0RIVE RETRY COUNT (HI NIBBLE) 
ISOLATE RETRY COUNT 
IF EO THEN USE DEFAULT 
R2=R2*4 
IF NEO MAX 
U.RRCE THEN CONTINUE/ELSE TEST RECOVERY LEVEL 

ECREMENT ERROR RECOVERY LEVEL *»* 

IF RECOVERY LEVEL EO THEN HARD ERROR 

NTIAL OFF TRACK CONDITION »»» 



ZAP RETRV COUNT 

ROsEXTENOEO STATUS WORD 

INDICATE POTENTIAL OFF TRACK CONDITION 



o 



UPDATE RETRY COUNT 



#SDI . E1 , UBAR\N , BAR 
#377,0 51CALL 



CHECK FOR GROUP SELECT NEEDED 



: BARiPTR TO LEVEL 1 RECOVERY WORD 
S.STOO ; ADO 1 TO RETRY COUNT/RESET 



004771 
0O4772 
004773 
004774 



004775 
004776 
004777 
004777 
005000 
005001 
005002 



010547 
034541 
010545 
010545 



103740 
010547 

103E60 
036141 
0036S0 
133540 



007011 135574 

000377 OOOOOO 

007005 125617 

007013 125575 



AOO #BUF . GP, R7\N,BAR 7.CALL S 
ANO #L0BYT,R1 

ADD #SDI .UG, UBARXN, BAR 7.CALL 
ADD #SDI .GP, UBAR\N, BAR %CALL 

RESET BUFFER STATUS TO EMPTY «** 



.SL61 
. LDR2 



000200 
007000 

030100 
000002 
010001 
000200 



OIOOOO 

125573 

155000 
010000 
055002 
OOOOOO 



005003 135540 003100 OOOOOO 



MOV 

ADD 

ASSUME 

BIS\T 

XOR 

BIS\T 

BIS 

SIC 



#BRTRY,0 

#BUF . NL ,R7\N, BAR XCALL 

BLAST, EO, BITIS 

#BLSTB,0 XTMSB 

R2, R1 

#BGRUP,Q %TN2R0 

ffBLAST.RO 



OBFULL , RO, BUF 

; *** SET READ RECOVERY FLAGS IF NOT ALREADY SET "•< 
K0B50. MICROCODE., 22- APR- 1988 11:16:43.97 



[BOA] R1:GR0UP NUMBER/EXT UNIBUS ADDR BITS 
[BDA1 STRIP OFF S2 WORD COUNT 

SAVE AS CURRENT GROUP FOR U.PROC 

R2:CURRENT GROUP 



QsREAD RECOVERY FLAG FOR BUF.BP 

RO:BUFFER STATUS 

MAKE SURE BLAST IS MSB 

IF REALLY LAST ONE THEN SET REALLY LAST FLAG 

IF GROUPS NEO 

116KITHEN SET GROUP FLAG IN BUF. ST 
TEMPORARILLY MAKE THIS BUFFER LAST SO 
D.REAO WON'T UPDATE SDI.D8 FOR THIS SECTOR! 
[ 16K1 INDICATE BUFFER EMPTY 



,r 
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OO5004 
005005 
OOS005 
005006 



010547 O07O01 



O04S6O 
135540 



030001 15500S 
000077 010000 



005007 033040 003000 OOOOOO 



ADD 

ASSUME 

AND\T 

BIC 

BIS 



S . LORO 



[ 16K1R0=BUFFER POINTER/RECOVERY FLAGS 

[U52EC21MAKE SURE BRTRY IS MSB 

[U52EC21IF ALREADY SET THEN ISOLATE BGRUP ONLY 

#<BECC!BGOOOI BDSNF ! BL RWR I BERDN ! BECER> , RO ;[mjt09al[EERREC] 

; [U52EC2] [EC0#21CLEAR POS ERROR FLAG/ECC ERR FLG 

0, RO.BUF ; [16K1SET BUF. ST FLAGS 



#BUF.ST,R7\N, BAR XCALL 
BRTRY, EO, BIT15 
#BGRUP,0 ITMSB 



RESET SDI STATUS TO ALLOW I/O TO OCCUR AGAIN <•« 



005010 033746 

00501 1 133546 

005012 135540 

005013 035540 



000040 123371 

000100 12S476 

000040 OOOOOO 

000304 103107 



MOV 
BIS 
BIC 
BIC 
.PAGE 



#SUSP,R6 %CALL U. 

#ERRIP,R6 XCALL U 

#SLAT, RO 
#<OERR! XCMP!6FSV> ,R0 %JMP 



ZPSW 
GMST 



R6tSUSP/G0 ZAP SDI.SW 

ROiMUTEXEO SOI STATUS 

THROW ERROR LOG AWAY ! 

(EC0#2]ZAP DRV ERR, TRANSFER COMPL, BUFFER SERVICE 



i 



KDB50. MICROCODE. , 22- APR- 1988 11:16:48.97 



KDBUP OIGITAL E0UIPM6NT CORP. 

READ RECOVERY ROUTINE 



2901 ASSEMBLER VERSION 32 






ROUTINE NAME: 

U.BSET (BUFFER SERVICE SET UP) 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE SETS THE FOLLOWING PARAMETERS FOR PREPARATION OF 
A ReAD, WRITE, COMPARE OPERATION: 

RO = NUMBER OF BYTES TO TRANSFER 

IUAR : LO HOST TRANSFER ADDRESS 

EXTENDED ADDRESS BITS IN CR AND CRI 

UBAR = SECTOR DATA START ADDRESS 



INPUTS: 



UBAR 

R7 



POINTER TO SOI CONTROL BLOCK 
POINTER TO CURRENT SECTOR BUFFER 



AS MENTIONED ABOVE 



00501 4 
0OSO1S 
00S01 6 
00S017 
005017 
00S017 
0OS020 



10545 
010545 
013740 



014540 
01 S540 



007025 
017022 
007144 



0OOO20 
01OO1 1 



125602 
125602 
135573 



010000 
015075 



00502 1 010547 017014 



005022 
005023 
005023 
005024 
005025 
0O5026 
005027 
005030 
005031 
005032 
005033 
005034 



005035 
005036 
005037 
005040 



010550 007013 125S74 



010547 
010547 
014541 
01 3440 
010547 
033540 
010545 
033141 
010547 
010547 



010545 
O13440 
010545 
013740 



037014 
007001 
000010 
01OO00 
007001 
0030 10 
007 107 
000000 
007007 
007010 



007 105 
010000 
007106 
0172 46 



OOS076 
125574 
000000 
00S070 
135573 
135273 
135573 
000000 
135620 
135613 



135614 
015047 
135574 
155051 



ADO 

AOD 

MOV 

ASSUME 

ASSUME 

BIT 

XOR 

ADO 

ADO 

ASSUME 

ADD 

ADD 

BIT 

NOP 

ADO 

BIS 

AOO 

BIS 

ADD 

ADD 



#SOI . OM, UBARXN, BAR '/.CALL S 

#SDI . PO, UBAR\N,BAR 7.CZR0 S. 

#OPCODE,BAR 7.CALL S 

<0P.RPL*0P.ACC80P.ERS>82O,NE,O 

<0P.RD!OP.WR!0P.CMP!OP.ONL>82O,EQ, 

#20, RO 

»0P.0NL,ROXN 7.JNZR0 U 



LDIO 
LOIO 
LORO 



OBUF . U2, R7\N. BAR 

#P . BUF1 , RIOXN.BAR 
MAPVAL , EO, BIT15 
#6UF . U2, R7XN , BAR 
#8UF .ST, R7\N, BAR 
#BMAP0N, R1 

#BUF .ST, R7\N, BAR 
#BMAP0N,RO, BUF 
#MAP . OF, UBAR\N,BAR 
RO, R1 

#BUF. UA, R7\N, BAR 
#BUF . US, R7XN.BAR 



7.JZR0 



7.JNMSB 
7.CALL 

%JN2RQ 

'/.CALL 

7.CALL 

•/.CALL 

•'.CALL 
SCALL 



U . CLM1 
S . LDR1 

U. BST1 
S . LDRO 
U . CETP 
S . LDRO 

S . STR1 

S STOO 



ARE 
[ODA 
[chl 
[chl 

[ch 1 
[chl 

IP 
(chl 
make 
[ODA 

(ODA 

(ODA 

(ODA 

(ODA 

[ODA] 

[ODA] 

[ODA] 

[ODA] 

[ODA] 

[BDA] 



OVERLAPPED SE 
IRIOiMSCP PAC 
1 ]GET THE OPC 
1 1MAKE SURE C 

1 1TEST IF ACC 
1+JSEE IF ONL 
ACC, ERS OR R 
1*1 IF ONL 

sure no mapp 
IRIiHI ORD FI 

I [KJK1N0 MSB 
] GET BUFFER S 
] SEE IF MAPP 
] IF SET THEN 
GET STATUS WO 
SET MAPPING 
GET OFFSET 
SET IN OFFSET 
STORE LOW ORD 
STORE IN HI 



EKS IN PROGRESS? ;(E125] 
KET ; [E1251 

ODE ; [ E 1 2 1 ] 

HECK WILL W0RK;[E121] 

; [E121 ] 
, ERS, OR RPL 
INE/BYPASS MAPPING CHECK 
PL 
PASS MAPPING CHECK ALSO;! 

ng retained ;[E121] 
RST LONGWORD BUF 0ESC;[E1 

; [E121 ] 

- NO MAPPING ; [E121 ] 
TATUS 
ING SET 
ALREADY MAPPED 

/ [E121 ] 
LAG/GET ADDRESS OF FIRST 



(12 11 
!1 ] 



ER BUS ADDRESS 
DDR 



THIS SECTION CALCULATES THE 22-BIT ADDRESS FOR THE NEXT MAPPING REGISTER. 
IF THE INTERNAL CACHE IS EMPTY THE NEXT GROUP OF MAPPING REGISTERS IS READ 
FROM HOST MEMORY. 



AOD 
NOP 
AOD 
MO V \ F 



#MAP .RD,UBAR\N,BAR 



#MAP . UR, UBARXN , BAR 
#MAPFLG, BAR 



7.CALL S.D6CB 

XJNZRO U.MAP2 

•'.CALL S.LDRf 

%JZRO U.MAP1 



'S ; 



[OOAIOECREMENT NUMBER OF UNUSED READ PTE 
[ODAIIF SOME THEN O.K. ;[E121] 

(00A1SEE IF ANY LEFT TO GET ;(E121] 
[ODAIIF NONE, CONTINUE - U . MAP 1 WILL;[E121] 
FIND THE TRANSFER IS S I NG L E -SEGMENT it E 
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READ RECOVERY ROUTINE 



005041 


013740 


O03O0 1 


010OO0 


MOV 


0O5O42 


010545 


007 1 1 1 


125573 


ADD 


005043 


010545 


007103 


125616 


ADD 


005044 


010545 


007 1 1 2 


1 25573 


ADO 


005045 


010545 


007 104 


135616 


ADD 


005046 


01 3440 


OOOOOO 


115 3 14 


NOP 


005047 


010545 


007102 


125574 U.MAP2 : ADO 


OOSOSO 


03054 1 


000002 


135620 


AOO 
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#1 , BUF 

#MAP . VO, UBAR\N,BAR 
#MAP . MO, UBARXN , BAR 
#MAP . VI , UBARXN , BAR 
#MAP .M1 , UBARXN, BAR 

#MAP . NX, UBARXN , BAR 
#PTELEN, R1 
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•'.CALL 

7.CALL 

7.CALL 

%CALL 

%JMP 

7.CALL 

%CALL 



LDRO 
STRO 
LDRO 
STRO 
PTEL 
LDRI 
STR1 



[QDA1SET R 
[0DA1GET 
[ 0DA1ST0RE 
[0DA1GET H 
[ODA1ST0RE 
(ODA)SET F 
(QDAJELSE 
[ODA] INCRE 



ETURN FLAG FO 
OW MAP REGIST 

LOW MAP REG 
IGH MAP REGIS 

HIGH MAP REG 
LAG/IF SOME 
GET PTE POINT 
MENT AND STOR 



R 

ER 

ADDR 

TER 

ISTE 

EFT 

ER 

E BA 



PTEL ; [E121 ] 

DDRESS 

ESS 

ADDRESS 

R ADDRESS 

THEN GET WHAT WE 



CK 
Return Here from U. PTEL or fall through from U.MAP2. MAP.NX(UBAR) -> next PTE 



0050S1 


010545 


007 1 10 


125574 U . MAPI : ADO 


#MAP . S 1 


, UBARXN, BAR 


005052 


010547 


0070 12 


125573 


ADD 


#BUF . BC 


, R7XN 


BAR 


005053 


1 12140 


OOOOOI 


010000 


CMP 


R1 ,R0 






005054 


034466 


020006 


145065 


CLRXT 


IUAR 






005055 


013440 


003O01 


01O000 


MOV 


R1 , BUF 






0050S6 


131 140 


00OOO1 


OOOOOO 


SUB 


R1 ,RO 






005057 


070140 


OOOOOO 


OOOOOO 


ADDXL 


RO, RO 






005060 


070140 


OOOOOO 


OOOOOO 


ADDXL 


RO, RO 






005061 


0701 40 


OOOOOO 


OOOOOO 


ADDXL 


RO.RO 






005062 


073446 


OOOOOO 


125273 


MOVXL 


RO, IUAR 






005063 


010547 


007013 


135620 


ADD 


#BUF . U1 


, R7XN 


BAR 


005064 


010547 


007014 


125613 


ADD 


#BUF . U2 


. R7XN 


BAR 


005065 


010547 


00701 1 


13S572 10$ 


: ADD 


#BUF. GP 


, R7\N 


BAR 


O05066 


1O5640 


000377 


10000 


• BIC 


#HIBYT, 


5 




005067 


033046 


0030O6 


OOOOOO 


BIS 


0, IUAR, 


SUF 





%CALL 
%CALL 



S . LDR1 
S . LDRO 



get segment 1 size 

get byte count 

see if transfer is single 

br if it is and clear sog2 
te ct to sag siie 
umber of bytes in 
t 7 t o obt a i n 

in hi byte of IUAR 



%CALL U .CETP 

%CALL S -STR1 

%CALL S.STOO 

%CALL S . LDOO 



reduce by 
compute n 
shift lef 
word coun 

get addre 
store low 
st or e h i g 
get group 
c lear old 
subst itut 



ss of seg2 
order bus ad 

order bus a 
number from 
seg2 1 engt h , 

new seg2 length 



R1 
dr es 

ddre 
buf 



[E121 ] 
cache; [E12! 
[E121 ] 
[8121 ] 
; [E121 ] 
segment ; I E 1 2 1 ] 
wdct temp; [El 21 
i n buf ct 1 blk; 
seg2; [E121 ] 
; [E12I3 
; [E121 1 
; [E121 ] 
0; [E121 ] 
; [E121 ] 
; [ E 1 2 1 ] 
ct 1 blk; [E121 ] 
any ; [E121 ] 
and st or e; [ E 1 2 



and 



1 ! 







005070 
005071 
005072 
005073 
005074 



00507S 
005076 
0O5O77 
005 100 



010547 
10547 
010547 
010547 
013740 



0O70 12 
0070O7 
00701O 
007002 
007144 



125573 

125600 
125536 
1 25577 
105575 



ADD #BUF . BC, R7XN.BAR %CALL 

AOD #BUF . UA, R7XN.8AR %CALL 

AOO #BUF . US, R7XN, BAR %CALL 

ADD #BUF . BP, R7XN , BAR 7.CALL 

MOV *OPCODE,BAR 7.JMP 



.LORO ; RO=BYTE COUNT FOR THIS SECTOR 

.LDIU ■■; IUAR=CURRENT LO HOST MEMORY AOOR 

.SXBI ; RIsCURRENT HI HOST MEMORY ADDR 

■LOUB ; tISKlUBARsOATA BUFFER POINTER 

.LDR2 : I16K1R2:0P CODE/RETURN 



** On unmapped transfers, make sure the mapping information is *** 
** cleared to prevent reads of the second sector from previous *** 
"* mapped transaction. *** 



010547 007014 1 OOOO 

13740 003000 OOOOOO 

010547 007011 125S73 

03454O 003377 115070 



U . CLRM: 
U .CLM1 : 



ADO 
MOV 
AOO 
AND 



#BUF. U2.R7XN, BAR 

#0,BUF 

#BUF. GP.R7XN.BAR 

*L0BVT,RO,BUF 



c 1 rs hi adr 



7.CALL S.LORO :(mjt05] gat 2nd sec Byte cnt 

7.JMP U.BST1 ;tmjt05] 2nd sec byte cnt 



; (E121 ) 
; IE121 ] 
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SBTTL I/O PARAMETER CALCULATION ROUTINE 



ROUTINE NAME: 

U.CPRM (CALCULATE I/O PARAMETERS) 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL CALCULATE THE PARAMETERS NECCESSARV FOR A 
SECTOR BUFFER WHEN IT IS FIRST ALLOCATEO, BEFORE IT IS FILLED ON 
A WRITE OPERATION, OR AFTER IT IS EMPTIED ON A READ OPERATION. 
THE TRANSFER PARAMETERS CACULATED ARE AS FOLLOWS: 

1 . HOST TRANSFER AODRESS 

2. EXPECTED HEADER 

3. CURRENT BUFFER ADDRESS 

4. CURRENT GROUP ADORESS A 

5. CURRENT SECTOR AODRESS 

6. CURRENT HEAD ADDRESS 



ID IF A GROUP SWITCH IS NEEDEO 



INPUTS : 

UBAR 

R7 

OPCOOE 



POINTER TO SOI CONTROL BLOCK 

POINTER TO SECTOR BUFFER CONTROL AREA 

OPCOOE OF CURRENT COMMAND - P OPCO ( SO I PO ( UBAR ) ) 



O0S102 
005103 
O051O4 
00S10S 
005106 
005 107 

0051 10 

0051 1 1 

0051 12 
005 1 13 
0051 14 



005 1 15 
005 1 16 
OOSI 17 
00S120 
O05I21 
005122 

KDBUP 



01 0545 



010547 
103740 
OI0545 
132043 
01344O 
010545 
000043 
010S47 
010545 
013740 
031446 



010550 
10550 
010S47 
120343 
010547 
013440 



OUTPUTS : 

PARAMETERS CALCULATED/UPDATED IN SECTOR BUFFER AND SOI CONTROL BLOCK 
**« NOTE - MUST PRESERVE R0.R1.R2 »*« 



; *«» SET DATA BUFFER POINTER FOR THIS SECTOR «** 
007022 135602 U.CPRM: ADD #S0 I . PO , UBARNN , BAR '/.CALL S.L01O ; R10=MSCP PKT PTR 

: *«* UPDATE BYTE TRANSFER COUNT REMAINING AND SET BUFFER BYTE COUNT •*• 



007012 
003002 
007015 
000003 
023003 
007016 
010003 
00701 2 
0070 1 5 
0O3OOO 
000006 



007016 
007017 
0O7O03 
003003 
027004 
003006 



010000 
010000 
125576 
000000 
1051 15 
135600 
005 1 14 
1256 13 
O10OO0 
1 1 51 IS 
125624 



13SS76 
135600 
010000 
OOOOOO 
105123 
1 15125 



ADD 
MOV 
AOO 

P.SUB 

MOV 

ADD 

ADD 

ADO 

ADD 

MOV 

DEC 



#BUF . BC,R7\N,BAR 
#<SECSZ»2> ,«,BUF 

#SOI . XL , UBAR\N,BAR 7.CALL S.LDR3 
0.R3 

R3.BUF 7.JCRY 20$ 

#SDI . XH,UBAR\N, BAR '/.CALL S.LDR6 
R3,0 7.JNZR0 10$ 

#BUF . BC,R7\N,BAR 5SCALL S.STOO 
, UBAR\N,BAR 

%JMP 20S 
'/.CALL S.STR6 



#SD I . XL , 
#0 , BUF 



POINT TO BUFFER BC WORO 

ASSUME BUFFER IS FULL 

R3 = LO XFER BYTE CT 

R3 = R3 - 512 

UPDATE, BR IF R3 >• 512 

R3 < S12 - R6 = HI XFER BYTE CT 

■ OLD LO BC, BR IF HI BC • O 

BUFFER BC : OLD LO BC (PARTIAL BUF) 

SET LO BYTE CT i - THIS IS 

THE LAST BUFFER OF THE XFER 

BORROW FROM HI BYTE CT 3 UPDATE 



UPOATE EXPECTED HEADER AND BYTES TO TRANSFER FOR THIS SECTOR *** 



ADD #S . LBNL,R10\N,BAR '/.CALL 

ADD #S . LBNH,R10\N,BAR 7.CALL 

ADD #8UF . HL . R7\N, BAR 

INCB R3\0,R3,BUF 

ADD #BUF . HH.R7\N,BAR %JCRY 

MOV R6.BUF 7.JMP 



. LDR3 
. LDR6 



30$ 
40$ 



R3:L0 EXPECTED HEADER 
R6:HI EXPECTED HEADER 

SET LO EXPECTED HEADER AND INC 
PREPARE TO STORE HI HDR, CHECK CARRY 
SET HI EXPECTED HEADER, GO UPD LO 



[E121 1 
IE121 1 
(E121 ] 

IE121 1 
[E121 ] 
IE1211 
IE121 ! 

IE 1 21 I 
(E12I ] 
[EI21 1 
IE121 1 
IEI21 ] 
[E121 1 



[E121 I 
[E121 1 
[ B1 21 1 
[E121 I 
[E121 1 
[E121 ] 
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005123 120346 

005124 010550 

005125 010550 



003006 
007017 
007016 



OOOOOO 30$ : 

135624 
125622 40$: 



INCB 

ADD 

ADO 



R6\0 , R6 , BUF 

#S . LBNH,R10\N, BAR '/.CALL S . STR6 

#S . LBNL,R10\N, BAR 7.CALL S . STR3 
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SET HI EXPECTED FEADER ANO INC 
SAVE NEW HI HEADER 
SAVE NEW LO HEADER 



CHECK FOR GROUP SWITCH NEEDED «»» 



005126 010550 007026 135576 



005 127 
O0S130 
005 131 
0O5132 
OOS133 
OOS134 



005135 
0051 36 
005137 
005140 
00S141 
005142 
005143 
OOS144 
005145 
005146 
005147 



0O5 15O 

005 151 



OOS152 
OOS1S3 
005153 

005153 
005154 

005 155 

005 156 



00S1S7 
00S1S7 
00S160 
OOS 1 6 1 

005162 

005 1 63 

005 1 64 



010547 
005640 
003043 
01O54S 
026146 
033766 



010550 
010547 
105640 
010547 
010550 
133748 
010547 
020146 
100240 
010550 
010550 



010550 
010547 



00701 1 
000377 
003003 
007005 
003003 
010001 



007023 
007O1O 
003300 
0O7O01 
007022 
000002 
OO7007 
003003 
020000 
007023 
007O22 



007027 
00700S 



013740 007144 



014546 
010547 
013740 
010550 



010545 
010550 
100240 
012046 
01 3260 
014240 



00OO2O 
17012 
003000 
007023 



007074 
007030 
OOOOOO 
000006 
023000 
OO3O00 



135572 
OOOOOO 
OOOOOO 
125600 
OOOOOO 
045135 



125572 
OOOOOO 
010OOO 
125824 
125576 
O 1 OOOO 
OOOOOO 
OOOOOO 
0S5147 
1356 13 
135624 



135S72 

125613 



10000 
1 15157 
OOOOOO 
125630 



125606 
135572 
OOOOOO 
OOOOOO 
177777 
O1O000 



ADD 
ADO 
B I C 
BIS 
ADD 
XOR 



#S . GRUP, R10\N,BAR XCALL S.L0R3 

#BUF . GP, R7\N, BAR %CALL S.LDOQ 

#LOBYT , 

R3.0.BUF 

#SDI . UG, UBARNN , BAR '/.CALL S.L0R6 

R3\0,R6, BUF 



#BGRUP,R6 



7. T N 2 R 



R3'NEW GROUP 

IBDA1 52 WORD COUNT IS FETCHED 

[BDA1 STRIP OFF OLD GROUP 

(BDA! AND STORE 

R6=U.PR0C GROUP WORD 

RESET CURRENT GROUP, COMPARE GROUPS 



[E121 1 

[E121 1 
[E121 1 
IE121 ) 

IE121 ] 
[E121 ] 

[E121 1 
(E121 1 
[E121 1 
£■121 ] 
IE121 1 
IE121I 



SET GROUP SWITCH FLG FOR STORING IN BUF . ST ; I E 1 2 1 1 



SET BUFFER TRANSFER ADDRESS t UPDATE HOST TRANSFER ADORESS 



.STR6 
. L0P.3 



ADD #S . ADRH,R10\N,BAR 7.CALL S.LDOO 

ADD #BUF . US , R7\N , BAR 

BIC #BANOT,Q,BUF 

AOD #BUF .ST, R7\N, BAR 7.CALL 

ADD #S . A0RL.R10VN , BAR 7.CALL 

MOV #<SECSZ*2> ,R6 

AOD #BUF . UA,R7\N,BAR 

ADD R3\0,R6,BUF 

INC\F %JNCRY 

AOD #S . ADRH, R10\N,BAR %CALL S.STOO 

AOD #S . ADRL , R10\N,BAR '/.CALL S.STR6 

SET TRACK INTO BUFFER »«* 



50$ 



0=HOST HI TRANSFER ADDR 

[BDA] SAVE HI ADDR BITS 

NOW THAT GROUP IS SET, SET GROUP FLAG 

R3=H0ST LO TRANSFER ADDR 

O'SECTOR SIZE IN BYTES 

SET UP ST STORE LO ADR IN BUF CBLK 

STORE LOW ADR, AOO 512 TO IT 

IF CARRY THEN ADD TO HI AOOR 

RESET HI TRANSFER ADDR 

RESET LO TRANSFER AOOR 



ADD 
ADD 



»S . TRAK, R10\N , BAR XCALL S.LDOO 
#BUF . TA,R7\N,BAR %CALL S.STOO 



Q'CURRENT TRACK 
STORE INTO BUFFER 



[E121 I 
[6121] 
[E121 1 
[E121 ) 
[E121 ] 
[E1211 
[E121 1 
[E121 1 
[E121 1 
[E121 ] 
[E121 ] 



: [E121 1 



CHECK FOR ACCESS/ERASE/REPLACE COMMANDS *** 



MOV #OPCOOE, BAR 7.CALL S.LDR6 

ASSUME <0P.ACC£0P.ERSa0P.RPL>82O,NE,O 

ASSUME <0P.RD!0P.WR!0P.CMP!0P.0NL>82O, 

BIT #20, R6 

ADO #8UF . BC,R7\N,BAR 7.JZR0 U.CPME 

MOV #0,BUF 

ADO #S .ADRH, R10VN, BAR 7.CALL S.CLRB 

UPDATE SECTOR AODRESS *«» 



ASSUME 
AOD 

ADO 

INC 

RSUBC 

MOV\T 

CLR 



LBNMSK, EO. LOBYT 



#SDI . 12 

OS .SECS 



0, R6\N 

0, BUF 

, BUF 



UBAR\N,BAR 7.CALL S.LLB6 
R10\N,BAR '/.CALL S.LDOO 



R6=0P CODE 

ACCESS, ERASE, REPLACE HAVE BIT 4 SET MEI2I] 

,0 ;OTHERS 00 NOT :[E121] 
[16KIIF NOT ACCESS/ERASE/REPLACE COMMAND ; I E 1 2 t 1 

[16K] THEN CONTINUE ;[E121] 

ELSE ZAP BYTE COUNT ;(E121] 
AND HI UNIBUS ADDRESS 



MAKE SURE MASK IS LO BYTE 
[V05] R6=LBN'S/TRK 512 FORMAT 
QsCURRENT SECTOR 
INCREMENT SECTOR AOOR 
IF NEW SECTOR ADDR LT MAX 

THEN RETURN 

ELSE CURRENT SECTORsO 



, r 

( 



; *«* UPDATE TRACK ADDRESS 
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005 1 65 

005 1 66 
005 1 67 
005 170 
005 1 7t 
OOS172 



005 I 73 
005174 



O 1 0545 
010550 
100240 
036046 
010550 
IO4640 



010550 

130446 



007066 
007027 
000000 
0OO006 
017027 
003377 



007026 
0O00O6 



125606 
13SS72 
135613 
135607 
037777 
000000 



125600 
1 15624 
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ADO #SOI . TG, UBAR\N, BAR "/.CALL S.LLB6 

AOD #S . TRAK, RIO\N, BAR %CALL S.LOOO 

INC %CALL S.STOO 

XOR O.RS %CALL S.MLB6 

ADO #S . TRAK, RIO\N, BAR 7.RNZR0 

AND #HIBYT,O.BUF 

UPDATE GROUP ADDRESS *** 



AOD 
INC 
. PAGE 



.GRUP.RIONN.SAR '/.CALL 
%JMP 



S . LDR6 
S .STR6 



[V05! R6=TRKS/GR0UP 
QiCURRENT TRACK 
UPDATE TRACK ADDRESS 
IF CUR.TRK NEO MAX 

THEN RETURN 
CURRENT TRACK=0 



R63CURRENT GROUP 

INCR BY 1 , RESET/RETURN 
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Q 
< 

a 

ii 

2 

x 
o 

u. 

w 
o 

V) 



51 75 
5176 
5177 
5200 
5201 
S202 
5203 
5204 
S205 

5206 
5207 

5210 
521 1 
5212 
5213 






005214 

O0521S 

0052 1 6 

I 0052 17 



005220 

005221 



010547 
010547 
I 1 6S4I 
013460 
010547 
055540 
053440 
053440 
053440 

030141 
173740 
151 140 
013440 
010545 
013440 



073443 
013740 
130442 
031 440 



076503 
130442 



007006 
007012 
000002 
Ol 70O2 
00701 1 
000377 
010000 
OOOOOO 

oooooo 

OOOOOO 
00000 1 
OOOOOI 
01 70O2 
007025 
17002 



0100O3 
003000 
007002 
OOOOOO 



0100O3 
007002 



13S577 
135574 
OOOOOO 
177777 
125573 
125223 
105206 
135223 
135223 

OOOOOO 
OOOOOO 
OOOOOO 

137777 
134121 
105220 



167777 
OOOOOO 
10000 
1052 1 4 



167777 
010000 



SBTTL EOC CALCULATION ROUTINE 
; + 
ROUTINE NAME: 

U.CKED (CHECK IF 6DC FULLY CALCULATED! 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE CHECKS IF THE EDC HAS SEEK FULLY CALCULATED BY THE 
UNB.WR OR UNB.RO ROUTINES. IF THERE WAS A SHORT TRANSFER THEN THE EOC 
CALCULATION IS COMPLETED. THIS ROUTINE WILL ALSO CALCULATE THE EDC 
ON A FULL SECTOR BUFFER, THEN UBAR MUST POINT TO THE START OF THE SUFFER 
AND Rl MUST EOUAL 69. 



INPUTS : 



R3 

R7 

OUTPUTS : 
R3 

R2.BAR 
UBAR 



AOD 

ADO 

XOR 

MOV\T 

AOD 

BIC\R 

MOV\R 

MOV\R 

MOV\R 

ADD 

MOV\L 

SUB\R 

MOV 

ADD 

MOV 



POINTER TO SECTOR BUFFER WHERE EOC CALCULATION STOPPED 
(START OF BUFFER IF WHOLE BUFFER EDC DESIRED) 
EDC CALCULATED TO DATE 169. IF WHOLE BUFFER EOC DESIREO) 
POINTER TO SECTOR SUFFER CONTROL AREA 



EDC FOR THIS SECTOR 

POINT TO THE EDC WORD IN THE SECTOR BUFFER 

RESTORED TO POINT AT SDI CONTROL BLOCK 



#BUF .SO, R7\N, BAR %CALL 

#BUF . BC, R7\N, BAR 

#<SECSZ«2>,R1\N 

R2, BAR 

#BUF . GP, R7\N , BAR 

#LOBYT, RO 

RO, RO 

RO, RO 

RO, RO 



RO, R1 

#SECSZ.RO 

Rl , RO 

R2.BAR %RZRO 

*SOI .OM,UBAR\N, 8AR 7.CALL CKWROM 

R2.BAR %JZRO U.CKEB 



''.CALL 


S 


LDUB 


V.CALL 


s 


LDR1 


%RZRO 






%CALL 


s 


LDRO 


7.CALL 


U 


R1R0 


7.JZR0 


10$ 


/.CALL 


u 


R1R0 


'/.CALL 


u 


R1R0 



RESTORE UBAR TO SDI CTRL BLK PTR 
RIsBYTE COUNT 

OUICK CHECK FOR FULL SECT 
IF SO, SET BAR AND GET OUT 
(BOAIGET GROUP FOR SEG 2 
(BOAl CLEAR ANY GROUP BITS 



[QDA1ADD BYTE COUNT 
ROsSECTOR SIZE IN BYTES 
RO:E0C LOOPS NEEDEO 
[16KIIF SO O THEN RETURN 
IU52EC1IIF NOT WRITE/ERASE/REPLACE 
THEN 00 REAO/ACCeSS/COMPARE EOC 



[EI21 I 

[E12 1 ] 

[EI21 I 
(E1211 
[E121 I 
IE121 1 

[E12I ] 
(E121 1 
IEI21 | 



: (E12I I 



FINISH WRITE/ERASE EDC CALCULATION *»« 

[1BK1IF ZERO THEN RETURN/ELSE XOR O 

[ 1 6KIZAP BUFFER 

[16KI UPDATE BUFFER POINTER AND STORE 

DECR LOOP CNT/LOOP 

FINISH READ/ACCESS/COMPARE EDC CALCULATION *** 

ENTRY POINT FOR COMPARE EOC CALCULATION, R3=SEED,R2 I BAR=BUFFER PTR. RO<W0R0 COUNT 



SHFNLF 


R3 




MOV 


#0 


BUF 


INC 


R2 


R2.BAR 


DEC 


RO 





XOR\LF 
INC 



(BUF) ,R3 
R2, R2.BAR 



(16KIIF ZERO THEN RETURN/ELSE 00 XOR 
UPDATe BUFFER POINTER 
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005222 
00S223 



031440 
053440 



OOOOOO 
OOOOOO 



1 15220 
137777 



U.R1R0: MOV\R 
. PACE 



RO 
RO.RO 



%JMP 
KRET 
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U.CKEB ; OECR LOOP CNT/LOOP 



; [E121 ] 
: [E121 ] 



K<*F 
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EDC CALCULATION ROUTINE 



ROUTINE NAME: 

U.CKTC (CHECK TRANSFER COUNT) 



PAGE 255 



FUNCTIONAL DESCIPTION: 

THIS ROUTINE WILL LOAD THE CURRENT HOST TRANSFER COUNT (HI AND LO) 
AND OR THEM TOGETHER AS A TEST FOR TRANSFER COMPLETE. 



UBAR 



POINTER TO SDI CONTROL BLOCK 



005224 010545 

005225 010545 
00522S 033701 
005227 013141 



00701 S 


125573 


U 


CKTC: 


ADO 


O17015 


1 15574 






ADD 


000003 


O1OO0O 






MOV 


OOOOOO 


137777 






OR 

. PAGE 



OUTPUTS : 

TRANSFER COUNT LO IN R1 
TRANSFER COUNT HI IN RO 
ZERO CONDITION CODE SET ON OR OF RO , R 1 



#SOI . XH,UBAR\N, BAR 7.CALL S.LDRO 
#SDI . XL ,UBAR\N,BAR %JZRO S.LDR1 
(BUF) ,R1 
R0,R1\N %RET 



RO=HI TRANSFER COUNT REMAINING 

R1=L0 TRANSFER COUNT REMAINING 

R1:L0 TRANSFER COUNT REMAINING 

[US2EC110R TOGETHER IN R1/RETURN 



; (ei21 ] 
; (E121 1 
; [E 121 1 

i [E121 ] 



Q 
< 

3 

o 

II 

2 
cc 
O 

LL 

V) 

o 
to 



( 
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UBAR 
OUTPUTS : 



005230 01054S 0O7O22 13S602 U.XCMP: ADO 

005231 01344O OOOOOO 112166 NOP 



FUNCTIONAL DESCRIPTION: 

THIS ROUTINE PROCESSES THE COMPLETION OF A MSCP COMMAND 



POINTER TO SOI CONTROL BLOCK 



#501 ■ po. ubarxn , bar '/.call s ld10 ; riosptr to active pkt 

%jmp u.opcd ; Mexico to op code dispatcher 
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UBAR -> SDI CONTROL BLOCK 
RIO = MSCP PACKET POINTER 



005232 






U.MINT: ASSUME 


PAGESZ,EQ,S12. 




005232 


033740 


00000 1 


OOOOOO 


MOV 


#1 , RO 






005233 


010S45 


007 1 1 5 


1356 16 


ADD 


#MAP . ST 


UBAR\N 


, BAR 


005234 


010545 


007 103 


1 35630 


AOD 


#MAP .MO 


UBARXN 


.BAR 


00523S 


010545 


007 104 


125830 


ADD 


#MAP .Ml 


UBAR\N 


, BAR 


005236 


010545 


007 105 


135630 


ADD 


#MAP .RO 


UBARXN 


, BAR 


005237 


010550 


007012 


135574 


ADD 


#P BUFO 


R10\N, 


BAR 


005240 


010545 


O071O7 


OOOOOO 


ADD 


#MAP .OF 


UBARXN 


, BAR 


OOS241 


1 1554 1 


003376 


OOOOOO 


AND 


#OFFMSK 


R1XN, BUF 


0OS242 


010545 


007 1 1 1 


125620 


ADD 


#MAP . VO 


UBARXN 


, BAR 


005243 


010550 


007013 


125574 


ADD 


#P.BUF1 


R10XN, 


BAR 


005244 


010545 


007 1 12 


125620 


ADD 


#MAP . V 1 


UBARXN 


, BAR 


005245 


010550 


00701 4 


135574 


ADD 


#P.BUF2 


R10XN , 


BAR 


00524S 


010545 


007 1 13 


135620 


ADD 


#MAP . V2 


UBARXN 


, BAR 


005247 


0105SO 


007015 


125574 


ADD 


#P. BUF3 


RIOXN, 


BAR 


005250 


010545 


0071 14 


125620 


ADO 


#MAP . V3 


UBARXN 


, BAR 










; debug 


temp k jk 




005251 


O10S50 


007002 


125574 


add 


nip.crf 


r lOXn, 


iar 


0OS252 


O10550 


007OO3 


135574 


add 


#p . erf 1 


r 10\n, 


bar 










; end debug 






0O5253 


010550 


007010 


125574 


AOD 


#P . BCNO 


RIOXN, 


BAR 


005254 


010550 


00701 1 


125573 


ADD 


#P . BCNI 


RIOXN, 


BAR 


005255 








ASSUME 


PAGESZ.E0.SI2. 




OOS255 


133742 


000002 


124127 


MOV 


#PAGES2 


R2 




OOS256 


010545 


007106 


125620 


ADD 


#MAP . UR 


UBARXN 


, BAR 


OOS257 


010545 


007107 


125574 


ADD 


#MAP . OF 


UBARXN 


.BAR 


005260 


030140 


000001 


OOOOOO 


ADD 


R1 , RO 






005261 


103740 


010002 


105265 


MOV 


#PAGESZ 







005262 


1 3 1040 


OOOOOO 


OOOOOO 


SUB 


0,R0 






005263 


033760 


020001 


155265 


MOV\T 


#1 ,R0 






005264 


033740 


000002 


OOOOOO 


MOV 


#2,R0 






005265 


010545 


007 106 


135574 U .MINI : ADD 


#MAP. UR 


UBARXN 


, BAR 


005266 


030 1 4 1 


OOOOOO 


135 620 


ADD 


RO.RI 






005267 


01O54S 


007107 


135573 


ADD 


#MAP. OF 


UBARXN 


, BAR 


005270 


010545 


0071 10 


OOOOOO 


ADO 


»MAP . S 1 


UBARXN 


, BAR 


00527 1 


131040 


OOOOOO 


135616 


SUB 


0, RO 






005272 


01 3440 


OOOOOO 


115314 


NOP 









%CALL S.STRO 



%CALL 
7.CALL 
7.CALL 
7.CALL 



%CALL 
7.CALL 
•/.CALL 

•/.CALL 
•/.CALL 
•'.CALL 
"/.CALL 

7.ca1 1 
7.ca1 1 

7.CALL 
%CALL 

•'.CALL 
7.CALL 
'/.CALL 

%JZRO 

%JCRV 

7.CALL 
7.CALL 

••'.CALL 

7.CALL 
7. J MP 



.CLRB 
. CLRB 
.CLRB 
. LDR1 



S .STR1 
S. LDR1 
S .STR1 
S. LDR1 
S STR1 
S. LDR1 
S.STR1 

S. Idr 1 
S . Idr 1 

S . LDR1 
S . LDRO 

DIV512 
S .STR1 
S. LDR1 

U .MINI 

U .MINI 

S . LDR1 
S .STR1 
S . LDRO 

S . STRO 
U . PTEL 



: [QOA] 

; NOTE THAT MAPPING INIT 

[9DA1CLEAR MAP REG O 
(QDA)CLEAR MAP REG I 
IODAICLEAR #REAO PTE'S 
[0DA1W0RD BUF DESCRIPT 
[0DA1P0INT TO OFFSET FIELD 
[0DA1GET OFFSET 
tODAIVIRT ADD WORD O 
tODAIWORD 1 BUF DESCIPT 
(ODAJVIRT AOD WORD 1 
tODAIWORD 2 BUF DESCIPT 
[ODAIMAP REG BASE WORD I 
[0DA1W0RD 3 BUF DESCIPT 
[ODAIMAP REG BASE WORD 2 

;display ref number lo 
;disp1ay ref number hi 

; [OOAIFOR DIVIDE 
;[0DA1 DITTO 

i IE121 1 

IODAIGET NUMBER OF PTE'S NEEDED ; I E I 2 1 1 

[0DA1ST0RE NUMBER NEEDED 

[QDAIGET OFFSET 

[ODAJGET (OFFSET+REM) 

[Q0A1GET PAGE SIZE/IF ZERO THEN DONE 

I9DA1C0MPARE WITH PAGE SIZE 

[ODA1LESS THAN OR EOUAL TO PAGE S I 2E AOD 1 

[90AIGREATER THAN PAGE SIZE ADD 2 

IODAIGET UNREAD PTE'S 

IODAISTORE IT BACK/RETURN 

(ODAIGET OFFSET 

[OOAIPOINT TO LOC FOR SEGMENT I SIZE 

tOOAJSTORE SEGMENT 1 SIZE 

[ODAIREAO IN FIRST SET OF PTE'S 



o 
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THE FOLLOWING COOE PERFORMS A LEFT SHIFT OF A 32 BIT QUANTITY. 

IT DEPENDS ON THE FACT THAT THE 9 REGISTER SHIFTS IN ZEROES AND 

SHIFTS OUT TO THE BIT BUCKET AND THAT THE REGISTER BANK DOES TRUE ROTATES. 



OOS273 

005273 
005274 
005275 
00527S 

005277 
005300 
005301 
005302 
005303 
OOS304 
00530S 
005306 
005307 



ASSUME MAPVAL ,E0. BIT15 



010545 
013440 
1 10440 
034540 

070 140 
070 140 
070140 
070140 
073440 
053441 
10SS41 
134S41 
O03O4O 



007102 
007000 
007000 
030177 

000000 
000000 
000000 
000000 

oooooo 
oooooi 

000375 
000376 
OOOOOO 



135573 

135574 
135573 
00531 1 

135310 
135310 
1353 10 
135310 
135310 
125310 
10O0O 
OOOOOO 
127777 



AOD 
MOV 
INC 
AND 

AOD\L 

ADOXL 

ADO\L 

ADD\L 

MOV\L 

MOV\R 

BIC 

AND 

BIS 



005310 053441 000001 137777 U.R1R1: MOVXR 



#MAP . NX, UBAR\N, BAR 
RO, BAR 
RO, BAR 
#BIT07- 1 ,R0 

RO.RO 
RO.RO 

RO, RO 

RO.RO 

RO.RO 

R1 , R1 

#177000, R1 ,0 

#177000, R1 

RO.O 

R1.R1 



".CALL 

%CALL 
''.CALL 

7.JNMSB 

•/.CALL 
'/.CALL 
'/.CALL 

'.CALL 
•'.CALL 
•/.CALL 



%RET 

•/.RET 



LDRO 
L0R1 
LDRO 
INVM 

R1R1 
R1R1 
R1R1 

R1R1 
R1R1 
R1R1 



(00A1GET POINTER TO CURRENT ENTRV 
(QOAIGET LOW ORDER PTE AT THAT LOCATION 
(QOAIGET HIGH ORDER PTE AT THAT L0CME121 



\~.sT 



ISOLATE HIGH PFN IN RO . 

IF NO VALID BIT THEN ERROR 

shift RO left 9, R1 right 7 



RO<15:9> has PTE<22:16> 



Q<8:0> = 

11(11:1) 



PTE<15 :7> 
: PTE< 6 : 0> 



= PTE<22:7> 



[E122] 
[E122I 

[E121 I 
[E121 I 
[E121 ] 

t E 121 ] 
IE121 ] 
I E 121 ] 
[E121 ] 
[E121 ] 
IE121 ] 

[E121 1 
[E121 ] 



00002S 

005311 013740 

005312 033743 

005313 034442 



At this point, the valid bit in the mapping register has 
been detected to be off. This is a Host Buffer Access Error 
(see MSCP sec. 8.4) Since it has not yet accessed the bus, it 
does not return a log error message. This error is treated like 
the other host buffer errors that do not involve bus accesses i.e 
odd byte count (sc.odb) and odd transfer address t sc . odt ) . 

The jump into the par table is strictly to unwind the stack. 



drop u.getp ret on floor 
load error code [rae9-c1193 
return to whoever called 
u.bset. from there jump 
to error handling. 











; beg i 


n 


[qdal 














INVPOP 




= P0P2 - 7400 






002025 


127777 


u 


i nvm : 


mov 




# i nvpop , par 




%ret 


00025 1 


010000 


u 


i nva : 


mov 




#<st . hst +sc . imr > 


r3 




000602 


127777 






clr 




p2 ffrupf 




7. ret 



end I qda 1 



KDB50. MICROCODE . .22-APR-19S8 1 1 : 16:48.97 



KDBUP DIGITAL EQUIPMENT CORP 

EDC CALCULATION ROUTINE 



2901 ASSEMBLER VERSION 32 



PAGE 259 



OOS31 4 

00531 5 
0053 1 6 
005317 
005320 

00532 1 
005322 
005323 
005324 
005325 
005326 
005327 
005330 
005331 
005332 
005333 
005334 
005335 
005336 
005337 
005340 
005341 
005342 
OOS343 
005344 
005345 
005346 
005347 
005350 
O05351 
OOS352 
005353 
OOS354 
005355 
OOS356 
005357 
005360 
005361 
005362 
005363 
005364 
005365 
005366 
005367 
005370 
005371 
005372 
005373 
00S374 
005375 
005376 
005377 
0O540O 
005401 

KDBUP 



010545 
010545 
033701 
013440 
010545 
010545 
033740 
145547 
103660 
031440 
005640 
010545 
010545 
030040 
130461 
033446 
010545 
030141 
003441 
010545 
013440 
010545 
033446 
010545 
003441 
010545 
1 12540 
033760 
175540 
013740 
104640 
033447 
O10545 
013440 
033767 
033445 
013740 
010S45 
055542 
131 140 
010545 
O10545 
010545 
070142 
O3014O 
130461 
010545 
010545 
010545 
010545 
013740 
01 4440 
010545 
033707 



007103 
017104 
000003 
010000 
007 1 1 1 
007 1 12 
000007 
010200 
040200 
OOOOOO 
0O0OO3 
007 1 13 
007 1 14 
OOOOOO 
020001 
OOOOOO 
007 1 1 1 
000007 
00O0O1 
007 1 12 
OOOOOO 
007103 
OOOOOO 
007104 
000001 
007106 
000042 
020104 
000200 
007244 
0O0300 
0O0005 
007101 
OOOOOO 
01OO2S 
000007 
007244 
0071O6 
000001 
0OOO02 
007105 
007 1 1 1 
007 1 12 
0OO002 
OOO002 
0200O1 

007 1 1 1 

0071 12 
007101 
007102 
007246 
013000 
007006 
OO0003 



135574 
015341 
010000 
01 5341 
135572 
1 25601 
OOOOOO 
145326 
045325 
105323 
OOOOOO 
135573 
135574 
OOOOOO 
145333 
010000 
125616 
OIOOOO 
135541 
125813 
105345 
125573 
OIOOOO 
125574 
135541 
125573 
010000 
055351 
OIOOOO 
135616 
OOOOOO 
OOOOOO 
1 25577 
125835 
052071 
OOOOOO 
135575 
125573 
OOOOOO 
13561 6 
135621 
125573 
135574 
OOOOOO 
OOOOOO 
145372 
125616 
125620 
125574 
135620 
135574 
127777 
OOOOOO 
1 15051 



AOO 


#MAP .MO. UBAR\N 


BAR 


ADD 


#MAP .Ml , UBARXN 


BAR 


MOV 


(BUF) ,R1 




NOP 






ADD 


#MAP . VO, UBAR\N 


BAR 


ADD 


#MAP . VI , UBAR\N 


BAR 


MOV 


#7. ,R0 




BIC\ROF 


#BIT1S,R7 




BIS\T 


#BIT15,0 




DEC 


RO 




BIC 


#MAPMSK,0 




ADD 


#MAP . V2,UBAR\N 


BAR 


ADD 


#MAP . V3.U8ARXN 


BAR 


ADD 


0, RO 




INC\T 


R1 




MOV 


RO, IUAR 




ADD 


#MAP. VO, UBARXN 


BAR 


ADD 


R7.R1 




MOV 


R1 ,0 




ADD 


#MAP . VI , UBARXN 


BAR 


NOP 






ADD 


#MAP .MO, UBARXN 


BAR 


MOV 


RO, IUAR 




ADD 


#MAP .Ml .UBARXN 


BAR 


MOV 


R1 .0 




ADD 


#MAP.UR. UBARXN 


BAR 


CMP 


#MEMSZ,R0 




MOV\T 


#MEMSZ»2,R0 




BICXL 


#BIT15,R0 




MOV 


#MAPSAV,BAR 




AND 


#BANOT,Q 




MOV 


UBAR, R7 




ADD 


#MAP . CH , UBARXN 


BAR 


NOP 






MOV\T 


#ER . MRR, R7 




MOV 


R7, UBAR 




MOV 


#MAPSAV , BAR 




ADO 


#MAP . UR, UBARXN 


BAR 


BIC\R 


#BITO0,R2 




SUB 


R2.R0 




ADO 


#MAP.RD, UBARXN 


BAR 


ADD 


#MAP . VO, UBARXN 


BAR 


ADO 


#MAP .VI, UBARXN 


BAR 


ADD\L 


R2.R2 




ADO 


R2, RO 




INC\T 


R1 




ADD 


#MAP . VO, UBARXN 


BAR 


ADD 


#MAP .VI, UBARXN 


BAR 


ADD 


#MAP . CH , UBARXN 


BAR 


ADD 


#MAP . NX , UBARXN 


BAR 


MOV 


#MAPFLG, BAR 




CLR 


RO,BUF 




AOO 


#SDI . UB , UBARXN 


BAR 


MOV 


(BUF ) ,R7 





7.CALL 
7.JNZR0 

7.JNZR0 

•/.CALL 
7.CALL 

%JZR0 
7.TLSB 
%JMP 

SCJLL 
%CALL 

%TCRY 

•/.CALL 

7.CALL 
"/.CALL 
7. J MP 
'/.CALL 

•'.CALL 
".CALL 
7.CALL 

7.JNCRY 

%CALL 



'/.CALL 
%CALL 

7.JNZR0 

ICALL 
'/.CALL 

•'.CALL 
%CALL 
•/.CALL 

•'.CALL 



%TCRV 
7.CALL 
•'.CALL 
7.CALL 
7.CALL 
'/.CALL 
7.RZR0 



S. L0R1 
U.PTL2 

U . PTL2 
S . LDOO 
S . LDR7 

U . PTL4 

U. PTL3 

S. LDRO 
S. LDR1 



S . STRO 

S SXAB 

S .STOO 
U . PTL5 
S . LDRO 

S . LDR1 
S .SXAB 
S . LDRO 



[ODAIGET ADDRE OF NEXT UNREAD PTE 

tODAIIF NOT ZERO NOT THE FIRST TIME 

[ODAIGET HIGH AODR OF NEXT UNREAD PTE 

(ODAIIF NOT ZERO NOT THE FIRST TIME 

[ODAIGET LOW ORDER MAP REG HUM 

[ODAIGET HIGH ORDER MAP REF NUM 

[ODAISHIFT COUNT 

[QDA100UBLE RIGHT SHIFT R7.0/CLEAR BIT15 R7 

[ODAIIF LSB OF R7 THE SET MSB OF 

[QOAJOeCR LOOP COUNT/JUMP 

[QDA1CLEAR BITS O AND 1 

[ODAIGET LOW ORDER BASE ADDR 

[ODAIGET HIGH OROER BASE ADDR 

[OOAJAOD LOW ORDERS 

[0DA1TAKE CARE OF CARRY 

[BDA1SET LOW ORDER 

I0DA1ST0RE MAP REGISTER ADDRESS LOW 

[ODAIGET HIGH ORDER 

[ODAISAVE R1 AND SET HIGH BITS 

[QDAISTORE MAP REGISTER ADDRESS HIGH 



LDR2 
LDRO 

STRO 
STR2 

LDRO 
LDR1 



STRO 
STR1 
L0R1 
STR1 
LDR1 



7.JMP 



[ODAJGET LOW MAPPIN 
[BOAISET UP ADDR RE 
[ODAIGET HIGH MAPPI 
[0DA1SAVE R1/SET IN 
[ODAIGET UNREAD PTE 
[QDAICOMPARE WITH A 
[OOA] [ch03]REA0 WHA 
[QOAIREAD ALL THAT 
[ODAISAVE RO FOR LA 
[BOA] MAKE SURE BI 
(ODAISAVE UBAR 
[00A1P0INT TO BUFFE 
(QOAIREAD IN THE PT 
[QDAIERROR IF NOT Z 
[QDA1REST0RE UBAR 
[Q0A1REST0RS NUMBER 
(ODAIGET NUMBER OF 
[0DA1DIV R2/2 TO GE 
[OOAISUBTRACT NUM R 
[0DA1RESET NUMBER 
[ODAIGET LOW BASE 
[ODAIGET HIGH BASE 
[OOAIADJUST FOR OUA 
[OOAIBUMP IT 
[QOAlADO THE CARRY 
[QDAISTORE IT BACK 
[QDAISTORE IT BACK 
[ODAIGET ADDRESS OF 
[QOAIMAKE THE NEXT 
[QDA1P0INT TO MAPPI 
(QOAIMAKE SURE ZERO 
E0DA3REST0RE R7 
(Q0A1AND JUMP BACK 



G REGISTER 

GS 

NG REGISTER 

HIGH BITS 

S 
VAILA8LE MEM 
T WE CAN OR 

LEFT 
TER USE 
TS 14,15 OF HIGH ARE ZER 



E'S 

ERO Irae4-C119l 

OF PTE'S REAO 
UNREAD PTE'S 

NUMBER OF PTE'S READ/U 
EAO/UNUSEO FROM TOT AND 

PTE'S READ AND UNUSED 
F MAP REG 
OF MAP REG 
D WORD 



USED 
TORE 



,n 



BEGINNING OF CACHE 
ENTRY BE AT THE BEGINNIN 
NG FLAG 

RETURN CODE/DO RETURN I 

TO MAPPING ROUTINE 



..J 
I/RETURN 

' CALLED 
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SBTTL U.PROC XFC ROUTINES 
* I9-JUNE-S2 UDAS2 MICROCODE 
ROUTINE NAME: 
U . XFCP 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE IS ENTERED WHEN THE U PROCESSOR IDLE LOOP 
DETECTS A PROC REOUEST FOR XFC SERVICE. IT ANALYZES THE XFC 
CODE IN R11 AND VECTORS TO THE APPROPRIATE XFC HANDLER. WHEN THE ROUTINE 
IS COMPLETE IT WILL CLEAR OXFC IN RLL THEREBY RELEASING THE D.PROC. 



INPUTS : 

Rl I 
RLL 

OUTPUTS : 
Rl 1 
RLL 



XFC COOE FROM PROC 
SYSTEM STATUS REGISTER 



XFC STATUS AS APPROPRIATE 
CLEAREO OXFC BIT 





OO5402 


033740 


010324 


127777 


Q 
< 

a 

M 

5 
<r 
o 

u. 


OO5403 


011551 


OO0O22 


000000 


OOS404 


033771 


O30O2I 


045405 


OO540S 


030140 


0000 1 1 


OIOOOO 


005406 


013440 


002OOO 


OIOOOO 










V) 

o 











MOV #<UP XFC-XFCUPR- 1 XLOBVT, RO %R2R0 ; IF NO XFC THEN RETURN 

R11 MUST BE PRESERVED BECAUSE THIS CODE MAY BE ENTERED MANY TIMES 

SUBC »XFCMAX.R1 1\N 

MOV\T »XFCFIN.RI1 UTNMSB 

ADD Rl I . RO 

MOV RO.PAR 

.PAGE 



IF XFC EXCEEDS MAX LIMIT 

THEN XFC=XPC DONE VALUE 
ROsJUMP TABLE ADDRESS 
GO 00 U.PROC XFC ROUTINE 
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ROUTINE NAME: 
UXFC11 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL PERFORM THE READ AND WRITE UNIBUS MEMORY XFC 



DM REGISTER O 

DM REGISTER 1 

DM REGISTER 2 

DM REGISTER 3 



LO ORDER UNIBUS ADORESS 
HI ORDER UNIBUS ADDRESS 
NUMBER OF WOROS TO TRANSFER 
DM BUFFER ADORESS 






OUTPUTS : 

DATA READ/WRITTEN FROM/TO THE HOST 

DM REGISTER EDC CALCULATED 

DM REGISTER I O - SUCCESSFUL 

1 - NONEXISTENT UNIBUS MEMORY 

2 - UNIBUS PARITY ERROR 



DATA READ/WRITE 



OOS407 
0054 10 
00S41 1 

OOS4 1 2 
005413 
005414 
OOS41S 
0054 1 6 
005417 
005420 
OOS421 
005422 



013740 
013740 
013740 

033740 

133540 
121 140 
033767 
013740 
013451 
033271 
013740 
13S544 



0O70O7 
007001 
007003 

00036S 
000002 
O07O05 
02001 4 
007002 
OO0O1 1 
OIOOI 1 
007007 
000020 



125600 

125536 
135577 

10000 
000000 
OIOOOO 
1S2071 
135573 
135634 
055421 
135620 
137777 



UXFC1 1 
UXFC12 
UXFCRW 



MOV 


#1 , R1 1 


T.JMP 


UXFCRW 


EXECUT 


CLR 


R1 1 


JJMP 


UXFCRW 


EXECUT 


MOV 


#0MREG0, BAR 


•/.CALL 


S . LDIU 


IUARsL 


MOV 


CDMREG1 , BAR 


•/.CALL 


S SXB1 


Rt =HI 


MOV 


#0MREG3, BAR 


•'.CALL 


S . LDUB 


UBARsS 


VALIDATE OM BUFFER ADDRESS - MUST BE >= DM. BEG * 


MOV 


#0M.BEG+0MSTR8L0BYT,RO 




( 1 SK ] C 


BIS 


•DM. BEGSHIBYT 


no 




[ 16K1R 


SUB 


UBAR\0, SO, BAR 






IF UBA 


MOV\T 


#ER. OMX, R7 


%JCRY 


U , UERR 


THEN 


MOV 


#DMREG2 , BAR 


•/.CALL 


S . LDRO 


ELSE 


TST 


R1 1 


7.CALL 


UXFUIO 


GO 00 


MOV\T 


0, R1 1 


7.TNZR0 




IF ERR 


MOV 


UDMREGO, BAR 


7.CALL 


S.STR1 


OM REG 


BIC 


#DXFC,RLL 


54RET 




RELEAS 


. PAGE 











rED IN JUMP TABLE 
TED IN JUMP TABLE 
LO UNIBUS ADDRESS 

UNIBUS ADDRESS 
SUFFER ADDRESS 
** * 

CONSTRUCT DM. BEG IN RO 
ROsOM LOWER LIMIT 
AR =< RO (DM. BEG) 
FATAL ERROR 
RO'WORO COUNT 

REAO/WRITE 
ROR THEN SET R1 1 

GETS CALCULATED EDC 
SE PROC/RETURN 
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ROUTINE NAME: 
UXFC13 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL PERFORM THE PERFORM ECC CORRECTION XFC. 



INPUTS : 

OM REGISTER O 
DM REGISTER 2 



POINTER TO BUFFER CONTROL AREA 
SIZE OF SECTOR IN WORDS 



OUTPUTS: 

OM REGISTER O 
OM REGISTER 1 



NUMBER OF CORRECTIONS MADE 

- SUCCESSFUL COMPLETION 

1 - UNSUCCESSFUL COMPLETION 



0054 
0054 
0054 
0054 



033707 
013740 
01374O 
033451 



OOO603 
007134 
007007 
000003 



126450 
125573 
135616 
1 15453 



;MOV #0MREGO,BAR %JMP UXFC13 

MOV (BUF),R7 IPRUPF %CALL ECCC 

MOV #ECOUNT,BAR "/.CALL S.LORO 

MOV #DMREGO,BAR %CALL S.STRO 

MOV R3.R11 T.JMP UXF16B 



EXECUTED IN JUMP TABLE 
GO 00 ECC CORRECTION 
ROi#SYM80LS IN ERROR 
SAVE IN OM REG 1 
RlliERROR STATUS/EXIT 



Q 
< 

a 
ii 

s 

cc 
o 

LL. 

co 
o 

co 

-I 
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c 



FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL PERFORM THE SEND DATA XFC. 



DM REGISTER 

DM REGISTER 1 



OUTPUTS : 

DM REGISTER I 



DM REGISTER 2 



POINTER TO DATA BUFFER TO SEND 
SIZE OF OATA BUFFER IN WORDS 



- SUCCESSFUL COMPLETION 

1 - I/O ERROR ON DATA TRANSFER 
NUMBER OF WORDS TRANSFERRED 



005427 
OOS430 
005431 
005432 
OOS433 
005434 
005435 
005436 
0O5437 
0O5440 
005441 
005442 
005443 
005444 
005445 



03371O 
013740 
073701 
105 60 
11114 2 
0334S2 
13740 
013740 
0O4240 
016567 
033760 
033740 
03344 1 
013440 
03345O 



000003 
017001 
000O03 
007010 
000001 
023001 
O07002 
OO7O07 
OOOOOO 
10 14 6 
1001 1 
OOOOOO 
OO0010 
007007 
OOOOOI 



010000 
137777 
OOOOOO 
13SS75 
OOOOOO 
145435 
125621 
125577 
133375 
075634 
045443 
O 10000 
125453 
1 23713 
I 12420 



UXFC14: 
UXF14A: 



MOV 
MOV 
MOV 
MOV\L 
ADD 
SUB 
MOV\T 
MOV 
MOV 
CLR 
XOR\T 
MOV\T 
MOV 
MOV 
MOV 
MOV 
. PAGE 



#MROUE. R7, BAR 

(BUF I ,R10 

#DMREG I.BAR %R2R0 

(BUF) ,R1 

#P .BCN0,R10\N, BAR %CALL 

R1 , R2\N 

Rl , R2, BUF 

#DMR6G2.BAR 

0DMREGO, BAR 



#MROUE, R7VN 

#ST .HST, 

#ST . SUC , 

RIO, Rl 

R7. BAR 

Rl . RIO 



, RO 



%TCRY 




"/.CALL 


S .STR2 


•/.CALL 


S . LDUB 


%CALL 


U.MIOB 


%CNZRO 


UXFUIO 


•/.JNZRO 


UXF14B 


•iCALt 


UXF16B 


%CALL 


U . ULNK 


%JMP 


U . C2EP 



EXECUTED IN JUMP TABLE 
R1O=I/0 OUEUE HEAD 
IF NO I/O CMD THEN RETURN 
R1=XFC REOUEST BYTE COUNT 
R2sI/0 PKT BYTE COUNT 
IF XFC REO LEO THEN RESET 
I16K] THEN P.SCNOsXFC BYTE COUNT 
[ tSKlOM R2=BYTE COUNT 
UBARsOM BUFFER ADDRESS 
[16K1G0 CALC UNIBUS I/O PARAMS 
IF RO NEO O THEN GO 00 I/O 
IF ERROR THEN CONTINUE 
ELSE RO=SUCCESS CODE 
SAVE RIO IN Rl/CLR 'OXFC 
GO UNLINK PKT 
RESTORE PKT PTR/GO CHG TO ENO PKT/RETURN 
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FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL PERFORM THE RECEIVE OATA XFC. 

I NPUTS : 

OM REGISTER O 
DM REGISTER I 



POINTER TO DATA BUFFER TO FILL 
SIZE OF DATA BUFFER IN WOROS 



OUTPUTS : 

DM REGISTER I 
OM REGISTER 2 



O - SUCCESSFUL COMPLETION 
NUMBER OF WORDS TRANSFERRED 



UXFCI5:;M0V »MWOUE . R7 . BAR %JMP UXF14A ; EXECUTED IN JUMP TABLE 
. PAGE 



o 
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ROUTINE NAME: 
UXFC16 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL PERFORM THE CONVERT LBN, RBN, OBN, 
CONVERSION XFC. 



o 



DM REGISTER O 
DM REGISTER 1 



POINTER TO 12 WORD CONVERSION TABLE 
POINTER TO SUBUNIT CHARACTERISTICS BLOCK 



OUTPUTS : 

CONVERSION DATA IN TABLE POINTED TO BV OM REGISTER 

R11 ZERO FOR ALL CONVERSIONS ARE SUCCESSFUL BY DEFAULT 



005446 
005447 
005450 
00545 I 
OOS452 



013T40 
033746 
013740 

131543 
03344S 



007007 
000040 
007001 
000063 
000007 



135601 
126672 
135576 
125612 
122430 



;MOV 
MOV 
MOV 
MOV 
SUB 
MOV 



005453 135544 000020 137777 UXF1SB: BIC 



#5, R3 

ODMREGO, BAR 
#CNVTV1 ,R6 
#DMREG1 , BAR 
#SOI . HI , R3 
R7, UBAR 
#DXFC,RLl 



%JMP 


UXFC16 ; 


7.CALL 


S.LDR7 ; 


'/.CALL 


ECMOVE ; 


7.CALL 


S.L0R3 ; 


".CALL 


S . CL 1 1 ; 


".CALL 


U.CNVT ] 


%RET 





EXECUTED IN JUMP TABLE 

R7<PTR TO CONVERSION TABLE 

R6»PTR TO U.CNVT PARAMS/GO SET THEM UP 

R3=SUBUNIT CHAR PTR 

ADJUST START OF SUBUNIT CHAR/CLR R11 

UBARiRESULT PTR/GO DO CONVERSION 

RELEASE .PROC/RETURN 
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ROUTINE NAME: 
UXFC17 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL PERFORM THE EXIT DM MODE XFC. 



OM REGISTER O 



- O 

- NONZERO 



NORMAL DM EXIT 
FATAL DM ERROR 



OUTPUTS : 

EXIT FROM DM MODE 



OOS454 
OOS455 
OOS456 
005457 
OOS460 



013740 
033767 
133540 
033441 
013440 



007007 
010014 
000075 
000005 
000000 



125574 
04207 1 
135534 
125544 
131072 



Q 
< 



135544 000120 101500 



;MOV #<16384. -0M.BEG>8L0BYT,RO %JMP UXFC17; [ 1 6K I EXECUTEO IN JUMP TABLE 
MOV #DMREGO,BAR %CALL S.LDR1 I ROsDM EXIT FLAG 

MOV\T #ER.DMX,R7 %JNZRO U.UERR ; IF NONZERO THEN FATAL ANO STOP 
BIS #< 16384 . -DM. BEG>8HIBYT, RO 5SCALL S.FUNB; [ 1 6K 1 RO t UPPER HALF OF LOOP 
MOV UBAR.R1 '/.CALL S . ZBUF ; [1 SKI GO ZAP THE BUFFER 

NOP %CALL S.SSDI ; GO RESET ALL SOI CONTROL BLKS 

NOTE THE FOLLOWING I NSTRUCT I ON DOES A JUMP TO U.STRT INSTEAD OF 
RETURNING AS IT SHOULD. THE 2901 STACK DOES RAP AROUND SO THIS 
MISUSE SHOULO NOT CAUSE ANY HARM 

BIC #<DM00E!0XFO,RLL 7.JMP U.STRT ; [16K1EXIT 0M0DE8XFC/RESTART 
. PAGE 



CO 

o 

C/) 



f • 
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c 

v/ 



Q 
< 

a 
ii 
s 

EC 

o 

LL 
« 

o 



FUNCTIONAL DESCRIPTION: 

THIS ROUTINE WILL PERFORM THE INCREMENT STUD STATUS XFC. 

INPUTS : 

NONE 

OUTPUTS: 

INCREMENTED STUD STATUS 



005462 
OOS463 

005464 
005465 
005465 



005466 
005467 
005470 



133540 
033706 
013440 



007002 
000003 
023006 



010000 

12561 1 
005466 



10440 007000 



013740 
03371 1 
033551 



007275 
OOOO03 
000300 



010000 
OOOOOO 
OOOOOO 



;MOV 
BIS 
MOV 
MOV 

ASSUME 
INC 



MOV 
MOV 
BIS 



#0M.8EG+0STSLaL0BYT.RO %JMP UXFC16 i [ 1 6K 1 EXECUTED IN VECTOR TABLE 

#DM.BEG*OSTSLSHIBYT.RO,BAR 

(BUFI.R6 %CALL S.INC6 

R6.BUF 7.JNCRV 10$ 

OSTSH, EO, DSTSL-H 

RO, BAR 7.JMP 5$ 



#BUFP49 . BAR 

( SUF ) , R1 1 

#<C00VER*BITOS>ILOBYT,R11 



[ 1 6K1 RO, BARsPTR TO LO DUST STATUS 

INCREMENT LO/HI STUD STATUS 

IF NO CARRV THEN DONE 

[161MAKE SURE STATUS SEQUENTIAL 

I1SKI ELSE INCR HI WORD 



[E122] 
[E1221 



IE122] 

HW ver [E1221 

[E122] 

[E 1221 



133551 0001 14 105453 



generate new report of SW version 

and controller model 

DMREG1 (alias error status) s 

<1S:10> s controller model number [ E 1 22 ] 

<9:6> s sw code version [E1221 

<5:0> = hw rev level Iei221 

get hardware rev level [E122] 

[E122] 
[E122] 
[6122] 



;op in low byte bits of SW ver 
; or in model bits and hi bits of SW ver 
#<<CM00EL*BIT1O> I < COOVER* B I T06 > >8H I B V T , R1 1 %JMP UXF16B 
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.SBTTL U.PROC AND D . PROC SUBROUTINES 
:+ 29-JULY-S3 UDASO-A VERSION 5 MICROCODE 
ROUTINE NAMES: 
P . LOCK 
UNLOCK 

FUNCTIONAL DESCRIPTION: 

P. LOCK WILL WAIT FOR THE ALTERNATE PROCESSOR TO SET THE 'PLOCK' BIT 
IN THE CONTROL REGISTER IMAGE (RLLI. IT WILL THEN CLEAR THE 'PLOCK' BIT 
IN THE RLL TO LOCK OUT THE ALTERNATE PROCESSOR. 

UNLOCK WILL SET THE 'PLOCK' BIT IN RLL, EFFECTIVELY UNLOCKING THE 
ALTERNATE PROCESSOR. 



INPUTS : 



CONTROL REGISTER IMAGE 



OUTPUTS: 

P. LOCK ■ ALTERNATE PROCESSOR LOCKED OUT OF MUTEXED DATA AREAS 
UNLOCK - ALTERNATE PROCESSOR FREE TO USE MUTEXEO DATA AREAS 

STACK LEVEL: 

NONE USED 



005472 

005472 013440 

005473 050 144 

005474 133544 



O2000O 

000004 



ASSUME 
137777 P.LCKA: NOP 
1 15472 P . LOCK: AOD\R 

137777 UNLOCK: BIS 

PAGE 



PLOCK, EQ, BIT15 
RLL, RLL 
•PLOCK. RLL 



%RCRY 
%JMP 



PLOCK MUST BE MSB 

IF OTHER PROC FREE THEN RETURN 

IF OTHER PROCESSOR MUTEXING 

SET PLOCK/RETURN 



o 



KDBSO. MICROCODE. .22-APR-19SS 11:16:48.97 



KOBUP DIGITAL EOUIPMENT CORP. 

.PROC AND O.PROC SUBROUTINES 



2901 ASSEMBLER VERSION 32 



ROUTINE NAME: 

U.GMST (U.PROC GET MUTEXED SOI STATUS I 
O.GMST (D.PROC GET MUTEXED SOI STATUS) 

FUNCTIONAL DESCRIPTION: 

THESE ROUTINES WILL LOCK OUT THE OPPOSITE PROCESSOR (USING THE 
PLOCK BIT IN RLL), LOAD THE SDI STATUS (FROM SOI.STI INTO RO OR R11, 
AND RETURN. IT SHOULD BE NOTED THAT IT IS THE CALLER'S RESPONSIBILITY 
TO FREE THE OPPOSITE PROCESSOR 
BY EITHER CALLING UNLOCK OR BY PERFROMING THE FOLLOWING INSTRUCTION: 

BIS #PLOCK,RLL 

INPUTS : 

UBAR POINTING TO SOI CONTROL BLOCK OF INTEREST 
OBAR POINTING TO SDI CONTROL SLOCK OF INTEREST 

OUTPUTS : 

SDI STATUS IN RO 

SOI STATUS IN R11 

LOCKED OUT U.PROC OR O.PROC 

STACK LEVEL: 

NONE USED 



b 



OOS47S 

00547S 



010545 
0501 44 



027000 

000004 



1 15573 
10547S 



ADD 
ADDVR 



#SDI .ST,UBAR\N, BAR %JCRY S.LDRO 
RLL, RLL %JMP .-1 



THEN RO = SDI STATUS / RETURN 
IF PLOCK (BIT15) IS ONE 
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ROUTINE NAME : 

U.MODL 

FUNCTIONAL DESCRIPTION 

This routine ORs in the Controller Mode 1 number into the Controller I 
and stores it. This is jumped to from U.SCID which is located in a fixed 
location to allow manufacturing to blast the controller serial number into 
the PROM . When ' the ODA got assigned model "13" the code required changing 
to accomodate the low order bit . 



005477 033540 000022 103370 



#CMODEL , RO 



set the mode 1 /Store/return 



[ rae04 1 
[ r ae04 ] 
[rae04] 
[ rae04 ] 
[ rae04 ] 
[ r ae04 ] 
[ rae04 I 
[ rae04 ] 
[rae04] 
[ rae04 ] 
[ rae04 ] 
( rae04 ] 
[ r ae04 ] 



L> 
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FUNCTIONAL DESCRIPTION: 

THESE ROUTINES ROTATE THE VALUE IN REGISTER R1/R7 RIGHT THE 
NUMBER OF TIMES INDICATED IN REGISTER 0. THIS IS THE UNIBUS PROCESSOR'S 
ROTATE RIGHT ROUTINE. 



INPUTS : 



005500 

OO550 1 



005502 
005503 



053441 
00 1 240 



053447 
001240 



010001 

000000 



01O007 

oooooo 



127777 
1 15500 



127777 
105502 



005504 003740 000010 105501 



R1/R7 




OUTPUTS : 

R1/R7 



STACK LEVEL: 

NONE USED 



SHF\R 
S . RRR! : DEC 



SHF\R 
DEC 



S . SWB1 : MOV 

. PAGE 



VALUE TO BE ROTATED RIGHT 

THE NUMBER OF TIMES TO ROTATE R1 RIGHT 



INPUT VALUE ROTATED RIGHT 



%RZRO 
%JMP 


. - 1 


7.RZR0 
%JMP 


. - 1 


%JMP 


S RRR 1 



; SHIFT R1 RIGHT/IF = O THEN RETURN 
; E C R 



; SHIFT R7 RIGHT/IF = O THEN RETURN 
; DECR 



BVTE SWAP ROUTINE 



KDB50. MICROCODE.. 22- APR-1983 II lf:<l 17 



KDBUP 
U.PROC AND 



OIGITAL EOUIPMENT CORP. 
. PROC SUBROUTINES 



2901 ASSEMBLER VERSION 32 



PAGE 273 



Q 










3 


OOS505 


010S45 


00700S 


125572 


OOS506 








a 


O05S06 


013740 


01 3000 


137777 


1! 


OOS507 


O1O640 


007002 


125575 


s 

O 

u. 


005S 1 


O13760 


013000 


07551S 


O0551 1 


013240 


007000 


10000 


005512 


O03700 


010003 


0I5S0B 


OOS5 13 


013440 


OOOOOO 


127777 


<A 










<) 


00551 4 


033702 


000003 


O10O00 


V) 


0055 1 5 


013740 


13000 


137777 


-1 


0055 1 B 


025544 


OOOOOI 


010000 




OOS5 17 


010544 


O470O3 


155516 




005520 


013440 


003002 


O 10000 




00552 1 


030544 


000003 


137777 



ROUTINE NAME: 

S.RELC (RELEASE BUFFER CONTROL BLOCKS) 
S.RELF (RELEASE DATA BUFFER) 

FUNCTIONAL DESCRIPTION: 

S.RELC - THIS ROUTINE WILL RELEASE THE RING OF BUFFER CONTROL 
BLOCKS ASSIGNED TO A SOI CONTROL BLOCK USING THE RING POINTER STORED 
IN SDI . UB . 

S.RELF - THIS ROUTINE WILL RELEASE THE OATA BUFFER POINTED TO 
BV (BUF). IF THE CONTENTS OF (8UF) ARE ZERO THEN NO OATA BUFFER EXISTS. 

INPUTS : 



UBAR 
BAR 



POINTER TO SOI CONTROL BLOCK (S.RELC AND S.RELF) 
POINTS TO POINTER TO BUFFER (S.RELF) 



[E121 1 
[EI21 1 

[E121 1 
[E121 ] 
16 12 1 ] 
(EI21 ] 



OUTPUTS : 

UPDATED BUFFER AVAILABLE COUNTER 

R2 AND ARE USEO AS TEMPORARV REGISTERS 

STACK LEVEL: 

ONE USEO 



ADD 


#SOI UB . UBARXN. 


BAR %CALL S . LOO 


ASSUME 


BUF . NL . EO, 




MOV 


#0, BUF 


%R2R0 


ADO 


#BUF .BP , 0\N , BAR 


7.CALL S.LDR2 


MOV\T 


#0, BUF 


%CNZRO S.RELD 


MOV 


O.BAR 




MOV 


(BUF) ,0 


%JNZRO S.RLBA 


NOP 




%RET 


RELEASE 


BUFFER POINTED 


TO BV (BUF) «*« 


MOV 


( BUF ) ,R2 




MOV 


#0, BUF 


7.RZR0 


BIC 


»1 . RLL\0 




ADO\F 


03, RLL\N , BAR 


%JNLSB . - 1 


MOV 


R2. BUF 




AOO 


#3,RLL 


"/.RET 


PAGE 







OsPTR TO BUFFER CHAIN 

MAKE SURE BUF.NL IS ZERO 

[16K]IF ZERO THEN RETURN/CLR PTR 

I16K]R2=ADD OF DATA SUFR 

I16K1CLEAR BUF.BP/RELEASE BUFFER 

BAR*BUFFER POINTER 

[16KJIF PTR NEO O THEN LOOP 

[1SKI ELSE RETURN 



[ V05] I 1 6K1R2=BUFFER POINTER 

[ I6K] INDICATE BUFFER RELEASED 

I 16KI IF BUFFER LOCK SET 

I 16K! THEN WAIT 

(16KI ELSE PUT PTR BACK ON STACK 

[16KIUP0ATE STK PTR/REMOVE BLOCK/RETURN 
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ROUTINE NAME: 

S.SDIO IGETS ADDRESS OF SDI.1 I N RO ) 
S.SDI1 (GETS ADDRESS OF SDI.I IN UBARI 

FUNCTIONAL DESCRIPTION: 

THESE ROUTINES WILL LOAD THE ADDRESS OF SDI.I IN EITHER UBAR 
OR RO. 



*fc*«^' 



OUTPUTS: 

UBAR 
RO 



ADDRESS OF SDI . 1 
ADDRESS OF SDI . 1 



005522 
005523 



0OS524 

005525 



005526 
005527 



033745 
133545 



033740 
133S40 



0337S1 

133SS1 



000355 
000002 



000355 
O0OOO2 



O0O3SS 

000002 



10000 

127777 



010000 

127777 



OIOOOO 
127777 



MOV 
BIS 



MOV 
BIS 



S .SOI 1 : MOV 
BIS 
. PAGE 



#SOI 

ffSDI 



#SDI 
#SDI 



1BL0BYT.UBAR 
1SHIBYT , UBAR %RET 



1BL0BYT, RO 
1BHIBYT.R0 %RET 



#SDI .1BL0BYT.R11 

#SOI . KHISYT.R1 1 SRET 



UBARsLO S0I.1 ADDRESS 
SET IN HI ADDRESS/RETURN 



RO>LO SOI . 1 ADDRESS 

SET IN HI ADORESS/RETURN 



R1 1 HO SDI . 1 ADDRESS 

SET IN HI ADDRESS/RETURN 
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ROUTINE NAME: 
S . FMB1 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE FORMS THE ADDRESS OF THE FIRST SECTOR OATA BUFFER. 

INPUTS: 

NONE 



OUTPUTS : 
RO 



ADDRESS OF FIRST DATA BUFFER 



STACK LEVEL: 

NONE USED 



005530 03374O 0002S5 OOOOOO S . FMB 1 : MOV #BUFR 1 . a L OS YT , RO 

005531 133540 OOO0 1 2 137777 BIS #BUFR 1 . BH I BYT , RO '/.RET 

. PAGE 



; ROsBUFR #1 ADOR LO 

; RO sBUFFER AOOR/RETURN 



a 
< 

a 

ii 

2 

o 

u. 
CO 

o 

to 



i 
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ROUTINE NAME: 
S . FBC1 



PACE 276 



FUNCTIONAL DESCRIPTION: 

THIS ROUTINE FORMS THE ADORESS OF THE FIRST BUFFER CONTROL BLOCK. 

INPUTS: 

NONE 



OUTPUTS : 
RO 



STACK LEVEL: 

NONE USED 



ADDRESS OF FIRST BUFFER CONTROL BLOCK 



005532 
OOSS33 



033740 O00055 O1O00O S.FBC1: 
133540 000004 127777 



MOV 
BIS 
. PAGE 



#SUFBEG«L0BYT,RO 
#BUFBEGSHIBYT, RO %RET 



; [16K!R0=BUFR CNTRL BLK #1 ADOR LO 
; {I6K]R0=BUFR CNTRL BLK AODR/RETURN 



Q 
< 

D 

o 

II 

2 

<r 

O 

u. 

CO 
O 
CO 
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ROUTINE NAME: 
S . PUNB 
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FUNCTIONAL DESCRIPTION: 

THIS ROUTINE FORMS THE ADORESS OF DM BEG IN UBAR 



OUTPUTS : 

UBAR 



STACK LEVEL : 

NONE USEO 



ADDRESS OF OM.BEG 



005534 033745 00O352 OOOOOO S.FUNB: MOV »DM . BEG8 L OBYT , UBAR 

005535 133S45 000002 127777 BIS »DM . BE G8H I 6 YT . UBAR %R6T 

. PAGE 



[16K]UBAR=L0 ADOR OF OM BEG 
[16K]UBAR:HI ADOR OF OM.BEG 
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ROUT INE NAME : 

S.SXAB (SET EXTENDED ADDRESS BITS) 



PACE 278 



FUNCTIONAL DESCRIPTION: 

ROUTINE S.SXAB WILL SET THE EXTENOED ADDRESS BITS FROM R1 
INTO THE CONTROL REGISTER. 







EXTENOED UNIBUS ADDRESS BITS 



OUTPUTS: 

UPDATED CR 



STACK LEVEL : 

NONE USED 



005536 


033446 


000006 


010000 


S .SXB1 : 


MOV 


IUAR, IUAR 






005537 


033701 


000003 


105541 




MOV 


(BUF) ,R1 


%JMP 


S SXAB 


OOS540 


0314S1 


020001 


055541 


S . AXAB: 


OEC\T 


R1 


%TNCRV 




1 4O0OO 








BANOT : 


= AC<BA> 








0OSS4 1 


135541 


000300 


000000 


S SXAB: 


BIC 


#<BANOT> ,R1 






OOSS42 


013740 


007262 


1 15620 




MOV 

. PAGE 


#SAVUAR,BAR 


%JMP 


S.STR1 



SHOW IUAR 

GET R1 

IF NO CARRV THEN OECR R1 

ISOLATE HI ADDRESS BITS 
( mjtOS ] SAVE R1 IN SAVUAR 
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ROUTINE NAME: 

S.ZBUF (ZERO BUFFER) 

FUNCTIONAL DESCRIPTION: 

ROUTINE S.ZBUF WILL ZERO THE BUFFER AREA DEFINED BY RO (LENGTH] 
ANO RHBUFFER POINTER). 



INPUTS : 

RO 



OUTPUTS : 

BUFFER ZEROED 



STACK LEVEL : 

ONE LEVEL USED 



WORDS TO ZERO COUNT 
BUFFER POINTER 



305543 013740 013000 137777 

305544 120341 007001 010000 

305545 031440 OOOOOO t05543 



S2BUFA: 
S . ZBUF : 



< 

D 

a 
ii 
s 

cc 
O 

u. 

</) 

o 



MOV 
INCB 

DEC 
. PAGE 



#0,BUF 
R1\0,R1 , BAR 
RO 



%RZRO 
7.JMP 



ZAP WD / IF ROsO THEN RETURN 
BUMP ADORESS, LOAD BAR 
DECREMENT WORD COUNT/LOOP 



I IE121 ] 
; [E121 1 
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ROUTINE NAM!: 
OIVD 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE DIVIDES A 31 BIT UNSIGNED DIVIDEND BY 
UNSIGNED DIVISOR AND RETURNS A QUOTIENT AND REMAINDER. 



A 15 SIT 



R1 = 
RO s 
R2 a 



DIVIDEND LOWER 
DIVIDEND UPPER 

DIVISOR 



OUTPUTS : 

R1 = OUOTIENT 

RO I REMAINDER 

IS USED AS A 



TEMPORARY REGISTER 



005S46 
005547 
005S50 
005551 
005552 
005553 
005554 
005555 
005556 
005557 



034440 
003740 
1 30140 
13 1 140 
030 1 60 
130141 
030141 
001240 
030160 
013440 



OOOOOO 
0O002 1 
010000 
000002 
020002 
000001 
00000 1 
020000 
010000 
OOOOOO 



OOOOOO 

1 15554 
145557 
OOOOOO 
045554 

1 15555 
O1000O 
105550 
OS5551 
127777 



DIVDO : 
DI VO: 
DI VX : 
DIVA: 



DIVB : 
DIVC : 



CLR 

MOV 

ADDCVF 

SUB 

ADDNT 

ADDC 

ADD 

DEC 

ADD\T 

TST 

.PAGE 



RO 

#17 . ,0 
RO, RO 
R2.R0 
R2, RO 
R1 ,R1 
R1 ,R1 


RO.RO 
RO 



7.JMP 

7.JZR0 


DIVB 
DIVXIT 


7.JNCRY 
%JMP 


OIVB 
DIVC 


7.JCRY 

%JNZRO 

%RET 


OIVX 
DIVA 



ZAP RO 

= 17 . 

IF NEO O THEN CONTINUE 

SUB DIVISOR FROM HI DIVIDEND 

IF NO CARRY THEN LOOP 

LEFT SHIFT LO DIVIDENO 

DOUBLE R1 

IF CARRY THEN CONTINUE 

IF NEO O THEN LOOP 

TEST RO/RETURN 



c 
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ROUTINE NAME: 
MULT 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE MULTIPLIES TWO 16 BIT NUMBERS TOGETHER AND RETURNS 
A 16 BIT RESULT. THE MULTIPLICATION PERFORMED IS UNSIGNED. 

INPUTS : 

R6 MULTIPLICAND 
MULTIPLIER 

OUTPUTS : 

R7 IS THE LO ORDER RESULT 





005560 


003700 


000003 


OOOOOO 


MULBYT : 


MOV 


(BUFI ,0 




005561 


004640 


000377 


O10OOO 




AND 


•LOBYT.O 




005562 


034447 


000007 


105564 


MULT : 


CLR 


R7 




005563 


053446 


010006 


127777 


MULTA : 


MOV\R 


R6.R6 




005564 


053446 


000006 


1 OOOO 


MULTB : 


MOV\R 


R6.R6 




OOS565 


030067 


O40O07 


055S66 




ADD\T 


0.R7 


Q 
< 

a 

ii 


OOS5S6 


1 65546 


O0O20O 


1 15563 




BIC\LO 


•BIT15. R6 












. PAGE 




5 
cc 

2 
















V) 

o 

V) 

















%JMP 
"/.RZRO 



%TLSB 
XJMP 



QsBUFFER 

ISOLATE LO BYTE 

ZAP LO ORDER RESULT 

IF EO O THEN RETURN 

DIVIDE RE BY 2 

IF LSB THEN ADD TO R7 

ZAP HI ORDER BIT/CONTINUE 
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ROUTINE NAMES: 

S . LDCR.S . LDOO. ETC . 
FUNCTIONAL DESCRIPTION: 

THESE ROUTINES WILL LOAD THE REGISTER NUMBER SPECIFIED AS THE LAST 
TWO CHARACTERS OF THE SUBROUTINE NAME. I.E. S.LD11 WILL LOAD R11 FROM BUF . 



INPUTS: 

BAR 



POINTER TO THE BUFFER ADDRESS WHOSE DATA IS DESIREO 
TO BE LOADEO IN THE REGISTER 



r "\ 
k„^ 



OUTPUTS : 

REGISTER LOADEO WITH CONTENTS OF BUFFER POINTED TO BY BAR 



005567 


033710 


0OOOO3 


010000 


S 


LOCR 


MOV 


(BUF) 


R10 




005570 


1 13550 


007074 


000000 






BIS 


#LGADR, R10\N 


BAR 


005571 


Ol 3450 


000010 


127777 






TST 


RIO 




7.RET 


005572 


003700 


000O03 


127777 


S 


LDOO 


MOV 


(BUF) 





%RET 


005573 


033700 


000003 


127777 


s 


LDRO 


MOV 


(BUF) 


RO 


%RET 


005574 


033701 


0OOO03 


137777 


s 


LDR1 


MOV 


(BUF) 


R1 


7.RET 


005575 


033702 


000003 


137777 


S 


LDR2 


MOV 


(BUF) 


R2 


•'.RET 


00557S 


033703 


000003 


127777 


s 

S 


LDR3 
LDUB 


MOV 


(BUF) 


R3 


7.RET 


005577 


033705 


000003 


127777 


S 

S 


LDR5 
LOIU 


MOV 


(BUF) 


UBAR 


7.RET 


005600 


033706 


000003 


127777 


S 


L0R6 


MOV 


(BUF) 


IUAR 


'/.RET 


005601 


033707 


0OOOO3 


137777 


s 


LDR7 


MOV 


(BUF) 


R7 


•/.RET 


005602 


033710 


0OOOO3 


137777 


s 


L010 


MOV 


(BUF) 


RIO 


%RET 










; 


... 


SPECIALTY ROUTINES * 


■ * 


OO5603 


014S00 


000003 


137777 


s 


BITO 


BIT 


(BUF) 


RO 


%RET 


005604 


033700 


000003 


000000 


s 


LLBO 


MOV 


(BUF) 


RO 




005605 


034540 


000377 


137777 


s 


MLBO 


AND 


#LOBYT. RO 


%RET 


OOS606 


033706 


000003 


OOOOOO 


s 


LLB6 


MOV 


(BUF) 


R6 




005607 


034S46 


000377 


137777 


s 


MLB6 


AND 


#LOBYT , R6 


7.RET 


005610 


016S00 


000003 


127777 


s 


XORO 


XOR 


(BUF) 


RO\N 


%RET 


0056 1 1 


1 30446 


0O0O06 


127777 


s 


INC6 


INC 


R6 




XRET 


OOS612 


034451 


00001 1 


127777 


s 


CL 1 1 


CLR 
. PAGE 


R1 1 




7.RET 



[NEW ECC1R10: (BUF) 

[NEW ECC1 (BAR) : (BUF) 

[NEW ECCISELECT LOG BUFFER AREA 

0=(BUF) 

RO: (BUF) 

R1 = (BUF) 

R2> (BUF) 

R3> (BUF) 

R5/UBAR: (BUF) 

R6/IUAR: (BUF) 
R7= (BUF) 
RIO: (BUF) 



BIT-TEST BUFFER WITH RO 

RO: (BUF) 

ISOLATE LO BYTE/RETURN 

R6: (BUF) 

ISOLATE LO BYTE/RETURN 

COMPARE BUFFER WITH RO 

INCREMENT R6/RETURN 

ZAP R1 1/RETURN 
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ROUTINE NAMES: 

S .STOO.S .STRO, ETC. 

FUNCTIONAL DESCRIPTION: 

THESE ROUTINES WILL STORE THE THE REGISTER NUMBER SPECIFIED AS THE 
LAST TWO CHARACTERS OF THE SUBROUTINE NAME INTO THE BUFFER LOCATION POINTED 
TO BY BAR, I.E. S.ST11 WILL STORE R11 INTO THE BUFFER. 



INPUTS : 



POINTER TO BUFFER AREA WHERE REGISTER DATA IS 
DESIRED TO BE STORED 



OOS613 


013240 


003000 


127777 


S 


STOO: 


MOV 


0. BUF 


%RET 


005614 


O3370O 


0O0O03 


OOOOOO 


s 


OECB: 


MOV 


(BUF) , RO 




005615 


031440 


OIOOOO 


167777 


s 


OECO: 


DEC\F 


RO 


7.RZR0 


005616 


013440 


003000 


127777 


s 


STRO: 


MOV 


RO, BUF 


7.RET 


OOS617 


034541 


000377 


OOOOOO 


s 


SLB1 : 


AND 


#L0BYT,R1 




OOS620 


013440 


003O01 


137777 


s 


STR1 : 


MOV 


R1 , BUF 


7.RET 


005621 


O13440 


003O02 


137777 


s 


STR2: 


MOV 


R2.BUF 


%RET 


005622 


013440 


003003 


127777 


s 
s 


STR3: 

STUB: 


MOV 


R3.BUF 


'/.RET 


005623 


013440 


0O3005 


127777 


s 

s 


STR5: 
STIU: 


MOV 


RS.SUF 


%RET 


OOS624 


013440 


003006 


127777 


s 


STR6: 


MOV 


IUAR, BUF 


'/.RET 


005625 


013440 


003007 


137777 


s 


STR7: 


MOV 


R7.BUF 


%RET 


005626 


013440 


0O3O1O 


137777 


s 


ST10: 


MOV 


RIO, BUF 


7.RET 


005627 


013440 


0O301 1 


127777 


s 


ST1 1 : 


MOV 


R1 1 , BUF 


%RET 



(BUF) =0 

RO: (BUF) 

IF EO O THEN RETURN ELSE OECR RO 

(BUF) :R0 

ISOLATE LO BYTE OF R1 

(BUF) :R1 

(BUF) :R2 

(BUF) :R3 

I BUF) :R5/UBAR 

(BUF) =R6/IUAR 

(BUF) :R7 

(BUF) cRIO 

STORE R11 INTO BUFFER 
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ROUTINE NAME: 
S . CLRB 
INIT1 
IN ITM1 



(CLEAR BUFFER LOCATION) 
(SET BUFFER LOCATION TO I) 
(SET BUFFER LOCATION TO -II 



FUNCTIONAL DESCRIPTION: 

THE S.CLRB ROUTINE WILL STORE ZERO INTO THE BUFFER POINTED TO 

BV BAR. 

THE INITI ROUTINE PUTS A I IN THE MEMORY LOCATION POINTED TO BV BAR 
THE INITM1 ROUTINE PUTS A -1 IN THE MEMORY LOCATION POINTED TO BY BAR 
««»NOTE THESE ROUTINES CAN BE CALLED BY EITHER PROCESSOR BECAUSE THEY 

USE NO REGISTERS. 



INPUTS : 



BAR 



POINTER TO BUFFER LOCATION TO CLEAR/SET TO 1/-I 



OUTPUTS : 

CLEARED BUFFER LOCATION (S.CLRB) 
1 IN BUFFER LOCATION (INITI) 
-I IN BUFFER LOCATION (INITMI) 



005630 014440 003000 137777 S.CLRB: CLR 

005631 013740 00300 1 137777 INITI: MOV 

005632 017740 003OOO 137777 INITMI: COM 

. PAGE 



. \N , BUF 


%RET 


#1 . BUF 


%RET 


#0. BUF 


%RET 



(BUF) = O/RETURN 
INITIALIZE TO 1/RETURN 
INITIALIZE TO 177777 / RETURN 
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ROUTINE NAME: 

U.PROC PATCH AREA 



PAGE 285 



FUNCTIONAL DESCRIPTION: 

THESE NOP'S WILL PROVIDE A SPACE FOR U.PROC CHANGES SUCH THAT A SMALL 
CHANGE COULD MINIMIZE THE AFFECTED PROMS. 



OUTPUTS : 

NONE 



NOP 
NOP 
NOP 
NOP 



[16KIREM0VE PATCH SPACE 
[EC0»1 )U . PROC PATCH SPACE 
[ECO#l |U .PROC PATCH SPACE 
[ECOol lu . PROC PATCH SPACE 
[ECO»l ]U . PROC PATCH SPACE 
IEC0*2)A0JUST PATCH SPACE 



o 
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; *** ROUTINE UNB.RS RESETS THE UN I BUS , POL L I NG REGISTER, ETC *** 
005633 013440 000660 110252 UNB.RS: NOP IPRBCAI 7.JMP TSTRTN ; [BOA] RESET BCAI AND RETURN 

• page 



o 
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********** 



XX******* 



*x x * x* xxxx* 



This is the bus read routine design. (Note: by convention, an 
unqualified read or write refers to a host read or write. The 
bus read routine is called by the host write routine since the 
data flow is from the host to storage; from the controller's 
perspective, from host memory to controller buffers.) 



Assumpt ions and interf ace : 

1. Mapping has already been done. 



Addresses are contiguous. 



Inputs (same as unb.rdl : 



ubar 

i uar , uar : 



B I Convent ions 



bcai (d/s) 
br eg 



starting internal buffer ptr (dest) 

low 16 bits of external bus address 

for start of transfer. Identical copies. 

byte count for the transfer 



: where addresses and data go into and out of * 
sets up necessary BI logic signals * 



; [E121 ] 
: [E121 ] 



3. Outputs (same as unb.rd) 



CC's reflect value of Q 



upf 
rO 
r 1 



error code 

If rO <> 0, 

q s i means nxm error (time-out) 

q ■ 2 means parity error 

set upf implies timeout, not set 

implies parity. See u.uner 

number of words not transferee! 

On success, transfer will be O . 

EDC 



; [E121 ] 
; [E121 ] 



S i de - ef feet s : 

iuar, uar are changed due to convention differences. 
ubar , bar are advanced . Ubar left at last word + 1 

to maintain existing interface. 
Host data in buffer pointed to by ubar on entry. 
r2 and r3 are not preserved, 
r? and riO used as scratch but original contents saved 

and restored 



************ 
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* * ****** * 



Entry to this routine occurs at subroutine nest level 3. 
Therefore, only one more level of calling is allowed from thi 
code (2911 constraint). 



Subroutines used 

CHKBDR 

SI TO 
Entry po i nt s 



Check for chunk boundary, i , 

over f low . 

BI transfer timeout routine 



the usual entry point is QB.RD for Obus 

UNB.RO is retained to insure that 

code shared by the uda/qda/bda use 

the correct bus read routine. 

UN.BRC is used to avoid resetting 

t he edc res i due . 

UXFUIO extended function code entry 



rfhere lower 16 bits * 



BIRO for BI . 



i EE1 21 ] 
; [E12! ] 
; [E121 ] 



page 



************ 



i iimtitit mi* 
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005634 


03445 1 


OIOOI 1 


1 16242 


UXFUIO : 
UNB . RD : 


CLR 










OB 


RD: 




005635 


033741 


000105 


01 OOOO 


BI 


RD: 


MOV 


OOSS36 


013740 


007034 


OOOOOO 


UN 


8RC: 


MOV 


005637 


O 1 3 7 40 


003013 


010000 






MOV 


005S40 


013740 


007044 


125625 


RD 


OIAG 


i MOV 


00564 I 












ASSUME 


00564 1 


033450 


003010 


10000 






MOV 


005642 


013740 


007262 


125576 






MOV 


005643 


013740 


1 1 6221 


056235 


BI 


RLP : 


MOV\F 


OOS644 


053442 


000660 


OOOOOO 






MOVAR 


005645 


OS5542 


1O003 


106 112 






BICVR 


005 64 6 


1 55542 


0001 40 


OOOOOO 






BIC\R 


005647 


014546 


1001 6 


116113 






BIT 


005650 


053450 


010006 


006 1 14 






MOV\R 


005651 


152447 


0OO006 


1 261 70 






NEG\R 


005652 


1 14544 


000100 


010000 






BIT 


005653 


013440 


10000 


O06 142 






NOP 


O05654 


024447 


OOS566 


OOOOOO 






CLR 


O056SS 


1 I3S43 


005300 


OOOOOO 






BIS 


0056S6 


1 30447 


000767 


010000 






INC 


O05657 
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#EOSEED , R 1 
#FAILUR, BAR 
#ER.MST, BUF 

#CNVTV3, BAR 
<CNVTV4S17>.E0,CCNVTV3B 
RIO, RIO, BUF 
#SAVUAR,BAR 



PAGE 233 



XFC ENTRY 

UDA COMPATIBLE 

OOA COMPATIBLE 

R1 WILL CONTAIN EDC 

IN CASE BI STOP OCCURS 

LOAD ERROR CODE INTO LAST FAILURE 



'-CALL 
17>tl 



SAVE R7 ANO RIO 



7.CALL S.LDR3 i 
#<B . LEO+B . NABO+B . NRTY> , BREG %JSTOP BI.STO 



RO.R2 URBCAI 

#3, R2 

#60000, R2 

#16, IUAR 

IUAR, RIO 

IUAR, R7 

#OMODE,RLL 

IUAR\0 , R7 , BCAI D CPLAOO 
#0W,R3\N, BCAID 
R7 CHADD 

BIRDCM.EO, 1 



SJZRO 
7.JNZR0 

"'.CALL 



BIR. N 
B I R . S 
CHKBDR 



%JNZRO DM.RD 



IUAR EXTENSION 



1 IF STOP, THEN HANG HERE 
ELSE SET EVEN ADDRESS, SELF-T 



OK, 



RETRV 



clear 



some 
rest 



ABORT 
R2 = # LONGWORDS 
R2 : # OUADWORDS 8 
R2 a # OCTAWORDS S 
BR IF NO OCTAWORDS 
BR IF NOT ON OCTAWORO BOUNOAR 
OK TO READ OWDS - CHECK PG OV 
IF WE ARE IN DIAG MODE 
USE SPECIAL ROUTINE 
LOAO LO ADDR, SET R7:0 
SET OWORD XFER BITS IN HI ADR 
STORE IN BCAI/SET R7 = 1 



TO BE HERE WE MUST HAVE SOME OCTAWORDS TO REAO AND BE ON AN OCTAWORO BOUNDARY 



OOS657 
00566O 

005661 
005662 
005663 
005664 
OOS66S 

005666 
O05667 
005670 
OOS67 1 



021342 
073447 

035547 
03014S 
004545 
130443 
000640 

035S47 
0301 46 

13 1545 
130443 



005547 
010420 

OOOO 17 
000007 
02OO17 
00OO03 
002004 

00001 7 
000007 
020010 
0OOOO3 



O1O0O0 
I 15666 

10000 
OOOOOO 
005665 
OOOOOO 
OOOOOO 

10000 
OOOOOO 
016061 

1 0606 I 



DECB 
MOV\L 

BIC 
AOD 
ANO 
INC 
AOD 

BIC 
ADD 
SUB 
INC 



R7\0, R2, BCAID 
RO, R7 



PLCOM 

(PGORD 



#17 , R7 

R7. IUAR 

•17, UBAR.O 

R3 

• 8IR0BR-74OO, 0. PAR 

#17, R7 
R7 , IUAR 
#8 . . UBAR 



"iJNCRY 20$ 



%JNCRY 
%JMP 



BIR. LW 
8 1R . LW 



LOAO READ COMMAND, predecr ct 

start 1st owd ra, copy WC to 

one octawd is a special case 

assume no errors will occur, 

update BI addr too 

: block offset of internal 

Handle 64K seg ovflo 

Branch into u 1 1 r a - opt i m i zed 

read loop 

semi -dup 1 i cat e of above code 

update BI addr to end of loop 

bias UBAR for loop 



o 



; [E l 21 
; [E121 
; [E121 
; [ E 1 2 1 

EST; [El 
; [ E 1 2 1 

; 1E121 
bits; [ 
of the 
; I E 1 2 1 
Y; [E121 
FLO; [El 
; [E121 
; [E121 
; [E121 

; [E1 21 
; [E121 
; [E121 
; [E121 
; [E 121 
; IE 12 1 
; [81.21 
BC temp 
; [E 12 1 

; [E121 

; [E12I 
buf . [E l: 
; [E12 I 
; [E121 
; [E 121 
; [El 21 
; (6121 
.(£121 
; [E121 
; [E 12 i 



1211 
; [E12 



1 1 
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Ultra-optimized read loop takes maximum advantage 
feature of storing into local buffer memory. That' 
loops here - the correct one is selected based on 
of the starting loca 1 buffer address . Each loop it 
so a 16-way branch is actually taken. 

Entry into this loop is via the PAR table in uppe 
are all of the form : 



of the auto-increment 
i are actually eight 

the low-order bits 
is two entry points, 



r memory. The 16 PAR entries 



; [E121 ] 
; in 121 1 
; [6121 ] 
; (1121 ] 
; IE121 ] 
; EE121 1 

; [Gi2i ] 
; [ei21 ] 






OOS672 

005673 

OOS674 
005675 
005876 
005677 
005700 

00S701 
005702 
005703 
005704 
0O5705 

005706 

005707 

0OS710 
OOS7 1 1 
005712 
OOS713 
0057 14 

005715 

OOS716 
005717 
005720 
005721 
005722 

005723 
005724 

005725 
005726 
005727 
005730 
OOS731 



031442 
030145 



140422 

017507 



076S01 00371S 

076501 163015 

033747 160010 

031442 140422 

030145 017507 



076501 
076501 
033747 
031442 
013440 

031442 
030145 

076S01 
076S01 
033747 
031442 

0301 45 

076501 
010545 
076501 
033747 
031442 
013440 

031442 
O30145 

076501 
076501 
033747 
031442 
030145 



0037 15 
163015 
1 60010 
140422 
OOOOOO 

140422 
017507 

003715 

1 63015 
1 60O1O 
140422 

017507 

0037 IS 
007007 

1 63015 
1 60010 
140422 
OOOOOO 

140422 
017507 

0037 15 
163015 

1 60010 
140422 
017S07 



006065 
1060S2 

1 26067 
01 5677 
126201 
006065 
1 06052 

12 6067 
015672 
126201 
105673 
1 1 6O6S 

0O6065 
106052 

126067 
015713 
126201 
006065 
106OS2 

126067 
0100OO 
O05706 
126201 
1 15707 
1 1 6065 

006065 
1O6052 

126067 
0OS73O 

126201 
006065 
106052 



BR00LP : 
BROOLX : 



BIRD08 
BROSLP 



BR01LP : 
SR01LX : 



BIRD09 
BROSLP 



BR02LP: 
BR02LX . 



BIRO 10 
BR10LP 



DEC 
AOO 

XORXL 

XORXL 

MOV 

DEC 

ADD 

XORXL 

XORXL 

MOV 

OEC 

NOP 

DEC 
ADD 

XORXL 
XOR\L 
MOV 

DEC 
ADD 

XORXL 

ADD 

XOR\L 

MOV 

DEC 

NOP 

DEC 
ADS 

XORXL 
XOR\L 
MOV 
DEC 

ADD 



R7.UBAR, BAR 

(BCAIS) ,R1 ,BUF 

(BCAIS ) , R1 . BUF 

#8. , R7 

R2 

R7, U8AR, BAR 

(BCAIS! , R1 . BUF 
(BCAIS) , R1 , BUF 
#8. ,R7 
R2 



R7 , UBAR, BAR 

(BCAIS ! . R1 , BUF 

(BCAIS) . R1 , BUF 

#8. ,R7 

R2 

R7, UBAR, BAR 

(BCAIS) ,R1 , BUF 
#7, UBAR\N,BAR 
(BCAIS) , R1 , BUF 



R2 

R7. UBAR, BAR 

(BCAIS) , R1 , BUF 
(BCAIS) , Rl , BUF 
#8. , R7 
R2 

R7, UBAR, BAR 



COORD 
IPROFST 



GPGORD 
IPROFST 



IPGORD 
(PRDFST 



IPGORD 
IPRDFST 



•/.JMERR 
%JZRO 



BI . UDX 
BIR. L2 



•/.CALL BIR.6W 

•/.JCDONE BR08LP 
%CNCOONE BI . TO 
7.JMERR BI.UDX 
7.J2RO BIR.L2 

%CALL BIR.6W 

7.JCD0NE BROOLP 
%CNCOONE BI .TO 
7.JNMERR BROOLX 
7.JMP BI.UDX 

•/.JMERR BI.UDX 
%'JZRO BIR.L2 

7.CALL BIR.6W 

'/.JCDONE BR09LP 
7.CNCD0NE BI . TO 
%JMERR BI . UDX 
%JZRO BIR.L2 



IPRDNXT 7.CALL B I R . 6W 

7.JCD0NE BR01LP 

7.CNCD0NB SI . TO 

IPGORD 7.JNMERR BR01LX 

7.JMP BI.UDX 



IPGORD 
(PRDFST 



IPGORD 
IPRDFST 



%JMERR BI .UDX 

7.J2R0 BIR.L2 

'/.CALL BIR.6W 

7.JCD0NE BR10LP 
7.CNCD0NE BI . TO 

%JMERR BI.UDX 

7.JZR0 BIR.L2 



OOS732 076501 0O3715 126O70 



XOR\L (BCAIS) ,R1 , BUF IPRDNXT 7.CALL 



BIR. 5W 



; IE 1 2 1 1 
; IE121 1 
; (£121 1 
deer owd ct , Start ovlp rd, br if orr;[E12Jll 
upd buf adr , init BCAI rd ptr,;[E121] 
br out if 2d- f r am- l ast owd ;[E121] 
Read 7 words into local buf f er ; [ E 1 2 1 1 
Read last wd , br if ovlp BI rd done;[E121) 
R7=8, wait for ovlp rd to f i n i sh ; [ E 1 2 1 ] 
deer owd ct , Start ovlp rd, br if err;[E12 r ] 
upd buf adr, init BCAI rd pt r , ; [ E 1 2 1 1 
br out if 2d- from- last owd ;[£121] 
Read 7 words into local buf f er ; I E 1 2 1 ] 
Read last wd , br if ovlp BI rd done;[E121 
R7 = s, wait for ovlp rd to f i ni sh ; [ E 1 2 1 I 
deer owd ct , start ovlp rd, br if err;[E12|M 
Exit if BI error ME1211 

; [E121 ] 
deer owd ct , start ovlp rd, br if err;[E12|U 
upd buf adr, init BCAI rd ptr,;[E121] 
br out if 2d- from- last owd ;[E1211 
Read 7 words into local buf f er ; [ E 1 2 1 1 
Read last wd, br if ovlp 81 rd done; [E1!t] 
R7a8, wait for ovlp rd to f i ni sh ; [ E 1 2 1 1 
deer owd ct , start ovlp rd, br if err;[E12 r ] 
upd buf adr, init BCAI rd ptr,;[E121] 
br out if 2d-from-last owd ;[E121] 
Read 7 words into local buf f er ; [ E 1 2 1 ] 
Block ovflo here - update BAR ;[E121] 
Read last wd , br if ovlp BI rd done;[E1211 
R7=S, wait for ovlp rd to f i n i sh ; I E 1 2 1 ] 
deer owd ct , start ovlp rd, br if err;(E12 
Exit if BI error ; [E121 1 

; [E121 1 
deer owd ct , start ovlp rd, br if err;[E12 
upd buf adr, init BCAI rd ptr,;{E121] 
br out if 2d-from-last owd ;[E121] 
Read 7 words into local buf f er ; E E 1 2 1 1 
Read last wd , br if ovlp BI rd done; 1EI21] 
R7s8, wait for ovlp rd to f i n i sh ; t E 1 2 1 1 
deer owd ct , start ovlp rd, br if err;(E12 
upd buf adr, init BCAI rd ptr,;[E121] 
br out if 2d-from-last owd ;[E121] 
Read 6 words into local buf f er ; E E 1 2 1 ] 
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005733 
005734 

O05735 
005736 
005737 



O0574O 

00574 1 

OOS742 
OOS743 
005744 

O05745 
005746 

005747 
005750 

00575 1 
005752 
O05753 
005754 



OOS755 
0057SS 

005757 
005760 
005761 
005762 
005763 

OOS764 
OOS765 
005766 
005767 
OOS770 
OOS771 



01O54S 
076501 
033747 
031 442 
013440 



031442 
030145 

076601 

076S01 
033747 
031442 
030145 

076501 
010545 
076501 
033747 
031442 
01 3440 



031442 
030145 

076501 

076501 
033747 
031442 
030145 

076S01 

010545 
076501 
033747 
031442 
01344O 



007006 
163015 
1 600 10 
1 40422 
OOOOOO 



140422 
017SO7 

0037 15 
1 63015 
1 60O1O 
140422 
O17S07 

003715 
007005 
163015 
1 60010 
1 40422 
OOOOOO 



140422 
017507 

0037 15 
163015 
1 60010 
140422 
017507 

003715 
007004 
1 6 30 1 S 
1 60010 
140422 
OOOOOO 



126074 
015723 
126201 

10S724 
1 1 6065 



006065 

106052 



BR03LP: 
BR03LX: 



126067 

015745 

126201 BIRD1 1 : 

006065 BR1 1 LP: 

106052 

136071 

136073 

01S740 

12S201 BIRD03 

10574 1 

1 1 6065 



006065 
106052 



BR04LP : 
BR04LX: 



126067 

015762 

126201 BIRD 1 2 : 

OO6065 BR12LP; 

106052 

136072 

136072 

005755 

126201 BIRD04 

105756 

1 16065 



ADD 

X0R\L 

MOV 

OEC 
NOP 



DEC 
ADD 

X0R\L 

XORYL 

MOV 

DEC 

ADO 

X0R\L 

ADO 

XORXL 

MOV 
DEC 
NOP 



OEC 
ADO 

XORM 
X0R\L 
MOV 

OEC 
ADD 

XOR\L 

ADD 

XOR\L 

MOV 

DEC 

NOP 



#6 , UBARXN , BAR 

( BCAIS ) , Rl . BUF 

#8 . , R7 

R2 IPGORD 



7.CALL BIR.1W 
7.JCD0NE BR02LP 
7.CNCD0NE BI .TO 
7.JNMERR BR02LX 
7.JMP BI . UDX 



Handle block ovflo, read 1 wd ;(E121] 
Read last wd , br if ovlp BI rd done;[E121] 
lit for ovlp rd to f i n i sh ; E E 1 2 1 1 



owd ct , start ovlp rd, 
if 81 error 



R7, UBAR, BAR 

(BCAIS) ,R1 , BUF 

(BCAIS) , R1 , BUF 

#8 . , R7 

R2 

R7, UBAR, BAR 

(BCAIS I , Rl , BUF 
#5 , UBARXN , BAR 
( BCAIS) ,R1 ,BUF 
#8 . , R7 
R2 



R7.UBAR, BAR 



IPGORD 
IPROFST 



IPGORD 
IPRDFST 



7.JMERR 
7.JZR0 



BI . UDX 
BIR. L2 



%CALL BIR.6W 

7.JCD0NE BR11LP 
"iCNCDONE BI .TO 
%JMERR BI . UDX 
7.J2R0 6IR.L2 

HCALL BIR.4W 

"/.CALL BIR.2W 

%JCOONE BR03LP 
XCNCDONE BI.TO 
7.JNMERR BR03LX 
7.JMP BI . UDX 



br if err ; [EI2 
; EE121 ! 
; EE121 ] 
; EE121 1 

deer owd ct , start ovlp rd, br if err;IE12 
upd buf adr, init BCAI rd ptr,;[E121) 
br out if 2d-from-last owd ;[E121] 
Read 7 words into local buf f er ; [ E 1 2 1 ] 
Read last wd, br if ovlp BI rd done;[E121] 
R7=8, wait for ovlp rd to f i n i sh ; [ E 1 2 1 1 
deer owd ct , start ovlp rd, br if err;[ei2 
upd buf adr, init BCAI rd ptr,;[E121l 
br out if 2d-from-last owd ;[E1211 
Read 5 words into local buf f er ; [ B 1 2 1 ] 
Handle block ovflo, read 2 wds;[E121] 
Read last wd, br if ovlp 81 rd done;[E121] 
R7:8, wait for ovlp rd to finish; IE121] 
deer owd ct , start ovlp rd 
Exit if BI error 



jr 



j 



IPGORD 
(PRDFST 



"/.JMERR 
7.JZR0 



81 .UDX 
BIR. L2 



005772 031442 1 40422 O06065 BROSLP: DEC 

005773 030145 017S07 106052 BROSLX: ADD 



(BCAIS) ,R1 .BUF IPRDNXT 

(BCAIS) , Rl ,BUF 

#8. ,R7 

R2 IPGORD 

R7, UBAR, BAR IPRDFST 

(BCAIS I ,R1 , BUF (PRDNXT 

#4, UBARXN, BAR 

(BCAIS) ,R1 , BUF 

#8 . ,R7 

R2 IPGORD 



R7 , UBAR , BAR 



7.CALL BIR.6W 

7.JCD0NE BR12LP 
7.CNCD0N6 BI.TO 
7.JMERR BI . UDX 
7.J2R0 BIR.L2 

7.CALL BIR.3W 

%CALL BIR.3W 

%JCD0NE BR04LP 
7.CNCD0NE BI , TO 
7.JNMERR BR04LX 
7.JMP BI .UDX 



Start ovlp rd. 



err ; [El 2 
; (Bi 21 J 
; [E12U 

; [E121 1 
br if err ; [E12 



deer owd ct . 

upd buf adr, init BCAI rd ptr,;[E1211 
br out if 2d-from-last owd ;[E121] 
Read 7 words into local buf f er ; [ E 1 2 1 1 
Read last wd, br if ovlp BI rd done;[E121] 
R7s8, wait for ovlp rd to f i n i sh ; [ E 1 2 1 1 
deer owd ct , start ovlp rd, br if err;[E12 
upd buf adr, init BCAI rd ptr,;[E121] 
br out if 2d - from- last owd ;[E121] 
Read 4 words into local buf f er ; I E 1 2 1 ] 
Handle block ovflo, read 3 wds;[Et21] 
Read last wd, br if ovlp BI rd done;[E1211 
R7=8, wait for ovlp rd to f i ni sh ; [ E 1 21 ] 
deer owd ct , start ovlp rd, br if err; [E12 
Exit if BI error 



%JMERR 
7.J2R0 



SI . UDX 
BIR. L2 



005774 
005775 
005776 
005777 
OO6000 



076501 
076501 
033747 
031442 
0301 45 



006001 076501 

006002 01054S 

006003 07650t 

006004 033747 

KDBUP 



003715 
1 63015 
16O0 1O 
140422 
017507 

003715 
O070O3 
1 63015 
1 60010 



126067 
005777 
126201 
006058 
106052 

126073 
126071 
005772 
126201 



BIRD1 3 
BR13LP 



XORXL 

XORXL 

MOV 

DEC 

ADD 

XORXL 

ADD 

XORXL 

MOV 



(BCAIS) , R1 , BUF 
(BCAIS) ,R1 ,BUP 



R7, UBAR, BAR 

(8CAIS) ,R1 , BUF 
#3, UBARXN, BAR 
(BCAIS) ,R1 , BUF 
#8. ,R7 



IPGORD 
IPRDFST 



7.CALL BIR.6W 
iiJCOONE BR13LP 
%CNC00NE BI.TO 
7. JMERR 8 I .UDX 
7.JZR0 8IR.L2 

7.CALL SIR.2W 
•/.CALL BIR.4W 
7.JCD0NE BROSLP 
7.CNCD0NE BI.TO 



; (E121 ] 
; [E121 ] 
; [E121 ] 
if err ; 



[E12 



deer owd ct , start ovlp rd, 
upd buf adr, init BCAI rd ptr,;[E121] 
br out if 2d-from-last owd ;[E121] 
Read 7 words into local buf f er ; [ E 1 2 1 ] 
Read last wd, br if ovlp 81 rd done; [E12I 
R7s8, wait for ovlp rd to finish; [E12I) 
deer owd ct , start ovlp rd, br if err;[E1'3l 
upd buf adr, init 8CAI rd ptr,;[E121] 
br out if 2d- from- last owd ;[E121] 
Read 3 words into local buf f er ; [ E 1 2 1 I 
Handle block ovflo, read 4 wds; [E12I] 
Read last wd , br if ovlp BI rd done; [EI21) 
R7b8, wait for ovlp rd to f i n i sh ; [ E 1 2 1 1 



1 



I 
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006005 


031442 


140422 


1 1S773 




DEC 


R2 




(PGORD 


7.JNMERR 


BR05LX 


0O60O6 


01 3440 


000000 


1 1 6065 




NOP 








%JMP 


BI . UOX 


OO60O7 


031442 


1 40422 


OO6065 


BR06LP : 


DEC 


R2 




(PGORD 


%JMERR 


BI . UDX 


OO601O 


030145 


017507 


106052 


BR06LX : 


ADD 


R7, UBAR 


BAR 


(PRDFST 


7.JZR0 


B I R . L 2 


OO60 1 1 


076501 


003715 


126067 




XORU 


(BCAIS) 


R1 , BUF 


(PRDNXT 


•'.CALL 


SIR . 6W ; 


0060 1 2 


076SO 1 


163015 


01 6014 




XORU 


(BCAIS) 


R1 , BUF 




7.JC00NE 


BR14LP 


00601 3 


033747 


1 600 10 


126201 


BIRD14 : 


MOV 


#8 . , R7 






%CNCOONE B I . TO 


006014 


03 1442 


140422 


006065 


BR 1 4LP : 


DEC 


R2 




(PGORO 


"/.JMERR 


B I . UDX i 


0060 IS 


030145 


017507 


106052 




ADD 


R7 , UBAR 


BAR 


(PRDFST 


7.JZR0 


SIR. 12 ; 


OO60 1 6 


O76S01 


003715 


136074 




X0R\L 


(BCAIS) 


R 1 , BUF 


(PRONXT 


'/.CALL 


BIR . 1W ; 


00601 7 


010S45 


007002 


126070 




AOO 


#2, UBAR\N , BAR 




%CALL 


6 I R . 5W ; 


006020 


076501 


1 630IS 


006007 




XORU 


(BCAIS) 


Rl .BUF 




•/.jcdone 


BROSLP 


00602 1 


033747 


1 600 10 


126201 


BIR006: 


MOV 


#8 . ,R7 






7. C N C D N E 6 1. TO 


0O6022 


03 1442 


140422 


106010 




DEC 


R2 




CPGORD 


%JNMERR 


BROSLX ; 


006023 


01 3440 


000000 


1 1 6085 




NOP 








%JMP 


BI . UDX ; 


0O6024 


031442 


140422 


006065 


BR07LP: 


DEC 


R2 




(PGORD 


7.JMERR 


B I . UOX ; 


0O6025 


O30I45 


017S07 


106052 


BR07LX: 


ADD 


R7, UBAR 


BAR 


(PRDFST 


".JZRO 


BIR. L2 ; 


006026 


O76S01 


003715 


126067 




XORU 


(BCAIS) 


R1 , BUF 


(PRONXT 


%CALL 


BIR . 6W ; 


006027 


076501 


163015 


0O603 1 




XORU 


(BCAIS) 


Rl , BUF 




%JCDONE 


BR 1 5LP 


006030 


033747 


1 600 10 


128201 


BIRD IS : 


MOV 


#8 . , R7 






7.CNCD0NE 61 . TO 


006031 


03 1442 


1 40422 


0060S5 


BR15LP: 


DEC 


R2 




(PGORD 


".JMERR 


B I . UDX ; 


OO6032 


03014S 


0175O7 


106052 




ADD 


R7.UBAR 


BAR 


(PRDFST 


%JZRO 


BIR. L2 ; 


006033 


076501 


00371 5 


1 OOOO 




XORU 


(BCAIS) 


Rl ,BUF 


(PRDNXT 






OO6034 


01O545 


007O0 1 


126067 




ADO 


#1 , UBAR\N,8AR 




7.CALL 


B I R . 6W ; 


006035 


076S01 


1 630 15 


016024 




XORU 


(BCAIS) 


Rl , BUF 




7.JC00NE 


BR07LP ; 


006036 


033747 


1 600 10 


126201 


BIRD07 : 


MOV 


#8 . , R7 






7.CNCD0NE 


81 . TO ; 


006037 


031442 


1 40422 


10S025 




DEC 


R2 




(PGORD 


7.JNMERR 


8R07LX 


OO604O 


013440 


OOOOOO 


I 1 606S 




NOP 








7.JMP 


BI . UOX ; 



deep owd ct, start ovlp rd, br if err ; [ E 1 21 ] 
Exit if BI error ; { E 1 2 1 J 

; [E12! ] 
; [E121 ] 

deer owd ct, start ovlp rd, br if err; [E1ZI 
upd buf adr, init 8CAI rd ptr,;[E12t] 
br out if 2d-from-1ast owd ; [ E 1 2 1 ] 
Read 7 words into local buf f er ; { E 1 2 1 j 
Read last wd, br if ovlp BI rd done; [E121 ] 
R7s8, wait for ovlp rd to f i n i sn ; I E 1 2 1 ] 
deer owd ct, start ovlp rd, br if err ; [ E 1 2_ ] 
upd buf adr, init BCAI rd ptr,;[E121] 
br out if 2d- from- last owd ; [ E 1 2 1 ] 
Read 2 words into local buf f er ; { E 1 2 1 j 
Handle block ovflo, read S wds;(Ei2l] 
Read last wd, br if ovlp BI rd done; [E121 ] 
R7*6, wait for ovlp rd to f i n i sh ; [ E 1 2 1 ] 
deer owd ct, start ovlp rd, br if sr r ; [ E t 2 h ] 
Exit if BI error ; [ E 1 2 1 ] 

; [E121J 

; IE121 ] 
deer owd ct , start ovlp rd, br if err;[E12 
upd buf adr, init BCAI rd pt r , ; [ E 1 2 1 ] 
br out if 2d-from-last owd ;IE121] 
Read 7 words into local buffer; [E121 ] 
Read last wd, br if ovlp BI rd done;EEl21] 
R7sg, wait for ovlp rd to f i n i sh ; [ E 1 2 1 ] 
deer owd ct, start ovlp rd, br if err ; I E 1 2 
upd buf adr, init BCAI rd ptr,;(El21] 
br out if 2d-from-last owd ; [ E i 2 1 ] 
Read 1 word into local buffer ;[E12Jl 
Handle block ovflo, read 6 wd ; [ E 1 2 1 I 
Read last wd, br if ovlp 81 rd done;[E!21] 
R7sS, wait for ovlp rd to f i n i Sh ; [ E 1 2 1 ] 
deer owd ct , start ovlp rd, br if err;(E12 
Exit if 81 srror ; { E 1 2 1 ] 

; IE t2i 1 
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This read loop 



used at the tail end of the 



OO604 1 


014145 


040507 


106053 


BIR 


LP- 


BIT 


006042 


076501 


013715 


1 1 6047 


BIR 


OD- 


XORU 


0O6O43 


01054S 


007001 


126073 






ADD 


0O6044 


010545 


0O70O3 


1 36073 






ADD 


006045 


010545 


007OO5 


136073 






ADO 


006046 


010545 


007007 


106060 






AOO 


006047 


076501 


003715 


136074 


BIR 


NI • 


XORU 


0O6O5O 


076501 


003715 


126073 






XORU 


00605 1 


O76501 


003715 


1O6060 






XORU 
re- en 


006052 


014 145 


040007 


01 6042 


8IR 


12 : 


BIT 


006053 


078501 


1 37 IS 


1 16047 


BIR 


EV 1 


XORU 


006054 


076501 


003715 


01 OOOO 






XORU 


006055 


01OS45 


007002 


12 8073 






ADD 


006056 


10545 


007004 


126073 






ADD 


006OS7 


010545 


0O7O0S 


126074 






ADD 


O06O6O 


076501 


163015 


006062 


BIR 


CM: 


XORU 


00606 1 


033747 


1 60O10 


126201 


BIR 


LW- 


MOV 


00 60 6 2 


031442 


1 40002 


05606S 


BIR 


OK : 


OEC\F 


006063 


030145 


027007 


0O6O41 






ADO 


006064 


034S40 


000O07 


106075 






AND 


006065 


01 3440 


OOOOOO 


126201 


B I . UDX : 


NOP 


OO6068 


034540 


000007 


1 16303 






AND 



R7 , UBAR 

(BCAIS) , Rl . BUF 
#1 , UBAR\N. BAR 
#3. UBAR\N, BAR 
#S,UBAR\N, BAR 
#7, UBAR\N, BAR 
(BCAIS) , Rl . BUF 
(BCAIS) , Rl , BUF 
(BCAIS) . Rl . BUF 



(PRDFST 
(PRDNXT 



(PRDNXT 
(PRDNXT 
(PRDNXT 



7.JNLSB 
%JZRO 

•'.CALL 

"'.CALL 

SCALL 

7.JMP 

•'.CALL 

".CALL 

%JMP 



SIR 

BIR 

BIR 

BIR 

BIR.2W 

BIR. CM 

BIR 

SIR 

BIR 



ck opt 



u It r a- opt i mi zed loop 

EV ; branch if UBAR even 
NI ; UBAR odd - move 1st wd to mem 
2W ; move 2d and 3d wds to mem 
2W ; move 4th and 5th wds to mem 
move 6th and 7th wds to mem 
go to common code for 8th wd 
1W ; opt case - move 2d 8 3d wds to 
2W ; move 4th. Sth, 6th wds to mem 
CM ; move 7th wd, go to common code 



re-entry from u 1 1 ra- opt i mi zed read code at BIR.L2 



R7.UBAR 

(BCAIS) . Rl , BUF 
(BCAIS) . Rl , BUF 
#2, UBARXN, BAR 
#4, UBAR\N, BAR 
#6,UBAR\N, BAR 
(BCAIS) , Rl .BUF 
#8 . , R7 
R2 
R7, UBAR, BAR 



(PRDNXT 
(PRDNXT 



%JLSB 
7. JZRO 



BIR 
SIR. 



7.CALL 

XCALL 

"'.CALL 

7.JCD0NE 

%CNCDONE BI 

7.JMERR 

7.JNCRV 



BIR. 
BIR. 



BIR. 



2W 

2W 

1W 

OK 

. TO 

BI . UDX 

BIR. LP 



%JMP 



7.CALL 
%JMP 



BIR . EX 



branch if UBAR odd, ck 



IE 121 
[E 121 
IE12I 
case; [ E1 
[E121 
[E121 
IE121 
IE1 21 
[E121 
mem; [ 
IE121 
[E121 
[E 1 21 
IE121 
[El 21 
opt case ; [ E 1 2 



routines to move one to six words from 



006067 
006070 
00607 1 
0O6O72 
00S073 
006074. 



07650 1 
076501 
076501 
076501 
076501 
076501 



003715 
003715 
003715 
003715 
003715 
003715 



010000 
01 OOOO 
1 OOOO 
10000 
10000 
137777 



BIR. 6W 
BIR . 5W 
BIR . 4W 
B I R . 3W 
B I R . 2W 
BIR. IW 



XORU 
XORU 
XORU 
XORU 
XORU 
XORU 



(BCAIS) , Rl , BUF 
(BCAIS) , Rl , BUF 
(BCAIS) , Rl , BUF 
(BCAIS I , Rl , BUF 
(BCAIS) , Rl 
(BCAIS) , Rl 



BUF 
BUF 



(PRDNXT 

(PRDNXT 
(PRDNXT 
(PRDNXT 
(PRDNXT 
(PRDNXT 



006075 004240 010000 106231 BIR. EX: 



; IF HERE, 
CLR 



THEN < OCTAWORD TO 



XFER AND 
7.JZR0 



00607S 
0O6O77 

006 100 

006 1 1 

006 102 

KDBUP 



UBAR even - move 1st wd to mem;IE121 
move 2d wd to mem ;IE121 

move 3d and 4th wds to mem ; [£121 
move Sth and Bth wds to mem ;IB121 
move 7th wd to mem ;[E121 

move 8th wd, br if 81 rd done ;[E121 
R7=8, wait for BI rd to complete; [E1 
dec octawd ct , ttr if BI err ;IE12 1 

if 1st time, reenter loop to dump; IE 
last octwd without new BI read;EE12! 
reduce WC , check partial owd ;IE121 

; [E121 
wait for read to finish (if any);[E1 
reduce WC to partial owd ;IE121 
and adjust addr/count to error point 

; [E 121 

into buffer memory ;(E!2! 

; [E12I 
; [E12 I 
; IE121 

; (E121 
; IE12I 
; IE121 
and ex i t ; [ E 1 2 1 

; IE12I 
; (EI2I 
; IE12 1 

WORDS/EXIT ; (E121 



move 


a 


word 


move 


a 


word 


move 


a 


word 


move 


a 


word 


move 


a 


word 


move 


a 


word 



ON OCTAWORD ALIGNMENT 
BI . EX ; IF NO MORE 



1 1 
21] 



11 
IE121 



GET MORE L0NGW0RDS -- I LOVE EM! 

LAST OCTAWORD; DON'T XFER FULL 0CTAW0R0 



013440 
103543 
013240 
033747 
013440 



OOSS66 
000300 
005760 
OOOOOI 
OOSS47 



OOOOOO 
010000 
10000 
01 OOOO 
OOOOOO 



IR 


X2 : 


MOV 
BIS 


IUAR. BCAIO 
#OW,R3,0 


(PLADD 






MOV 


Q, BCAIO 


(PHADD 






MOV 


#BIRDCM, R7 








MOV 


R7, BCAID 


(PLCOM 



; LOAD LO ADDRESS 

; LOAO HI ADDRESS SITS 



LOAD COMMAND 
AND GO READ 



[E121 ] 
(EI21 ! 
IE121 ] 
[E121 ] 
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006103 
009104 
009105 
006109 
009107 
009 1 10 
0091 1 1 
009 1 12 



013440 
013440 
134 40 
079S01 
130445 
031440 
030S49 
004240 



007425 
000000 
1 4O5O0 
0037 15 
OO7005 
000000 
O 10002 
OOOOOO 



010000 
126201 
006210 
010000 
010000 
OOOOOO 
016106 
1 16231 



BIREOK 
. PAGE 



MOV 

NOP 

NOP 

XOR\L 

INC 

DEC 

ADD 

CLR 



UBAR, BAR 



(BCAIS) ,R1 ,BUF 
UBAR, UBAR, BAR 
RO, RO 
#2, IUAR 




(PROPST 
VRDNXT 



%CALL 
%JMERR 



'/.JNZRO 
7.JMP 



BI . TO 
BI .ERR 



10$ 
BI EX 



AND TIME OUT THE READ 
IP BUS ERROR, EXIT 
GET DATA 
INCREMENT UBAR 
IF NOT DONE 

LOOP/INCR ADOR (NO CARRV ) 
THEN EXIT 



IE121 ] 
IE121 ] 
IE121 I 
[E121 I 

IE12I ] 
16121 ] 
IB121 ] 

IE121 ] 
(E121 1 



o 



< 

a 
ii 
s 

cc 
O 
li- 
te 
o 
w 
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00 9 1 14 
0091 15 
0091 16 
0091 17 
0OS120 
009121 
009122 
009 123 
009124 
0O8125 
0O6129 
006127 
009 130 
009131 

006132 
006133 
006134 

0061 35 

0061 36 
006137 
006 1 40 
009141 



IF HERE THEN LESS THAN AN OCTAWORD TO XFER 



006113 053450 O10006 116075 BIR.NO: 



034550 
132550 
015549 
112 150 
033470 
1 13543 
013440 
003740 
013240 
01 3440 
033747 
014 145 
131 140 
013440 

079501 
130445 
031 450 
030546 
1 30463 
01 3440 
013440 
004240 



OO0007 
OOOOIO 
005003 
000560 
030000 
OOS300 
000760 
00000 1 
0O554O 
007425 
OOOO02 
140507 
010010 
0OO7OO 

003715 
OO7005 
OOOOIO 
01OOO2 
020003 
OOOOOO 
010000 
OOOOOO 



01 0000 
OOOOOO 
010000 
OIOOOO 
146121 
OOOOOO 
OIOOOO 
OOOOOO 
OIOOOO 
O 1 OOOO 
136201 
0052 10 
106132 
01 0000 

OIOOOO 
lOOOO 
OOOOOO 
006132 
146137 
OOOOOO 
005543 
1 1 5231 
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MOV\R 


IUAR, RIO 




•/.JZRO 


BIR. X2 : 


AND 


#7, R10 








RSUB 


#8 . ,R10 








eic 


#3, IUAR\N, BCAIO 








CMP 


RO, R10 


(PLADD 






MOV\T 


R0.R10 




7.TNEG 


; 


BIS 


#0W, R3\N , BCAI 






; 


NOP 




(PHAOD 






MOV 


#BIROCM,0 






; 


MOV 


0, BCAIO 


IFLCOM 






MOV 


UBAR, BAR 


G>GORD 






MOV 


#2,R7 




•/.CALL 


BI . TO 


BIT 


R7, IUAR 


OPRDFST 


%JMERR 


BI . ERR 


SUB 


R10.R0 




•'.JZRO 


10$ , 


NOP 




(PRONXT 






XOR\L 


(BCAIS) ,R1 ,BUF 


EPRDNXT 






INC 


UBAR, UBAR, BAR 








DEC 


RIO 








AOD 


#2, IUAR 




7.JNZR0 


10$ 


INC\T 


R3 




%TCRY 




TST 


RO 








NOP 






7.JNZR0 


BI .RLP 


CLR 







7.JMP 


BI . EX 



ON OCTAWORD BOUNDARV, 

< OCTAWORD 

RIO = OFFSET WITHIN OCTAWORD 

RIO * WDS TO END OF OCTAWORD 

LOAD LO ADDRESS 

REDUCE COUNT TO STAY IN OWORO 
LOAD HI ADDRESS BITS 

LOAD COMMAND 

START READ 

WAIT FOR READ TO COMPLETE 

IF BUS ERROR, EXIT 

AOJUST FINAL WC / BR IF EVEN WO 

SKIP 1ST WD IN BCAI BUF 

READ A WORO FROM BCAI BUF 
BUMP INTERNAL BUF AOR 
OECR WD CT FOR THIS XFER 
BUMP BI ADDR, BR IF MORE 
ONLY NEED TO CK OVFLO AT END 
ANY WOROS LEFT TO XFER? 
IF SO, GO BACK TO XFER THEM 
ELSE, EXIT 



[E121 
[E121 
(E121 
(E12I 
[E121 
[E121 
(E121 
(E121 
(E121 
[E121 
[E121 
[E121 
[E121 
[E121 
[El 21 
(E121 
; [E12 

; (E121 
; IE121 

1 [El 21 

; [E12 i 
; [E121 

i IE121 
F LOOP 
; I E 1 2 1 

; [E121 
; IE121 



i 



IE121 



"U> 
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FOR DIAGNOSTIC MOOE 


B I 


READ - 


ALLOWS WORD COUNTS 


006 1 42 


033747 


00000 1 


OIOOOO 


DM. RO : 


MOV 


#BIR0CM,R7 










006 143 


133543 


000300 


10000 




BIS 


#0W, R3 










006 144 


013440 


005566 


000000 


DM.RLP 


MOV 


IUAR, BCAID 




(PLADD 






006145 


01344O 


005763 


10000 




MOV 


R3, BCAID 




tPHADO 






0O6 1 46 


013440 


005547 


000000 




MOV 


R7, BCAID 




PLCOM 






006147 


013440 


007425 


010000 




MOV 


UBAR, BAR 




CPGORD 






0061S0 


030546 


00OO20 


010000 




ADD 


#16., IUAR 










006151 


131540 


020010 


016153 




SUB 


#8 . , RO 






V.JNCRV 


10$ ; 


006152 


130443 


000003 


oooooo 




INC 


R3 










006153 


013440 


000000 


126201 


10$ : 


NOP 








■/.CALL 


BI . TO ; 


006 1 54 


130445 


140505 


05621O 




INC\F 


UBAR 




(PROFST 


7.JMERR 


BI.ERR ; 


006 155 


076501 


003715 


OIOOOO 




XOR\L 


(BCAIS) , R1 , BUF 


(PRDNXT 






006156 


120445 


007005 


126074 




INC 


UBARXO, UBAR 


BAR 




%CALL 


BIR. IW 


006157 


120445 


0O7O05 


126074 




INC 


UBARXO. UBAR 


BAR 




•'.CALL 


3IR. IW 


OOSI 60 


120445 


0O7O05 


126074 




INC 


UBARXO.USAR 


BAR 




-.CALL 


BIR. 1W 


0O6161 


120445 


007005 


1 26074 




INC 


UBARVO.UBAR 


BAR 




%CALL 


BIR. IW 


006162 


1 20445 


007005 


126074 




INC 


UBARXO, UBAR 


BAR 




7.CALL 


BIR. IW 


006163 


120445 


007005 


126074 




INC 


UBARXO. UBAR 


BAR 




%CALL 


BIR. IW 


0061 S4 


120445 


00700S 


126074 




INC 


UBARXO, UBAR 


BAR 




'/.CALL 


BIR. 1W 


0061 65 


031442 


0O0O02 


OOOOOO 




DEC 


R2 










006166 


135543 


010300 


046144 




BIC\F 


#0W, R3 






7.JNZR0 


DM.RLP ; 


006 1 67 


013440 


000000 


106075 




TST 


RO 






7.JMP 


BIR. EX ; 



IN EXCESS OF 256. 

COMMAND IN R7 

LOAD LO ADDRESS 
LOAD HI ADDRESS 
LOAD COMMANO IN R7 

INCREMENT AODRESS 

DECREMENT WORD COUNT 

INCREMENT HI ADDRESS IF CARRV 

GO READ 

IF ERROR, SET 0, EXIT 

READ THE DATA 



DECREMENT OCTAWORD COUNT 

AND LOOP 

CHECK PARTIAL OWD AND EXIT 
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It*******"*** 



CHKBDR check for page boundary crossing. 

******************************************************* 
Assumptions and interface: 

1 . Since the word count is <s 256, 

and the page size is 512 bytes, there is 
at most one page boundary in any transfer 
[DM mode is an exception handled seperately) 



I nput s 
ro 
i uar 
r3 
r7 

Out put s 



word count 

low 16 bits of BI address 

high bits of BI addr 

IUAR negated and shifted right 1 bit 



BCAI next pg reg : next pg addr if page ovflo 
rl is destroyed, all other regs are preserved 

Subroutines used: none. 



«»******* 



*************** 



006170 


034547 


0OO377 


OOOOOO 


CHKBDR: 


AND 


#377, R7 








006171 


131147 


1OO0O 


1 37777 




SUB 


RO, R7 




7.RZR0 




006172 


133747 


03OO02 


067777 




MOVXF 


#1000, R7 




7.RNMSB 




006173 


030147 


00OO06 


OOOOOO 




ADD 


IUAR.R7 








006174 


134547 


025376 


016176 




AND 


#1 77000, R7 


SCAIO 


7.JNCRY 


10$ 


0O6 175 


130447 


000443 


1 16177 




INC 


R3.R7 


PLNPAG 


SJMP 


20$ 


006176 


033447 


000443 


OOOOOO 


1 OS : 


MOV 


R3, R7 


IPLNPAG 






0O61 77 


133547 


00O3OO 


OOOOOO 


20$ : 


BIS 


#0W. R7 








006200 


01 3440 


O0S767 


127777 




MOV 


R7, BCAID 


(PHADD 


%RTN 





R7 now has wds left in page 

ret if buf page aligned, 

else check pg ovflo 

return if no pg ovflo 

= IUAR + #BVTES 

LOAD LOW NEXT PAGE ADDRESS 

Increment h i adr if carry 

copy hi addr for BI rag 

SET FOR OCTAWORD 

SET UP HI AODRESS BITS 



[E121 1 

[E121 ] 

[E121 ] 

IE121 ] 

[E121 ] 

IE121 ] 

IE121 ] 

IE121 ] 

(El 21 1 

[E12I ] 

[E121 1 

SET ; [E 

; [E121 1 

; [E121 I 

: IBI21 ] 

; [E121 ] 
; [E121 ] 

; [E121 1 

; [E121 1 
; IE121 1 
; ( E 1 21 ] 
; IE121 1 
; 1E121 J 
; IE121 ] 
; 1E121 ] 
; [EI21 ] 



; (E121 ] 

; [E121 i 
; [E121 ] 
; [E121 ] 

: 1 E 12 1 1 

: [E121 ] 
; [E121 ] 
; [E121 ] 
. [ E 121 ] 
: [E121 ] 
: IE121 J 
: [E121 ] 
: [E121 ! 
; [E121 1 
i [El 21 ] 
i [E121 ] 
; [EI21 ] 
; [E121 ! 

; IE121 1 
; IE121 I 
; (E121 ! 

ME121 ] 
; IE121 1 
; [E121 ] 
; [E121 ] 

) [E121 1 

; [E121 ] 

1 [,112.1 ] 

; [ E 1 2 1 ] 
; IE121 i 

: [ E 1 2 1 i 

; [E121 1 

i [E121 ] 
; [E 12 1 ! 
: [E12I I 
; [EI21 ) 

; [E121 1 
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********************************************************** 

routine. This routine gets called only after an initial 
test for completion of a BI read/write has been 
unsuccessfully attempted. Bus timeouts are ignored. 
NOTE: do not start the BI I/O on the same cycle as 
the call to BI.TO, as CDONE may be erroneously set. 



; IE121 ] 
; [E121 ] 

! [E121 ] 

; [E121 1 
: [S121I 



********* 



******** 



******** 



o 



006201 

006202 
006203 
006204 
OO620S 
006206 
006207 



013440 
013440 
O13440 
013440 
013440 
01 3440 
013440 



1 60000 
160000 
160000 
1 60000 
1 60000 
1 60000 
000000 



027777 
027777 
027777 
027777 
027777 
027777 
1 1 6201 



NOP 
NOP 
NOP 
NOP 
NOP 
NOP 
NOP 



7.RC00NE 
%RCDONE 
7.RCD0NE 
%RCDONE 
%RCDONE 
7.RC00NE 
%JMP 



EXIT IF COMMAND COMPLETE AND ERROR FREE 

EXIT IF COMMAND COMPLETE AND ERROR FREE 

EXIT IF COMMANO COMPLETE AND ERROR FREE 

EXIT IF COMMANO COMPLETE AND ERROR FREE 

EXIT IF COMMAND COMPLETE AND ERROR FREE 

EXIT IF COMMAND COMPLETE AND ERROR FREE 

KEEP LOOPING ; [E121 ] 

; [E121 1 
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006210 
00621 1 
006212 
006213 
006214 
00621S 
006216 



013440 
Ol 3440 
013740 
013740 
033447 
033450 
033442 



000400 
000660 
1 1 6220 
006221 
000000 
OOO0O1 
0OOOO5 



010000 

oooooo 

046235 
1OO00 

oooooo 

O1OO00 

oooooo 



Various exit routines from BI transfer code 

NOP EPSUPF 

NOP IPRBCAI 

MOV\F #<B . LED + B .NRTV> , BREG 7.JST0P BI.ST 

MOV #<B . LED'B .NRTYtB .NABO>, BREG 

MOV R0.R7 

MOV R1 ,R10 

MOV UBAR.R2 

read the bus error register for analyzer scoping purposes [mjt06] 
Bug fix • can't call RDCMD here, we will exceed subr depth! [r1] 



IF BUS ERROR, SET UPF 

[mjt061 STAY HERE IF 
[mjtOSI RESET BREG 
[mjt06] SAVE REGS 



0062 17 


033740 


OO0O1O 


130265 






MOV 


006220 


O33740 


00O0O1 


OOOOOO 






MOV 


006221 


033440 


1 15540 


006237 






MOV 


006222 


13440 


000420 


130323 






NOP 


006223 


033440 


OO0507 


OOOOOO 






MOV 


006224 


O13700 


0007 15 


O1O000 






MOV 


00622S 


013700 


000015 


oooooo 






MOV 


006226 


033441 


000010 


01OOOO 






MOV 


006227 


033445 


000002 


oooooo 






MOV 


006230 


003740 


000002 


oooooo 






MOV 


006231 


013740 


007044 


125601 


BI 


EX: 


MOV 


006232 


013740 


0O7O4S 


135602 






MOV 


006233 


013740 


007262 


135622 






MOV 


006234 


013240 


OOOOOO 


127777 






TST 


006235 


013740 


007034 


OOOOOO 


SI 


STO 


MOV 


006236 


01 3740 


003146 


OOOOOO 






MOV 


O06237 


013740 


006220 


OOOOOO 


BI 


STP 


MOV 


006240 


013740 


0O6221 


010000 






MOV 


006241 


1 13740 


004020 


106237 






MOV 



7.JST0P 
'/.CALL 



CROFST 
PRDNXT 



#BIBER, RO 
#BIRDCM,RO 
RO, .BCAID 0LCOM 
CPGORO 

R7, RO 

IBCAIS) ,RO\N 

(BCAIS) ,RO\N 
R10, R1 
R2 , U5AR 
#2,0 

*CNVTV3,BAR 
#CNVTV4,BAR 
SSAVUAR, BAR 




VFAILUR, BAR 
#ER.STP,BUF 
#<B.LE0+8.NRTY>,BRBG 
#<B.LED*B.NRTY+S. NABO> , BREG 
#<LE01>,UCR0 %JMP 



BI .STP 
WTCMDO 



•/.CALL 


S . LDR7 


'/.CALL 


S . LD10 


%CALL 


S STR3 


%RBT 





BIIC REGISTER ADDRESS 
GET READ COMMAND 
JUMP IF BI STOPPED / L 
00 THE READ / 

GO WAIT FOR CMD COMPL 
READ 1ST BUFFER, RESTO 
GET DATA FROM 1ST BCAI 

READ NEXT BUFFER. 
GET DATA FROM NEXT BCA 

Imjt06] RESTORE REGS 

set error code 
RESTORE R7 
RESTORE RIO 
SAVE UPDATED SAVUAR 
RETURN STATUS 



; IE121 ] 
; [E 121 ] 
; IE121 ] 
: [E121 1 
STOP/CLEAR ERRORS; [El 

; [E121 ] 

1 [E121 I 
; [E121 ] 

; I El 2 1 1 

; IE121 I 
; [E121 ] 
; [E121 ] 
; [E121 J 
= Bus error reg;[E121 
; [E121 I 

OAD COMMAND I mr 1 
i IE121 1 

ETE 8 ERROR FREEME12 

RE RO ; IE121 ] 

UFFER /; [E121 ] 

[E121 ] 

I BUFFER /: [E121 ] 
[E12t 1 
[El 21 ] 
[E121 1 
[E121 1 
[EI21] 
[=121 ] 
[E1211 



[mjtoe] save stop command in last fail 

jmjtoel 

[mjt06] clear abort 

[mjt06] hang forever 

because we got the stop command 
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******** 



Inputs (same as unb.wr) : 



ubar 

i uar , uar : 



savuar 



starting internal buffer ptr 

tow 16 bits of external bus address 

for start of transfer. Identical copies. 

holds high order bits of external bus addr 

word count for the transfer 

holds high order bits of bus address. 



(E121 ] 

C E t 2 1 1 

[El 21 1 
[E121 1 

[E121 ] 

[E121 ] 



Outputs (same as unb.wr): 

q : err or code 
If rO <> O, 

q = 1 means nxm error (time-out) 
upf ( i oc flag) set means timeout, not 

Set means parity 
r O number of words not transferee) 

On success, transfer will be O. 
rl EOC 

S ide-ef facts : 

iuar, uar are advanced, 

ubar , bar are advanced. 

Host data in buffer pointed to by ubar on entry. 

r2 and p3 are not preserved. 

r7 used as scratch but original contents saved and 

rest or ed 



Ent ry points: 



the usual entry is qb.wr or bi.wr. * 

unb.wr is included for consistency * 

to insure that calls from common urtibus * 

and qbus call use the correct bus writing routine. * 
WT.OIAG is a diagnostic entry point and the only » 
difference is that the last fail code is not set * 
( edc is set before the call). * 

UN . BWC is used in order not to reset the EDC residue* 

* 

««>>tt»>ttl)t«ttt)!tt<tttttttt«***tftfttttt*III<II>tttI 



; [E121 ] 



; [E121 ] 
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ON OCTAWORD BOUNDARY? - > NO -> THEN XFER UNTIL ON OCTAWORO BOUNDARY 
YES 



MORE OCTAWORDS XFER-><- 
NO YES- - - 



•XFER OCTAWORO- 



o 











U N B . WR : 












OB . WR: 












BI .WR: 




006242 


033741 


000105 


1 OOOO 




MOV 


006243 


01374O 


007034 


OOOOOO 


UN . BWC : 


MOV 


006244 


01 3740 


00301 3 


010000 




MOV 


006245 


013740 


007044 


1 25625 


WT.OIAG 


: MOV 


006246 










ASSUME 


006246 


033450 


003010 


010000 




MOV 


006247 


013740 


007262 


125576 




MOV 


0062SO 


01 3740 


1 16221 


006235 


BIW. LO : 


MOV 


0062S1 


053442 


00O660 


OOOOOO 




MOV\R 


006252 


055542 


0100O3 


106112 




BIC\R 


006253 


155542 


OO0140 


OOOOOO 




BIC\R 


006254 


014546 


O10O16 


1 064 1 7 




BIT 


006255 


053467 


010006 


046361 




M0V\RT 


006256 


152447 


000006 


1 25 1 70 




NEGAR 


006257 


1 1 4544 


000 100 


O 10000 




BIT 


006260 


073447 


10000 


O16430 




M0V\L 


006261 


01 3440 


005566 


OOOOOO 




MOV 


006262 


1 13543 


005300 


OOOOOO 




BIS 


006263 


01 3440 


007765 


OOOOOO 




MOV 


006264 


01 3740 


005004 


OIOOOO 




MOV 


OOS265 


035547 


0000 1 7 


01 OOOO 




SIC 


006266 


030146 


000547 


OIOOOO 




ADO 


O06267 


03454O 


020007 


O06271 




AND 


006270 


1 30443 


000003 


OOOOOO 




INC 


00627 1 


076501 


005523 


126312 


10$ : 


XOR\l 


006272 


076501 


005723 


OIOOOO 




XOR\L 


006273 


I3044S 


007005 


OIOOOO 




INC 


006274 


O76S01 


005743 


1OO0O 


BIW. LP : 


XOR\L 


006275 


031442 


000002 


OOOOOO 




DEC 


006276 


130445 


01 7005 


106325 




INC 


006277 


07650 1 


005523 


1 26312 




XORU 


KDBUP 




KOBSO.M 


ICROCODE 


. , 22-APR 


- 19SS 1 



ANY DATA LEFT TO XFER?->VES >THEN XFER REST 



FOR UOA CALL COMPATIBILITY 
FOR OOA CALL COMPATIBILITY 



#E0SEED.R1 
#FAI LUR.SAR 
#ER.MST,BUF 
#CNVTV3, BAR 
<CNVTV4a 1 7> , 
RIO, RIO, BUF 
#SAVUAR, BAR 

#<B . LED + B . NABO + 

RO.R2 

#3 , R2 

#60000, R2 

#16, IUAR 

IUAR.R7 

IUAR.R7 

#DM0DE, RLL 

RO, R7 

IUAR.BCAID 

#0W, R3\N.BCAID 

UBAR, BAR 

#BIWRCM.BCAID 

#17, R7 

R7, IUAR 

#7, RO 

R3 

(BUF! , Rl 

(BUF I , Rl 

UBAR, UBAR , BAR 

( BUF ) , R1 , BCAID 

R2 

UBAR, UBAR, BAR 

(BUFI , R1 , BCAID 



R1 WILL CONTAIN 



%CALL 
, <CNVTV3417>*t 



S .STR7 



EDC THROUGHOUT 

STORE FAILURE CODE IF 

BI STOP COMMAND OCCURS 
SAVE R7 ANO RIO 



%CAL.L S . LDR3 ; 

B.NRTY>,BREG %JSTOP BI.STO 

PRBCAI 

•iJZRO BIREOK 



%JZRO 

7.JNZR0 

'/.CALL 



BIW. NO 
BIW. SO 
CHKBDR 



%JNZRO OM.WR 



BCAIO 
BCAI 



PLAOO 
PHADD 



ffWRFST 

CPWRNXT 



XJNCRY 
%CALL 



%JZRO 
T.CALL 



10$ 
BIW. 5R 



BIW. EX 
BIW. 5R 



R3 = IUAR EXTENSION 

S OIE IF BI STOP ISSUED 

SET SELF TEST OK, NO ABORT CMO 

R2 : # OF LONGWORDS 

R2 = # OF OUAOWOROS 

R2 # OF OCTAWORDS 

BR IF NO OCTAWDS TO XFER 

BR IF NOT ON OCTAWORD BOUNDARY 

CAN XFER OWOS - CHECK FOR PG 

IF IN DIAG MODE, USE SPECIAL 

ROUTINE; R7 = BYTE COUNT 

LOAD LOW ADDR BITS 

SET UP OCTAWORD XFER 

WITH HI ADDR BITS ANO LOAD BAR 

LOAO BI WRITE COMMAND 

assume successful xfer, 

and update BI addr 

and wd ct 

(BI addr is double precision!) 

load first 6 words of octwd 

load 7th word of octwd 

LOAD LAST WORD AND WRITE ONTO 
dec octawd ct 

adjust UBAR, br if last octawd 
write first 6 words 



IEI2 1 

(E121 

IEI21 

IE121 
NO R 

( E1 2 1 

[E121 

[E121 

[E121 

[E121 
VFLO; (E121 ] 

( E 1 2 1 

(EI21 

(E121 

[E121 

[ E 1 2 1 

[E121 

[E121 

[E121 

[E121 

[E121 

(E121 

[E 1 21 

[E121 
BI BUS 

[E121 

[E121 

IE121 



ETRY; [ M 21 1 



[E121 
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006300 
OO6301 
006302 

006303 
006304 
006305 
OO6306 
006307 
006310 
00631 1 



076501 
OI3440 

130445 

073447 
070147 
030140 
030147 
131146 
031463 
013440 



165723 
1 BOOOO 
I4700S 

000002 
000007 
0000O7 
000OO7 
000OO7 
02OOO3 
000000 



1 6302 
136201 
1 1 6274 

000000 
000000 
000000 
10000 
000000 
05631 1 
116210 



XOR\L 

NOP 

INC 

MOVNL 

AOD\L 

ADD 

ADD 

SUB 

OEC\T 

NOP 



(BUP) , R1 , SCAIO 

UBAR.UBAR, BAR 

R2 ,R7 

R7.R7 

R7.R0 

R7.R7 

R7, IUAR 

R3 



%JCDONE BIW.9K 
%CNCDONE BI . TO 
7.JNMERR BIW.LP 



write 7th wd, ck BI done 
wait for 81 wr i t e 
loop if no srr 

err - adjust wd ct and BI addr 
to show correct stopping point 



0063 12 


130445 


OO7005 


010000 BIW 


.5R: INC 


006313 


076501 


005723 


010000 


XOR\L 


006314 


130445 


007005 


10000 


INC 


006315 


076501 


005723 


10000 


XOR\L 


006316 


130445 


007005 


010000 


INC 


006317 


076501 


005723 


O1O00O 


XORM 


006320 


130445 


007005 


010000 


INC 


006321 


076501 


OOS723 


010000 


XOR\L 


006322 


130445 


007005 


10000 


INC 


006323 


07SSO1 


00S723 


10000 


XOR\L 


006324 


130445 


OO700S 


137777 


INC 



subroutine to load 5 



UBAR, UBAR.BAR 
(BUF) , R1 .BCAID 
UBAR, UBAR, BAR 
(BUF) ,R1 .SCAIO 
UBAR, UBAR, BAR 
( BUF ) , R1 , BCAIO 
UBAR.UBAR, BAR 
(BUF) ,R1 , BCAIO 
UBAR, UBAR, BAR 
(BUF) , R1 , BCAIO 
UBAR, UBAR, BAR 



%TNCRV 

%JMP BI.ERR ;report bus error 

vords into BCAI and bump UBAR 6 times 



(E121 
[E121 
(E121 
[6121 
[E121 
[E121 
IE121 
[E121 
[E121 
[E 121 
(E121 
IE121 
IE121 
[E12I 
[E121 



; IE121 1 
; t EI 21 ] 
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006325 013440 

006326 013440 

006327 004260 



oooooo 


1 26201 


BIW. EX: 


NOP 




140000 


006210 


BIW. TS : 


TST 


RO 


lOOOO 


146231 




CLR\T 






%CALL 

7.JMERR 
%JZRO 



BI . TO 
BI . ERR 
BI . EX 



wait for last BI write 

br i f bus er r 

exit if no partial octwd 



Come here when we are on a longword boundary and will not cross the 
next octaword boundary - short transfers and the end of long ones. 



006330 


1 1 1540 


000002 


OOOOOO 


BIW.LS: SUB 


#2.R0\N 










006331 


033747 


030004 


146346 




MOV\F 


#SIWRCM,R7 




7.JMSB 


20S 




006332 


013440 


005547 


OOOOOO 




MOV 


R7, BCAIO 


1PLC0M 








OOS333 


013440 


005566 


OOOOOO 




MOV 


IUAR, BCAIO 


PIAOO 








006334 


1 13543 


0O51OO 


010000 




BIS 


#LW,R3\N, BCAIO 










OOS335 


01 3440 


007765 


OOOOOO 




MOV 


UBAR.BAR 


9HA00 








006336 


076501 


005523 


OOOOOO 


10$ : 


XORM. 


(BUF) , R1 , BCAIO 


[PWRFST 








006337 


130445 


OO70O5 


1 0000 




INC 


UBAR, UBAR, BAR 










006340 


076501 


005743 


010000 




XORNL 


(BUF) ,R1 , BCAIO 


CPLBWR 








00634 1 


130445 


007005 


136201 




INC 


UBAR, UBAR.BAR 




%CALL 


BI . 


TO 


006342 


030S46 


000004 


010000 




ADD 


#4. IUAR 










006343 


130463 


02OO03 


146344 




INC\T 


R3 




STCRV 






006344 


131540 


1 40O04 


046210 




SUB\F 


#4 , RO 




7.JMERR 


BI . 


ERR 


006345 


030540 


030002 


01 6336 




ADD 


#2. RO 




%JNMSB 


10$ 




006346 


033747 


040007 


146360 


20$ : 


MOVNF 


#WMCI , R7 




SJNLSB 


30$ 




006347 


013440 


OOSS47 


OOOOOO 




MOV 


R7, BCAIO 


PL COM 








0063SO 


Ol 3440 


OOS566 


OOOOOO 




MOV 


IUAR, BCAID 


(JLADD 








006351 


103543 


000100 


OOOOOO 




BIS 


#LW, R3.0 










006352 


013240 


005760 


01OO0O 




MOV 


0, BCAID 


(PHADO 








006353 


01 3440 


007665 


010000 




MOV 


UBAR, BAR 


CRBCAI 








006354 


07650 1 


005523 


OOOOOO 




XOR\L 


(BUF ) . R1 , BCAID 


CWRFST 








006355 


130445 


007545 


OOOOOO 




INC 


UBAR, UBAR, BAR 


0GOWR 








006356 


03O546 


000002 


136201 




ADD 


#2, IUAR 




%CALL 


BI . 


TO 


006357 


034440 


140000 


056210 




CLR\F 


RO 




%JMERR 


BI . 


ERR 


006360 


004240 


OOOOOO 


1 1 6231 


30$: 


CLR 







7.JMP 


BI . 


EX 



CHECK FOR WC >= ONE LONGWD 

IF < 1 LWD, SKIP 

LOAD SI WRITE COMMAND 

LOW ADDRESS LOADED 

LOAD HI ADDRESS 

LOAD SREG 

WRITE FIRST 

NEXT WORD 

WAIT FOR WRITE TO COMPLETE 
BUMP ADDRESS 

EXIT IF ERR, ELSE DECR WC « 
IF SO, BRANCH BACK 

IF NO ODD WD, EXIT 
LOAD BI WRITE COMMAND 
LOW ADDRESS LOADED 

LOAD HI ADDRESS 



START WRITE 

BUMP ADR, WAIT FOR WRITE 
EXIT IF ERR, ELSE CLEAR WC 
ANO EXIT 



IE 
[E 
IE 
[E 
(E 
[E 
[E 
[E 
(E 
[E 
(E 
[E 
(E 
IE 
IE 
IE 
IE 
IE 
IE 
IE 
IE 
(E 
[E 
CHECK 
IE 
IE 
IE 
[E 
IE 
IE 
IE 
IE 
IE 
IE 
IE 
IE 
IE 
IE 
IE 



1 21 
1 21 
1 2 I 
1 21 
1 21 
1 21 
1 21 
1 21 
1 21 
121 
121 
12! 
1 21 
121 
1 21 
121 
1 21 
1 21 
121 
121 
121 
121 
121 
FO 
121 
1 21 
121 
121 
121 
121 
121 
121 
121 
1 21 
1 21 
121 
121 
121 
12 1 



i 
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006361 
O06362 
0063S3 
006364 
00636S 
006366 



006367 
00637O 
O06371 
006372 
006373 
006374 
00637S 
006376 
006377 
0064O0 
006401 
OO6402 
OO6403 
008404 
006405 
006406 



! 4546 
033747 
013440 
030546 
130463 
01 3440 



152442 
054542 
033747 
013440 
013440 
I 13543 
013440 
076501 
130445 
076501 
130445 
030546 
130463 
031442 
131540 
013440 



00OO02 
010007 
005547 
000O02 
020003 
1 40000 



000006 
000006 
010OO4 
005547 
005566 
005 1 00 
007765 
005523 
0O7005 
005743 
007005 
140004 
020003 
00O002 
01O002 
OOOOOO 



1 OOOO 
108367 
126407 
010000 
146366 
006210 



OOOOOO 
OOOOOO 
156250 
OOOOOO 
OOOOOO 
0100OO 
OOOOOO 
OOOOOO 
1 OOOO 
O 1 OOOO 
136201 
046210 
1 46404 
OOOOOO 
01 6376 
1O6250 



; MORE THAN AN OCTAWORD TO XFER BUT NOT STARTING ON AN OCTAWORD BOUNDARY 
BIW. SO 



BIT 


#2. IUAR 










MOV 


#WMCI , R7 




%JZRO 


BW 


SOI 


MOV 


R7, BCAIO 


S>LCOM 


%CALl 


BI 


WOW 


ADO 


#2, IUAR 










INC\T 


R3 




V.TCRY 






NOP 






%JMERR 


BI 


ERR 



IUAR IS NOW ON A LONGWORD BOUNDARY 



NBGAR 

AND\R 

MOV\F 

MOV 

MOV 

BIS 

MOV 

XOR\L 

INC 

XOR\L 

INC 

ADO\F 

INC\T 

DEC 

SUB 

NOP 



IUAR.R2 

#6,R2 

#BIWRCM, R7 

R7.BCAID 

IUAR, BCAIO 

#LW,R3\N, BCAIO 

UBAR, BAR 

IBUF I ,R1 . BCAID 

UBAR, UBAR, BAR 

(BUF) ,R1 , BCAID 

UBAR, UBAR, BAR 

#4 , IUAR 

R3 

R2 

#2,R0 



PLCOM 
PLADD 



(PHAOO 
IPWRFST 



"/.CALL 

7.JMERR 

%TCRY 

XJNZRO 
XJMP 



BI . TO 
BI .ERR 



15$ 
BIW. LO 



MASK NEEDED? 
IF NOT, BRANCH 
PERFORM ODD WORD WRITE 
BUMP BI ADDRESS 

IF ERROR, EXIT 



R2 = # LONGWORDS 

IF NOT, SKIP 

LOAD BI WRITE COMMAND 

LOAD LOW ADDR 

LOAD HI ADDRESS St BAR 
WRITE FIRST 
NEXT WORD 

WAIT FOR WRITE TO COMPLETE 
EXIT IF ERR, ELSE BUMP ADR 



DONE? 

IF NOT, BRANCH 



Perform odd word write - load address, load data, start write, and wait. 
Side effects - UBAR/BAR incremented, RO (word ct ) decremented, EOC updated, 
register destroyed. 



006407 


0O5546 


000003 


OOOOOO 81 . 


WOW: BIC 


00641O 


013240 


0O5560 


OOOOOO 


MOV 


00641 1 


103543 


O0O1O0 


OOOOOO 


BIS 


0064 12 


013240 


005760 


O100O0 


MOV 


0064 1 3 


021340 


0O7665 


10000 


DECS 


0064 1 4 


076501 


005463 


OOOOOO 


XOR\L 


006415 


130445 


007645 


OOOOOO 


INC 


00641 6 


013440 


OOOOOO 


1 1 6201 


NOP 



#3, IUAR,0 
9, BCAIO 
#LW,R3,9 
0, BCAID 
UBAR\0, RO, BAR 
(BUF) ,R1 .BCAID 
UBAR, UBAR, BAR 



IPLAOD 

0>HADD 
CPRBCAI 

0>WRSND 
(PGOWR 



CLEAR ODD WORD ALIGNMENT 



LOAD HI ADORESS 

OECR WC, LOAD BAR 

LOAD WORD 

START WRITE 

WAIT FOR COMPLETION S RETURN 
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( E 1 2 1 
[E 121 
IE121 
IEI21 
IE121 
(E 121 
(E121 
(E121 
IE121 
f E121 
[ E 1 2 1 
(E121 
(E 121 
IE121 
(6121 
(E121 
IE121 
(E121 



(E121 
[E121 
[E121 
[E121 
(E121 
[E121 
[E121 
(E121 
[E121 
[E121 
(E121 
[E121 
IE121 
(El 21 
IE121 
IE12I 
IE 121 
IE121 
[E121 
(E121 



K08UP 
U.PROC AND 
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; MUST BE < OCTAWORD TO BE HERE 



O064 17 


152447 


010666 


108330 BIW 


.NO: NEG\R 


IUAR.R7 




O06420 


034547 


000007 


01000O 


AND 


#7, R7 




00642 1 


131147 


OOOOOO 


OOOOOO 


SUB 


RO, R7 




006422 


014546 


030002 


1 1 6361 


BIT 


02, IUAR 




006423 


003740 


010007 


156330 


MOV\F 


#WMC I , 




006424 


01 3240 


0O554O 


136407 


MOV 


0. BCAID 


PLCOM 


006425 


030546 


000002 


O 1 OOOO 


ADD 


#2, IUAR 




00642 6 


1 30443 


020003 


056326 


INC\F 


R3 




006427 


013440 


OOOOOO 


106326 


NOP 







*;jzro 

•/.CALL 



BIW. LS 
BI .WOW 



•iJNCRY BIW.TS 
%JMP BIW.TS 



IF ON BOUNDARY, BRANCH ;[E121] 

R7 s wds to octawd boundary ;[E121] 

DO WE CROSS AN OCTAWORD BOUNDARY? ;( E 1 2 1 ] 

IF WE DO. BIW. SO WILL HANDLE IT.;1E121] 



ELSE TEST FOR ODD WORD 
IF NOT, BIW. LS WILL HANDLE 
WRITE ODD WORD 
BUMP BI ADDRESS 
OTHERWISE BUMP AOORESS 
AND LET 8IW.LS 00 THE REST 



IT 



E12I ! 
IEI21 ] 
[E121 ] 
(E1211 
(E121 ] 
(E12I ] 
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KDBUP 
U.PROC AND 



DIGITAL EOUIPMENT CORP. 
.PROC SUBROUTINES 



006430 
006431 
006432 
006433 
006434 
006435 
00 6 43 6 
006437 
006440 
00644 1 
006442 
006443 
006444 
006445 
006446 
006447 



013440 
1 13543 
013440 
033747 
013440 
076501 
076501 
1 30445 
076501 
030546 
130463 
1 30445 
031 442 
131540 
004260 
013440 



005S66 
005300 
007765 
000004 
005547 
005523 
005723 
007005 
005743 
OOOO20 
020003 
000005 
1 40002 
10010 
O1OO00 

oooooo 



000000 

oooooo 
oooooo 

010000 

oooooo 

1 2631 2 

oioooo 

010000 
010000 
OIOOOO 
146443 
126201 
058210 
016430 
146231 
1 16330 
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FOR DIAGNOSTIC MODE 51 WRITE 



MOV 

BIS 

MOV 

MOV 

MOV 

XOR\L 

X0R\L 

INC 

X0R\L 

ADO 

INC\T 

INC 

DEC\F 

SUB 

CLR\T 

NOP 

. PAGE 



IUAR, BCAID 
#0W,R3\N, BCAID 
UBAR, BAR 
#BIWRCM, R7 
R7, BCAID 
(BUF) ,R1 , BCAID 
(BUF) , R1 , BCAID 
UBAR. UBAR , BAR 
( BUF) , R1 , BCAID 
#16. , IUAR 
R3 
UBAR 
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ALLOWS WORD COUNTS IN EXCESS OF 256 
; LOAD ADDRESS 



IPLCOM 
OTVRFST 

IPWRNXT 



STCRV 

7.CALL 

7.JMERR 

7.JNZR0 

%JZR0 

%JMP 



BI . TO 
BI .ERR 
DM.WR 
BI .EX 
BIW. LS 



LOAD COMMAND 
LOAD FIRST WORD 



LOAD LAST WORD AND WRITE ONTO 

INCREMENT ADDRESS 

IF CARRV, INCREMENT HI AODRESS 

ADJUST UBAR. TIMEOUT COMMAND 

BR IF BUS ERROR, ELSE DECR OWD 

LOOP IF NOT DONE 

THEN EXIT IF ALL DONE 

ELSE, SEND LAST FEW OATA WORDS 

(LESS THAN AN OCTAWORD ) 



IE121 ] 
IE121 ] 
[E121 ] 
[E121 ] 

[E121 I 
[E121 1 

1E121 1 
[E121 ] 
IE121 ] 

IE121 ] 
[E121 ] 
I BUS ;[EI 
IE121 J 

BITS ;[E12 
[E121 ] 
CT ; IE121 ] 

[E121 ] 
[E121 ] 

; IE121 I 

t B 121 1 



V-wt"* 
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Q 
< 

3 
O 

ll 

2 
cc 

O 

u_ 

CO 

o 



OOS45 1 
006452 
OOS453 



010S47 
01 3740 
030143 



007002 
007002 
OOOOOO 



135576 
135573 
010OO0 



SBTTL OOA ECC CORRECTION ROUTINE 
05-AUG-83 OOA MICROCODE 

New Version with HSC algorithms - Beckman - 
Optimized Version - Version 3 
MATT 01-JUL-S3 CHANGES PER RICHV'S SPECIFICATION 

ROUTINE NAME: 

ECCC (ECC CORRECTION) 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE PERFORMS THE HSC ECC CORRECTION ALGORITHM 

ON THE DATA BUFFER WITHIN THE SECTOR BUFFER POINTED TO BY R7 . 

INPUTS : 

DMREG2 SECTOR SIZE IN WORDS 

R7 POINTER TO SECTOR BUFFER CONTROL AREA 

(BUF . BP+SECSZ+BUF. EC I « POINTER TO 12 WORDS OF PACKED ECC RESIDUES 



OUTPUTS : 

CONDITION CODE 
CONDITION CODE 
DMREGO 



ZRO 
NZRO 



■ ALL ECC CORRECTION MADE 
- DATA BUFFER NOT CORRECTABLE 
NUMBER OF CORRECTIONS MADE 



ECC CORRECTION ALGORITHM. 

********************************************************** 

Syndrome Computation 

There are 17 syndrome values. Each is the remainder of the 
division of two po lynomia 1 s . The 17 residue va 1 ues , t r eat ed as 
coefficients of a polynomial is divided by each of the factors 
of the Code Generation Polynomial .These factors ar»: 

-8-7 7 8 

(x+alpha ), (X+alpha ) (X+alpha ),...,( x+a 1 pha ), (X + alpha ) 

-8 
The remainder of the division by (X+alpha ) yields syndrome (-8) e 

These syndromes turn out to be power series with one term for each 
symbol in error. For v errors, at locations j(0) through j(v-1) 
with values V(1) through Y(v) Syndrome i has the following form: 

( i ) j(0) ( i ) j( 1 ) ( i ) j(v- 1 ) 

S(i)= Alpha V(1) + Alpha Y(2) + ...+ Alpha Y(v) 



*********** 



********** 



006450 013740 O07 1 72 135625 ECCC: 



MOV #SAVR7,BAR %CALL S.STR7 ; SAVE SECTOR BUFFER PTR 
UNPACK 12 WORDS OF PACKED RESIDUES INTO 18 WORDS - STARTING AT ELPN ** 
RESIDUES ARE UNPACKED LAST TO FIRST, I.E. 1ST RESIDUE IS AT ELPN *** 
ADD #BUF. BP.R7NN, BAR '/.CALL S.LDR3 ; (16K]R3:DATA BUFFER POINTER 
MOV #DMREG2.BAR XCALL S.LDRO ; I 1 6K ] RO. SECTOR SIZE 
ADD R0,R3 ; [16K1A00 SECTOR SIZE TO R3 
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006454 
OOS455 
O06456 
006457 
O06460 
00646 1 
|Jo06462 
I OOS463 
006464 
006465 



030543 
033742 
033746 
1 15541 
003740 
03344O 
1 15541 
003740 
033141 
031446 



0000 14 
000056 
0O0OO6 
013374 
000004 
000001 
003374 
000012 
0030O0 
000006 



oooooo 

136760 
10000 
146467 
136466 
136760 
136761 
126466 
136760 
1 1 6457 



ADD 

MOV 

MOV 

8IC\F 

MOV 

MOV 

SIC 

MOV 

OR 

DEC 



#<BUF . DL-401>, R3 
, R2 



#ELPN+17 

#6,R6 

#176000, R1\N, BUF V.JZRO 

#4,0 7.CALL 

R1.R0 '/.CALL 

#176000, R1\N, BUF "/.CALL 



0064S6 134541 000374 115S0I SHFRES: ANO 



006467 
006470 
006471 
006472 
006473 
006474 
006475 
006476 



131742 
107740 
033741 
013740 
033740 
01OS42 
1 12542 
1 20342 



000010 
000374 
000036 
007035 
000017 
007 1 12 
000010 
013005 



010000 
OIOOOO 
OOOOOO 
135577 
126744 
OOOOOO 
10000 
01 647 1 



nsg 
com 
MOV 
MOV 
mov 
add 
cmp 
i neb 



#10. ,0 
RO, R 1 , BUF 



#176000, R1 

#8. ,r2 
#176000, q 
#ELPN*1 , R1 
#ELPN,8AR 
#15 . ,1-0 
#sy , p2\n , bar 



SCALL GETRES 



ECCCB 

SHFRES 

GETRES 

SETBAR 

SHFRES 

GETRES 

ECCCA 

S . RRR1 



'/.CALL 
SCULL 
%JMP 



#3 . 



rJ 



rs\o, p2, buf 



leal 1 s. ldrS 
%ca 11 poly 



%jneq eccOa 



[16K1F0RM LAST RESIDUE ADDRESS 

R2=A00RESS OF LAST UNPACKED RESIDUE 

R6=UNPACK LOOP COUNTER 

IF EO O THEN DONE/ELSE STORE UNPACKED RESIDUE 

ADJUST HI 4 BITS OF R1 

SAVE IN RO/GET NEXT RESIDUE 

STORE UNPACKED RESIDUE 

ADJUST LD 6 SITS OF PACKED RESIDUE 

FORM RESIDUE, STORE, GET NEXT RESIDUE 

DECR COUNTER/GO TEST FOR DONE 

; ISOLATE PACKED PART OF RESIDUE S SHIFT 

;r2=power of alpha in divisor 

;q=1023. for log range chock 

; ADDRESS OF 2ND ECC RESIDUE 

;high order term in dividend 

; perform division 

; set up pointer to store syndrome 

;test for completion 

; store syndrome 

; set up for next division 

;continue if not complete 
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c 



3 
O 

II 










5 
rx 
O 

LL 










006477 


033743 


O07 122 


125567 


006S00 


033700 


010003 


1 1 6520 


006501 


033743 


007 121 


125567 


CO 


006502 


033707 


O10003 


156520 


O 


O0S5O3 


131 140 


000007 


OOOOOO 


en 


0O65O4 


030060 


030000 


156505 


-1 












O065O5 


033741 


000017 


116512 




006SO6 


030067 


030007 


146507 




006507 


031443 


007003 


1 25567 




O0651O 


01 6507 


010003 


106520 




0065 1 1 


031441 


1000 1 


006520 




006512 


131147 


OIOOOO 


01 6508 



******* 



; S i ng 1 a Error Test 

If there is only one error present then the rema i nder from 

the syndr ome calculation has only one term.That is, each power series 

contains one term. So that 

( 1 U(0) (2) j(0) (3) j{0) 

S( 1 ) : Alpha Y( t) , S(2)=Alpha Y( 1 ) ,S(3 J =A1pha Y{ 1 ) 

( i ) jtO) 
and in general S(i)=ATpha V ( i ) . 

It can be seen from this that dividing any successive pairs of syndromes 

j (O) 
yields Alpha .This is the antilog of the error location. 

3j{0) 2j(0) j(0) 

For example S{3)/S(2) s Alpha Y(1)/Alpha Y{1) = Alpha 

Therefore if a single error is present each division of a syndrome 
by the sucessive Syndrome will yield the same value and that value will 
be the antilog of the error 1 ocat i on .The single error test then performs 
these sucessive syndrome divisions until either the result of one division 
is not equal to the result of the previous divisions or all the divisions 
produce the same result. If any syndrome is zero then a single error can 
not exi st . 

(0) j(0) 
In the case of a single error, S(0} = Alpha V(1) s Y(l) 
Therefore, in the single error case syndr ome number zero is the error value 



********* 



******* 



MOV 


#SY*S . , R3, BAR 


SCALL 


s. ldcr 


MOV 


{ BUF) , RO 


%JZRO 


ECC2 


MOV 


#SY+7, R3.BAR 


%CALL 


s . ldcr 


M0V\F 


(BUF) , R7 


7.JZR0 


ECC2 


SUB 


R7.RO 






AOD\T 


R0,0, RO 


7.TNEG 





; Start with SY( S } 

; RO=LOGf SY(S) ) 

;Get SY(7) for 1st divide 

; R7=LG(SY(7) ) 

; DIVIDE SY(8)/SY(7) 

; range test on log sum 

The syndromes must form a geometric progression with "distance" RO 

; Init loop count, enter loop 

; Normal i ze descending predictor 

; Get next Syndrome in CAR 

;no single error with a zero Syndrome 

; No single error if no geom prog 

.Advance predictor s loop 



MOV 


#15 . , R1 


%JMP 


ECC IB 


AD0\T 


R7,0, R7 


%TNEG 




DEC 


R3, R3, BAR 


7.CALL 


S . LDCR 


XOR 


(BUF) , R7\N 


%JZRO 


ECC2 


DEC 


R1 


•/.JNZRO 


ECC2 


SUB 


R0.R7 


7.JNZR0 


ECC1A 



SINGLE ERROR FOUND 



0065 1 3 


013740 


00707 1 


12561 6 






MOV 


#EL0C+1 .BAR 


•'.CALL 


S .STRO 


006514 


013740 


007 134 


125631 






MOV 


#ECOUNT,BAR 


7.CALL 


INIT1 


0065 15 


013740 


007 1 1 2 


135601 






MOV 


#SY,BAR 


7.CALL 


S . LDR7 


006S 1 8 


01 3740 


007047 


125625 






MOV 


#EVAL+1 , BAR 


•/.CALL 


S .STR7 


0O65 1 7 


013440 


OOOOOO 


106675 






NOP 




itJMP 


E900 


KDBUP 




KDB50 . MI CROCODE . 


, 22 


APR 


- 1988 1 


1:16:48.97 







; ERROR LOCATION 

;ERROR COUNT = I 

•FETCH SY(O) 

TERROR VALUE ■ SYIOI 

; go correct error in buffer 
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Q 
< 

a 
is 

cc 
O 

LL 

<0 

o 

CO 



OOS520 
006521 
006S22 
006523 
006524 
006525 
006526 
006527 



033741 
033742 
033746 

010542 
010542 
1 20342 
031441 
034446 



O00O1 1 
000035 
OO0OO1 
00701 1 
007033 
007002 
000001 
010006 



oooooo 
oooooo 
oooooo 

135624 
135624 
135624 
OOOOOO 
006523 



0O6530 013740 



007240 135630 

KDB50 .MICROCODE 



ia1 from Syndromes 



****************************** 
Compute Error Location Polynom 

The following 4 sections of code implement the Berlekamp 
algorithm for generating an Error Location Polynomial.lt is 
an iterative algorithm and executes 17 passes. The algorithm 
is document ed in 'Peterson and Weldon' and should be understood 
in detail before changing this code. 

Basicly it involves generating a polynomial from the syndromes 
whose roots are the locations of the errors. The current iteration 
is n.The error location polynomial at iteration n is elpn. It is 
necessary to keep around the results of one of the past iterations. 
This previous iteration number is m. The previous error location 
polynomial is elpm. A set of scratch values for intermediate calculations 
are stored with the suffix o , such as elpo. 

Dism.disn are the 'discrepancy' of elpn and elpm. 

Ln.Lm are measures of the linear independence of the matrix of 

equat ions which generate elpn and elpm. 
Dn.Dni are the degree of the polynom i a 1 s elpn and elpm 

Each iteration takes elpn, e 1 pm, d i sn, di sm and generates e1p(n+1 ) 
Part 2 takes elpn and the syndromes and computes the 
discrepancy between elpn and e1p(n+l ) . 

Part 3 uses this discrepancy and eVpm.dism to generate e1p(n+1) 
Part 4 generates l(n+l),d|n+l) and determines what the new 
elpm should be for the next iteration 

This code is for the multiple error cases. 

************************************** 
Part 1 - Set up initial parameters 

N is initialized to 

2 
Elpn is initialized t o 1 + Ox + Ox + 

M is initialized to '1 

2 
Elpm is initialized to 1 + Ox + Ox + 



*********** 



D i sm is initialized to 1 
******************************* 
ecc2 :'■ mov #9 . , Rl 

mov #elpn, r2 

mov #1 , r 6 
ecc2a: add #e 1 pm- e lpn , r 2\n , bar %cal 1 s.strS 

add #elpo-e1pn,r2\n,bar %ca 1 1 s.strS 

i neb r 2\o, r 2 , bar 

dec Rl 

c 1 r r 

; *** NOTE - R1 



******************* 
; [U52EC1 IR1 >9 



%cal 1 S.strS 

; [US2EC1 ]DECR Rl 
%jnzro ecc2A 
O EXITING LOOP, BECOMES INITIAL VALUE OF N 



i 

1 \J 



MOV #LN,BAR 
. ,22-APR- 1988 11:18:48.97 



'/.CALL 



S .CLRB 



[U52EC1 ]LN = 
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006531 
006532 
006 5 32 
OOSS32 

*""%J OOS5 33 
J 006534 



006536 
006537 
006540 
OOS54 1 



006542 
006543 
006544 



006545 
006546 
006547 
0065SO 
006551 
006552 
006553 
00SS54 



006556 
006557 
O06560 



013740 007061 135632 



013740 
013740 
0I374O 



003001 13S630 
007064 125630 
007134 135630 



033440 
030540 
033747 
033743 



00000 1 
00O102 
000035 
010070 



OOOOOO 

000000 
126751 
106577 



01374O 
013740 
132140 



030143 
013740 
033702 
013740 
033705 
131142 
030062 
033750 



007063 12S626 
007O61 135573 
00000 1 OOOOOO 



OOOOOO 
007063 
O00003 
007062 
000003 
0OOO05 
030002 
00004 6 



O I 0000 

125567 
10000 
135567 
OOOOOO 
OOOOOO 
146554 
1 0000 



00655S 120350 007010 126735 



120343 
03650S 
I 12543 



0070O3 010000 
000003 010000 

OOO 1 O 1 1 0000 



MOV 


#M,BAR %cal 1 


i n i tm1 


assume 


<dism£ 17>,eq,<m*17+1> 




assume 


<disnal7>,eq, <dism« 1 7+1 > 


mov 


#1 , buf %cal 1 


s . c 1 rb 


MOV 


#DM,8AR %CALL 


S . CLRB 


mov 


#LM, bAR %ca 1 1 


s.clrb 


MOV 


#DN,BAR %CALL 


S . CLRB 


mov 


#ecount , bar %ca 1 1 


s.clrb 
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[US2EC1 ]M= - 1 



dism : 1 / di sn : 

[U52EC1 ] ZAP DM 

LMsO 

IU52EC1 ] ZAP ON 

ecount = o 



X******XXX***********XXXXX************************XXXX** 

Part 2 - Compute Discrepancy between Si groa { n) to Si gma ( n+ 1 1 



Oisn s e1p(0)S( -8 + n) 



elpt 1 )S( -8+n+1 ) + ...+ eip(1n)S(-a + n+m) 



00 6 5 3 5 013740 007240 125576 «3 1 1 : 



******** 



tttttii($»**< 



mov 


# In, bar 


%cal 1 


s . Id 


MOV 


R1 , RO 






add 


#SyO-8 . , ro 






mov 


#e 1 pn , r 7 


leal 1 


dot 


mov 


#elpo, r3 


% jtro 


e350 



p3: 1n( 1 inear independence 
measure of elpn ) 

EU52EC11R0 s ITERATION NUMBER 
rO - > syndrome ( - 8 + n ) 
take dot product of elpn.S 
if disruO, skip updating of Sigma 



XX****XXX*X**XX*******XXXXXX****XXXXX***X» 

Part 3 - Compute sigma(n+1) from s i gma ( n ) 




mov 


#d i sn, bar 


%ca1 1 


s 


St 10 


mov 


#m , bar 


%ca1 1 


s 


Idro 


RSUB 


R1 , RO 









Store discrepancy from above 
[US2EC1 JrO s m 
[U52EC1 IrO s n-m 

Note that at this point ELPO z ELPN from the initial conditions or from 
the end of the last iteration - we now modify ELPO to be ELP ( N+ 1 ) . 

add 
mov 
mov 
mov 
mov 
sub 
add\t 



s . ider 
s. ider 



rO,r3 
#disn, bar 
(BUF) , r2 
#d i sm, bar 
(BUF ) , r5 
r5, r2 
q,r2 
mov #e 1 pm, r 10 

;Multiply disn/dism by e 1 pm term 
INCB R10\0,R10,BAR %CALL MULBR2 
;Xor result of multiply with proper elpn term (result in r5j 
;to compute elp(n+1( term 



Tocal 1 
%call 

%t neg 



e335 : 



; index into proper position in e 1 po 

; fetch d i sn 

; r-2 » log(disn) 

; fetch d i sm 

; r 5 s 1 og( d i sm) 

; comput e disn/dism 

; 1 og range t est 

;rlO points to elpm 

SET UP AND PERFORM MULTIPLY 



i neb 

xor 

emp 



r3\o, r 3 , bar 
( bu f ) , r 5 
#elpo+9 . ,r3 



fetch proper e lp( n+ 1 ) tern 

perform xor 

check for end of loop 
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O06561 013440 013005 016555 



OOSS62 
00S563 
006564 
O0656S 
006566 



O06567 
006570 

00657 1 
006572 
006573 
006574 



006575 
006576 



01 3740 
030140 
013740 
01 1 140 
01 3440 



033747 
033746 
01 3740 
01 3740 
Ol 3740 
01 3740 



033746 
033747 



1 12541 
130441 



007O64 
000003 
007240 
000005 
033000 



000035 
000046 
007063 
007062 
007064 
007061 



000035 
O0OO70 



00OO20 

1 000 1 



135576 
10000 
135577 
10000 
156575 



OOOOOO 

136670 
135600 
125624 
135623 
135620 



10000 
126670 



010000 

016535 



mov 



r5, buf 



7.jn2ro 6335 



; store resu It 



i ********************************************************** x X X 

; part 4 - Update variables for next pound of elpn computation. 

; Now that elp(n-M) has been computed from elpln) 

; it is necessary to compute 1 n ( n+1 ) , dn( n+ 1 ) , dm( n+ 1 } , e Ipm( n+ 1 ) , 

; and dism(n+1) from In, dn, dm. e 1pm, and dism. 

;*X***XXXXX*X*****XX***X**XX*****XXX****** X********* ********** 

;0n entry rO contains n-m 

: Compute On(n+1) s dm + n - m 



#dm, bar 
ro , r 2 



;Now see if Ln will change - i.e. if Lm+n-m > Ln 



IU52EC1)get dm in r2 
[U52ECI JR2 = dm * n - 



s dnl n+1 ( 



mov 


#lm, bar 


add 


r3, rO 


mov 


#ln, bar 


subc 


r5 , rO\n 


mov\f 


rO, buf 



new L(n+1) candidate 



leal 1 s. Idr3 ; R3 = Lm 

; R3 = Lm+n-m 
%cal 1 s. Idr5 ; R5 = Ln 

; Compare to see if Ln changes 
%jneg e345 ; br if not, else do it 



ELPM should be updated if n - Ln 
Lm+n-m>Ln so the test has been 



mov 


#elpn, r 7 






mov 


#e 1 pm, r 6 


%ca1 1 


ecmovS 


mov 


#di sn, bar 


%ca 1 1 


s . Idr 6 


mov 


#di sm, bar 


%cal 1 


s.strB 


mov 


#lm,bar 


%ca 1 1 


s.strs 


MOV 


#M, BAR 


%CALL 


S .STR1 


mov 


#n , bar 


%ca 1 1 


s . Idro 


mov 


0m, bar 


%cal 1 


s . StrO 


mov 


#dn, bar 


%cal 1 


s. Idr3 


mov 


ir*dm, bar 


%cal1 


s . st r 3 



• m-Lm, but this is equivalent to 
lade already! Go for it! 



elpm( n+ 1 ) s e 1 p ( n ) 

d i sm{ n+ 1 ) sdi sn 

store new d i sm 

1 m ( n + 1 ) a 1 n 
[U52EC1 ]M(N+1 ) =N 
[U52EC1 )R0 s n 
[U52EC1 ]m( n+ 1 ) : n 
[U52EC1 ]dm(n+ 1 ) :dn 
[U52EC1 ] store new dm 



Now that elpn has been used for all needed comput at ions 
replace elpn with the computed elp(n+l) 



mov 


#& 1 pn , r 6 


mov 


#e Ipo, r 7 


Mov 


#dn, bar 


CMP 


# 1 6 . .; R 1 


INC 


R1 



ecmov9 
s . str2 



% jnzro a 3 1 1 



store e lp( n+ 1 ) 
[U52EC1Istore new On 

[U52EC1 1CHECK FOR END OF MAIN LOOP 
[U52EC1 ] loop 



-Solve Error -Location Polynomial to find locations and values 
;Part 1 -Fact or Error Location Polynomial 



; XXX*****XXXX*X***XXX*XXX 
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;The Error Location Polynomial(elp) is of the form : 

2 v 

alp s 1 + e1p(1 )x + e1p(2)x + ... + Qlp(v)x a o 

whore v is the number of errors. 



This is also of the form: 

i( 1 ) i (2) 

(x + alpha )(x+alpha ). 



i (v) 
. ( x + a Ipha 9 



where i ( . ) are the error locations C in symbo 1 number ] 

values are plugged into the formula until a solution is found. 

He Error Location Polynomial Prime (eipp) is theelp 
; after one of the error locations has been factored out. It has the 
; form: 2 V- 1 

eipp « 1 + e1pp(i)x + elpp(2)x + ... + e1pp(v-i)x 



and eip 



i(1) 

( 1+alpha x) ( eipp) 



Represent ing the coefficients of eip in terms of the coefficients 
of eipp allows us to find the eipp coefficients: 

i ( 1 ) 2 v- 1 

eip = (1+alpha x)(1 + elpp(1)x + e1pp(2)x +...+ e1pp(v-1)x 

i ( 1 ) ill) 2 

or eip : t +■ (alpha +e1pp(1))x + ( a ipp ( 1 ) a Ipha +e1pp(2))x 

i ( 1 ) 3 i ( 1 ) v- 1 

+ ( elpp( 2 )alpha + elpp(3))x +...+ ( e 1 pp ( v - 1 ) a 1 pha )x 
;Since this is a represent at ion of eip the coefficients of each torm 
; in x must be the same the coefficients in the original representation 
; of eip. Equating the coefficients yields: 

i (1 ) 
elppM) s e1p( 1 ) + elpplojalpha 

i t 1) 
a 1 pp ( i ) = elp(i) + elpp(i-l) alpha 

1(1) 
elpp(v) : elp(v) + elpp(v-l) alpha 

i(D 
;Note however that elpp(v) must be zero when alpha is a root 
; Therefore, by going through an iterative procedure rather than a 
;straight substitution it can be determined what the root is and 
; s imultaneously find the coefficients of eipp. 

;The algorithm then is as follows: 

(0) 

;Start with alpha 
; Us i ng the outined iterative procedure find elpp(1) through e1pp(v) 

If Gipp(v) is zero then the alpha value picked is a root and the 
lvalues generated for eipp are valid. If not increment the power 
;of alpha and redo the iteration. Continue until a root is found 
; The section of code after this one is then executed ( after each root 



o 
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is found) in order to determine the error value corresponding to that 
error location. The eipp values then become the eip values and the 
procedure is repeated. This loop continues until all the errors are found. 



********* 



********** 



********** 



006601 
006602 
006603 



006604 
OO6605 

OODS06 
006607 
006610 

00661 1 
006612 
006613 
006614 
006615 



006G1 6 
006617 
006620 
006621 



013740 
131542 
034442 



013740 
1 12042 
1 13542 
033750 
033740 

013445 
1 13545 
033440 
036505 
120350 



021347 

130460 
013445 
130462 



007240 
01001 1 
020002 



007240 
0O0002 
027070 
00O06O 
007036 

000005 
017074 
O0700O 
000003 

007O10 



003005 
OIOOOO 
0OO0O5 
01OO02 



125575 
1 16734 
156734 



125601 
OIOOOO 
1 16734 
125S77 
116614 

OOOOOO 
036737 
OOOOOO 
01OO0O 
OIOOOO 



OIOOOO 
OS661 1 
OOOOOO 
046604 



S . LDR7 



ERRRR 
S . LDR5 



MDV #LN,BAR 7.CALL S.L0R2 

SUB #9.,R2 %J2R0 ERRRR 

clr\F r2 %JGTE ERRRR 

;r2 will be power of alpha tested as root 

; valid range for power is to 1023. 

A: MOV #LN,BAR XCALL 

CMP R2.0 

BIS #ALGADR, R2\N,BAR 7.JGTE 
MOV #ELPP+1,R10 XCALL 
MOV #ELPN+1 , RO, BAR iSJMP 

B: ^Multiply e 1 pp ( . ) *a 1 pha* * ( i ( . 1 ) 

TST R5 

BIS #LGADR,R5\N, BAR 7.CN2RO 
MOV RO.RO.BAR 

BP : XOR (BUF) , R5 

INCB R1O\0, RIO, BAR 

.-Continue until elpp(v) has been computed 



MULR2 



OECB 


R5^ 


0.R7 


BUF 




INC\T 


RO 


RO 




7.JNZR0 


TST 


R5 








INC\T 


R2 






7.JN2RO 



;IF EO THEN FATAL/ELSE test for uncorecctabl 
:branch if uncorrectable 



; R7 : CURRENT VALUE OF V 

.OUTSIDE VALID RANGE-ERROR 

; TAKE ADV OF FACT THAT ELPP(0)>1 

; R10:ELPP INDEX, R5:AL0G(R2) 

;rO s elpn index, enter loop in middle 



PERFORM MULTIPLY 



;xOR RESULT WITH ELPN TERM 
;SETUP NEXT ELPP TERM 



DECREMENT LOOP COUNTER 



e err o • 



;STORE ELPP, 

; CONTINUE 

;DONE - CHECK REMAINDER FOR ZERO 

;TEST ELPP(V) FOR 0, LOOP IF NOT 

;IF ZERO, ROOT HAS BEEN FOUND 

.AND JUMP TO FIND ERROR VALUE 

:If power of alpha chosen was not a r oot , i ncr ement power 

i of alpha and try again 



006622 013740 007134 125602 

006623 130450 OOOOIO 135626 

006624 030SSO 007070 135621 

006625 033741 007057 135631 

006626 013740 007240 135614 
00GS27 033443 OOOOOO OIOOOO 



Part 2 - Use error location to find error value 

************************************************* 
This code implements the following algorithm: 



SlO)elpp(v-l) ♦ S(1)elpp(v-2) +. 



♦ S(v- 1 )elpp(0) 



(O) 111] lv-1 li(1) 

Alpha elpp(v-l) + Alpha e 1 pp( v - 2 ) + . . . + Alpha elpp(O) 



*********** 



******** 



MOV 


»ECDUNT,BAR 


7.CALL 


S . LD10 


INC 


RIO 


%CALL 


S . S T 1 


ADO 


#EL0C.R1O, BAR 


7.CALL 


S STR2 


MOV 


#eLPP,R1 .BAR 


7.CALL 


INIT1 


MOV 


*LN, BAR 


7.CALL 


S . DECS 


MOV 


RO.R3 







**************** 



; INCREMENT NUMBER OF ERRORS 

; AND RESET 

ISTORE ERROR LOCATION 

;ELPP(0) * 1 

1 RO = V - 1 

; R3 = V - 1 



(. 



f 
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OOS632 
0O6S33 
OOS634 
OOS63S 
006836 



006637 
006640 
006 64 1 
006642 
006643 
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computation of denominator 

This is really the evaluation of the polynomial 

(v- I ) (v-2) 

elpp(0)X + elpplllx + ...* elpp(v-l) = O 



034445 
033441 



033747 
033740 
030140 
013440 

1 13550 



013450 
1 13541 
013441 
033705 
132145 



006644 
006645 



01 3740 
010S50 



OOOOOS 
000OO5 



010057 
0OO1 12 
000003 
010000 
007074 



OOOOIO 
017074 
000001 
10O03 
000007 



007 1 34 
007046 



136744 
OOOOOO 



1 1 6734 
OOOOOO 
136751 
106734 
135601 



OOOOOO 
106734 
OOOOOO 

I0S734 
136741 



125602 
135623 



at X - alpha 



CLR 
MOV 



i ( 1 I 



RS.RI 



.RETURNS R5=DEN0MINAT0R 
;SAVE R5 BEFORE NEXT CALL 



Now compute numerator 

This is the dot product of a vector composed of 

elpp(O) , elpp( 1 ) ,elpp(2) elpp(v-l) with the vector 

S(v-1 ) ,S(v-2) ,S(v-3) s(0) 



MOV 
MOV 
ADD 
NOP 
BIS 
BIS 



#ELPP,R7 

#SYO,RO 

R3.RO 



7.JZRQ ERRRR 



'/.CALL DOT 

*/.JZRO ERRRR 

#LGA0R,R1O\N,BAR "'.CALL S.LDR7 

#LGA0R.R1\N, BAR 7.CALL S.LDR5 



;R7 POINTS TO ELPP VECTOR 
;RO IS POINTER TO SYNDROMES 
;RO IS PTR TO SYNDROME VECTOR 

; [U52ECIID0T RETURNS R10 = NUMERAT0R/R7 : LOG ( NEME 



Compute value = numerator /denomi nat or 



TST 


R10 




BIS 


#LGADR,R1\N 


BAR %JZRO 


TST 


R1 




MOV 


(BUF) , R5 


7.JZR0 


RSUB 


R7.R5 


"'.CALL 



Returns rS = error 



MOV 

ADO 



#EC0UNT,BAR 7.CALL 
#EVAL, R10\N, BAR %CALL 



ERRRR 
MULR2X 



. LD 10 
.STR5 



IF EO < 
DIVIDE 



THEN ERROR/ELSE, LOAD CAR WITH DENOMINATOR 
THEN ERROR/ELSE rS = 1 og ( denom i nat or 1 



;C0MPUTE STORAGE LOCATION 
; [ U52EC 1 ] St or e error value 



Part 3 - Modify syndromes and return to find next f act or { 1 ocat i on ) 

**********.** 



ex******* 



******** 



Each syndrome is really the summation of a power series 
comprised of the error locations and values. For instance 
for v errors, 2 2 2 

Syndrome(2l = X(1) Y(1) * X(2) Y(2) ♦...♦Xlv) Ylvl 
At this point in the code, an error location and value have 
been found and factored out of the elp. Since the syndromes and 
elp coefficients are related, and the elp coefficients have been 
updated to represent v-1 errors, the syndromes must now be updated 
to represent v-1 errors. The situation now is as if there were only 
v-1 errors to begin with and the syndromes for the case of v-1 
errors must be derived from the syndromes for the v error case. 
From the form of the Syndromes it is clear that the form of the 
new syndromes will be 2 2 2 

SyndromeI2) = X(21 Y(2) <-X(3) Y 1 3 ) + . . . +X < V ) Ylv) 



KDBUP 
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;Therefore the transformati 



S(2) - X( 1 ) Y( 1 ) 



; Or i 

• ** ** 



general 

********* 



■ ( i ) ■ S( i ) 

************ 



X ( 1 ] Y( 1 1 

************ 



006S46 033740 000 112 OOOOOO 



006647 
006650 
006651 
006652 
006653 
006654 

0O6B55 
006656 
OOB657 
006660 
O06661 
006662 
006663 



006664 
006665 



006666 
006 667 



013740 
010550 
1 33545 
034446 
033445 
030145 

030146 
132046 
030066 
120340 
036505 
031443 
013440 



013740 
033746 



033747 
01 3440 



007240 
007070 
007074 
OOOOOS 
000006 
000007 

000002 
000006 
030006 
0O700O 
000003 
000003 
023005 



007240 
O10O35 



O00O57 
OOOOOO 



125576 
135575 
135601 
OOOOOO 
O 10000 
13674 t 

OOOOOO 
OOOOOO 
156660 
OIOOOO 
01000O 
OOOOOO 
106653 



125576 
106675 



136672 
106604 



;r5 is error value on entry to this module 

MOV #SYO,RO 
;only need to udate those syndromes which 
#LN,BAR "'.CALL 

#EL0C , R 1 0\N , BAR 
#LGADR, RS , BAR 



F : 



MOV 
ADD 
BIS 
CLR 
MOV 
ADD 
returns result 
ADD 
RSUB 
A0D\T 
INCB 
X0R 
DEC 
MOV 



7.CALL 
'/.CALL 



wi 1 1 
LDR3 
L0R2 
LDR7 



R6 

R6 , R5 

R7 , R5 

in r5 

R2 , RS 

R6,0, R6 

0, R6 

RO\0, RO, BAR 

(BUF) ,R5 

R3 



R5.BUF 7.JGTE F 

;elpp parameters computed above become the elpn 
; parameters for the next pass 



MOV #LN,BAR 
MOV #ELPN,R6 



MOV 
NOP 



#ELPP, R7 



%CALL S.LDR3 
7.JE0 E90O 



"'.CALL 
%JMP 



********** 



Ecmove subroutine 



********** 



; RO IS POINTER TO SYNDROME 

e needed next time 

;R3:NUMBER OF SYNDROMES TO FIX 

; [U52EC1 1R2SP0WER OF ALPHA(ROOT) 

; R5 IS ERROR VALUE/ R7 : LOG ( ERROR VALUEI 

;R6 IS I FROM DISCUSSION 

;SET UP FOR MULTIPLY 

;mult iply X (.)>«< I Y (.) ) 

;SET UP NEXT POWER OF x(.) 

; RANGE TEST 

; BRING LOG INTO RANGE 

;bar -> SYNDROME 

;FORM MODIFIED SYNDROME IN r5 

; COUNT DOWN THE LOOP 

;ST0RE SYNDROME, CONTINUE 



NUMBER OF TERMS TO TRANSFER 
SET UP ELPN POINTER 
TEST FOR NO MORE ERRORS 
TRANSFER ELPP TO ELPN 
FIND NEXT ERROR 

******************** 



This subroutine moves elements of one list into another list 
inputs: r7 points to input list 

r6 points to output list 
ecmov9 moves 9 elements from one list to the other list 
ecmove moves a number of elements specified in r3 



o 



006670 


033743 


OOOOIO 


1 16672 


ECM0V9 : 


MOV 


#8 . , R3 




7.JMP 


ECMOVE 


006671 


013440 


033010 


137777 


ECMOVX : 


MOV 


RIO, BUF 




'/.RNEG 




006672 


120347 


007007 


125602 


ECMOVE : 


INCB 


R7\0, R7 


BAR 


7.CALL 


S . LD10 


006673 


120346 


0O7006 


O1000O 




INCB 


R6\0. R6 


BAR 






006674 


031443 


000003 


1 16671 




DEC 


R3 




7.JMP 


ECMOVX 



**XXXXXXXXX**XXXXXXXX**X*X*X*XXX*X*****XXXXXXXXXXX*XX*X* 

Amend Data Buffer 

This section steps through the lists of error locations and 
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006S75 
006676 
OOSS77 
OO670O 
OO6701 
006702 
OO6703 

006704 
00670S 
006706 
OO6707 
006710 
00671 1 
OOS7 1 2 
006713 
006714 
006715 
006716 
006717 
006720 
006721 
006722 
006723 
006724 
0O672S 
006726 
006727 

006730 
006731 
006732 
006733 



013740 
030540 
033741 
033742 
013740 
120341 
131547 

131547 
077450 
030150 
001 150 
074650 
075647 
003740 

120342 
007740 
063446 
031450 
034045 
007240 
034046 
030147 
006045 

130447 
006046 
031443 
034443 

013740 
010547 
010545 
013443 



007172 
007002 
00007 1 
000047 
007134 
00700 1 
000377 

000256 
030007 
0000 10 
000007 
000007 
000007 
000004 
007002 
OOOOOO 
030006 
000010 
000006 
OOOOOO 
000006 
007000 
0OO0O5 
007007 
000006 
000003 
O10O03 

007172 
007O06 
007022 
000003 



135873 
135573 
OOOOOO 
OOOOOO 

125576 
125601 
010000 

OOOOOO 
016734 
10000 
OOOOOO 
OOOOOO 
010000 
12S503 
135600 
116716 
146717 
1 1 6715 
OIOOOO 
OOOOOO 
010000 
135572 
135613 
135572 
135613 
OOOOOO 
046702 

135601 
135577 
135602 
127777 



E9 15 
E9 17 
E920 



MOV 

ADO 

MOV 

MOV 

MOV 

INCS 

SUB 

VALUE US 

SUB 

COM\L 

ADO 

SUBC 

ANOM 

BIC\L 

MOV 

INCB 

COM 

MOVNLOP 

DEC 

AND 

COM 

ANO 

ADO 

XOR 

INC 

XOR 

DEC 

CLR\F 

MOV 
ADO 
ADD 
TST 



, BAR 



7.CALL 
%CALL 



7.CALL 
7.CALL 



. LDRO 
. LDRO 



S . LDR3 
S . LDR7 



INST 
> , R7 



7.JNNEG ERRRR 



#SAVR7,8AR 
#BUP BP.RO.BAR 
#EL0C*1 ,R1 
#EVAL«1 ,R2 
#ECOUNT , BAR 
R1\0,R1 
#255 . ,R7 

IN NEXT 
#<429 . - 255 
R7 , RIO 
RIO, RIO 
R7, R10.0 
# 7 , . R 1 
#7,Q,R7 
#4,0 
R2\0.R2,BAR 

#0,0 

R6.R6 

R10 

R6,0,RS 



R6.Q.R6 

RO, R7.SAR 

R5,0 

R7.R7.BAR 

R6.0 

R3 

R3 



#SAVR7,BAR '/.CALL S.L0R7 
#BUF .SO, R7\N, BAR 7.call S.LDUB 
#SDI .PO,UBAR\N, BAR 7.CALL S.LD10 
R3 7.RET 
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; ROsPTR TO BUFFER CONTROL AREA 
; ROsSTART OF DATA SUFFER 
;START OF ERROR LOCATION LIST 
;START OF ERROR VALUE LIST 
: NUMBER OF ERRORS 
;NEXT ERROR LOCATION 






V. 



< <<WORDS/SECTOR* 16,+9.>/10. + 17->> **« 



7.CALL 


S.RRR7 


7.CALL 


S. LDR6 


%JMP 


E917 


%JNEG 


6920 


7.JMP 


E91S 


•'.CALL 


S . LDOO 


7.CALL 


S .STOO 


r.CALL 


S . LDOO 


%CALL 


S . STOO 


7.JNZR0 


E9 1 



IF NOT NEGATIVE THEN ERROR 

MULTIPLY ERROR LOCATION BV 10 

6 SEPARATE INTO WORD AND BIT LOCATIONS 

SET RIO 

SET R7 

BUFFER OFFSET 

ERROR VALUE 

q i -1/CONTINUE 
R6 ROTATES LEFT, DOUBLES 

SHIFT ERROR VALUE FOR MASK 

LOW ORDER MASK 

HIGH OROER MASK 
BUFFER ADDRESS TO MASK 
[U52EC21C0RRECT OATA 

1U52EC21C0RRECT DATA 



RESTORE BUFFER POINTER TO R7 
RESTORE SDI CTL BLOCK PTR TO UBAR 
RESTORE MSCP PKT PTR 
R3sO(0K! OR 1 (ERROR) /RETURN 



006734 033743 OOOOO 1 



R3=1/G0 RESTORE R7/RETURN 



Subr out i neS 



this routine multiplies PS by alg(p2) 

input: Igadr(rS) in BAR and state reflected in condition codes 

r2 is log of other multiplicand 

q contains 1023. 
output: result in R5 
input: BAR points to place to get R5 



006735 
006736 
006737 



033705 
1 13545 
033705 



000003 
017074 
000003 



OOOOOO 

127777 
050000 



MOV 
BIS 
MOV\F 



(BUF) , RS 

#LGADR, R5\N,BAR XRZRO 

IBUF) , R5 



;TEST FOR O MULTIPLICAND/ELSE, 
;TEST FOR O MULTIPLICAND 
.TAKE LOG IF NOT ZERO 



GET MULTIPLICAND FROM 



KDB50. MICROCODE. .22-APR-1988 11 : 16:48.97 






KDBUP DIGITAL EQUIPMENT CORP. 

OOA ECC CORRECTION ROUTINE 



2901 ASSEMBLER VERSION 32 



006740 


030145 


OOOO02 


OOOOOO 




ADD 


R2.RS 






006741 


132045 


03O0O5 


156742 


MULR2X: 


RSUBXF 


RS ,0,R5 




%TNEG 


006742 


030065 


03O005 


156743 




ADD\T 


0,R5 




XTNBG 


0O6743 


133545 


007070 


105577 


MUL2RA: 


BIS 


#ALGAOR.RS 


BAR 


?..JMP 



POLY 
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GRANGE TEST ON LOG SUM 

;BRING LOG INTO RANGE 

; TAKE ANTILOG ANO RETURN 



this routine evaluates a polynomial 



006744 


013445 


000005 


1 1 6746 


POLY : 


TST 


006748 


036505 


030003 


137777 


POLYP: 


XOR 


006746 


1 1 3545 


01 7074 


036737 


POLYX : 


BIS 


006747 


120341 


007001 


OIOOOO 




INCB 



006750 031440 OOOOOO 1 1 674 S 



Note that evaluating a polynomial at say x = r is the s 

as the remainder after dividing the polynomial by x-r. 

r2 : value at which polynomial is being evaluated 

p5 : polynomial result up to that point in calculation 

p1 a term pointer in polynomial 

rO : number of terms - 1 

outputs res Tut in rS 

RS %JMP POLYX 

(BUF) , R5 %RNEG 

#LGADR, R5\N , BAR %CNZRO MULR2 
R1\0,R 1 . BAR 



RO 



%JMP 



POLYP 



this routine takes the dot product of two polynomials 



006781 


034450 


0000 10 


106753 


DOT : 


CLR 


R10 




SJHP 


00T2 


006782 


036150 


03000S 


127777 


00T1 : 


XOR 


R5, RIO 




•iRNEG 




006783 


120347 


OO70O7 


138877 


D0T2 : 


INCB 


R7\0.R7,BAR 




7.CALL 


S . LDR5 


006784 


1 13548 


0O7O74 


12SS7S 




BIS 


#LGADR, R5\N 


BAR 


•'.CALL 


S . LDR2 


0067SS 


013445 


000005 


OOOOOO 




TST 


RS 








006786 


021340 


17000 


026738 




DECB 


R0\0 , RO, BAR 




7.CNZR0 


MULSR2 


006787 


031443 


000003 


1 1 6752 




DEC 


R3 




%JMP 


D0T1 



; *** ROUTINES FOR UNPACKING ECC RESIDUES *** 

006760 021343 007003 135574 GETRES: DECB R3\0,R3,BAR XCALL S.L0R1 ; REPACKED ECC RES I DUE/UPDATE POINTER 

006761 021342 007002 137777 SETBAR: DECB R2\0,R2,BAR %RET ; BAR:PTR TO RESIDUE STORAGE AREA, UPDATE R2/RETURN 

. PAGE 
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.SBTTL U.PROC REVECTORING PROCESS 
;+ 19-SEPT-19S3 UDA/ODA MICROCODE 

REVECTORING CODE 

THIS CODE IS STRUCTURED AS A PROCESS WHICH RUNS SOMETIMES UNDER THE UNIBUS 
PROCESSOR AND SOMETIMES UNOER THE OISK PROCESSOR. IT IS DISPATCHED TO FROM 
THE IDLE LOOPS OF THESE PROCESSORS. 

WHEN REVECTORING IS DESIRED FOR A DRIVE, THE "RVCT" BIT IS SET IN ITS SDI 
CONTROL BLOCK STATUS WORD (SOI. ST). WHEN THE REVECTORING CONTEXT BLOCK 
(RAM LOCATIONS REVSTR THROUGH REVEND) BECOMES FREE (REVSDI:OI THEN REVSDI 
IS SET TO POINT TO THE SDI NEEDING REVECTORING AND THIS PROCESS IS ENTERED 
AT U.RVCI BY THE UPPER PROCESSOR. THE VECTORING IS UNOER CONTROL OF THE 
WORD RVCVEC, WHICH ACTS AS A "PC" POINTING TO THE NEXT SECTION TO BE EXECUTED; 
IF RVCVEC IS EVEN A DISK PROCESSOR CODE SECTION IS INVOKED, WHILE IF IT IS 
ODD A UNIBUS PROCESSOR SECTION IS INVOKED; IN EITHER CASE RVCVEC IS A POINTER 
TO A DISPATCH IN THE UDA VECTOR TABLE. 



INPUTS : 



RVCBUF POINTS TO BUFFER NEEDING REVECTORING 
UBAR/OBAR POINTS TO SOI CONTROL BLOCK 



SOI. OB ADVANCEO PAST BUFFER (IF APPROPRIATE), 

OPERATION COMPLETE, OISK 

ON CORRECT CY L /GROUP/TRACK FOR SUBSEOUENT OPERATIONS. 



K0B5O. MICROCODE., 22-APR- 1938 11:18:43.97 



c 



KDBUP DIGITAL EQUIPMENT CORP. 

U PROC REVECTORING PROCESS 



2901 ASSEMBLER VERSION 32 



SINCE THE OISK PROCESSOR INITIALIZES THE VECTOR, THE FIRST STEP 
IS TO MAKE SURE THE UNIBUS PROCESSOR KNOWS WE ARE IN REVECTORING 
SO WE EXECUTE A NOP IN THE UPPER PROCESSOR... 



Rt CONTAINS INCREMENTED VECTOR ADDRESS 
; MOV Rl.BUF %JMP U.RVUX 

. PAGE 



[ UOAI ACTUAL LY DONE IN THE DISPATCH VECTOR. 



Q 
< 

D 

a 
ii 

s 

cc 
O 
u. 

<n 
o 
to 



o 
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006762 
006763 
006764 
006765 
006765 
O06766 
006767 
006770 



006771 
006772 



010545 
134541 
013740 

000545 
013740 
030546 
013740 



O30141 

130462 



OO7034 
OO0017 
007220 

007076 
007224 
000002 
007226 



00O00 6 
020002 



NOW SWITCH TO THE UPPER PROCESSOR TO SET UP TO REAO A SLOCK OF RCT 

THIS STEP IS INVOKED AT ITS MAIN ENTRY TO START A READ, AND IS ALSO INVOKED 

AT A SECONDARY ENTRV TO READ SUCCESSIVE COPIES OF THE RCT BLOCK IN CASE 

AN UNCORRECTABLE READ ERROR OCCURS. THIS STEP IS PERFORMED IN THE UPPER 

PROCESSOR BECAUSE THE LBN - - > CVL/GRP/TRK CONVERSION ROUTINES ARE HERE 

THIS SECTION IS ENTERED FROM MANY OTHER SPOTS IN THE REVECTORING CODE - BEWARE! 



13SS74 U. 

12S504 

12S620 

13321 1 
1 25600 
10000 
12S601 



000000 
146773 



ADD #SDI .RC.UBARXN, BAR 7.CALL S.LDR1 

AND #<L0NIB*256 . > , R1 %CALL S . SWB 1 

MOV #RVCRTY,BAR %CALL S.STR1 

ASSUME SDI . L2,E0,SDI . L 1+1 

ADO #SDI . L2, UBAR, Q, BAR %CALL LDR2R1 

MOV #RCTBLK,BAR 7.CALL S.LDR6 

ADD #2,R6 

MOV *RVCSUF,SAR '/.CALL S.LDR7 



GET WORD CONTAINING * COPIES OF RCT 

ISOLATE # COPIES/SWAP BYTES 

STORE IT AWAY AS THE RETRY COUNT 

MAKE SURE SEQUENTIAL 

R2,R1=1ST LBN OF RCT 

GET OFFSET TO DESIRED RCT BLOCK IN R6 

IU52EC21 I!C0#1 1BIAS TO GET PAST RCT HDR BLKS 

GET POINTER TO REVECTOR SUFFER IN R7 



o 



ENTER HERE WITH CURRENT LBN IN (R2.R1), RCT SIZE IN R6 , R7 - 
ADD R6.R1 ; ADD R6 TO (R2.R1) 

INC\T R2.R2 %TCRY 



> BUFFER. TO TRY NEXT COPY «** 



006773 
006773 



006774 
006775 
006776 
006777 
007000 
007001 
0O7OO1 
007002 
007003 
OO70O4 
007005 

00700E 
007006 
007007 
007010 

00701 1 

00701 2 
007013 
007014 
0070 15 
007016 
007017 
007020 
00702 1 



010545 007074 135604 



ENTER HERE WITH LBN TO OPERATE ON IN (R2.R1); CHAR, UBAR-->SDI CTL BLK 

ASSUME LBNMSK, EO , LOBYT ; MAKE SURE MASK IS LO BYTE 

ADD #SDI . 12,UBAR\N, BAR "/.CALL S.LLBO ; [ VOS ] GET LBN'S/TRACK IN R0<7:0> 



010S45 
010S47 
010547 
135542 
013740 

OOOSSO 

010547 
104640 
010S4S 
010547 



013440 
010545 
O10547 
01 3440 
010545 
033541 
013440 
013440 
013740 
130441 
013740 
01 7440 



007022 
007003 
007004 
000360 
007226 

007025 
007OO5 
000377 
007O1 1 
007005 



030000 
007022 
0O7OO2 
10OOO 
007026 
003001 
000000 

oooooo 

007250 
000001 
007254 
00300 1 



13S602 
12SS20 
125621 
1327S1 
12S601 

12321 1 
135572 
OOOOOO 
133073 
125613 



007016 
134123 

135576 
10701 6 
135574 
1 3201 4 
1 1 4205 
1 3201 4 
1 2S374 
135620 
135574 
127777 



U . RV3B 
U . RV3D 



ENTER 

R7 -> 

ADD 

ADD 

ADD 

BIC 

MOV 

ASSUME 

AOO 

ADD 

AND 

ADO 

ADD 

IF WRI 

ASSUME 

NOP 

ADO 

ADD 

NOP 

ADD 

BIS 

NOP 

NOP 

MOV 

INC 

MOV 

COM 

.PAGE 



HERE WIT 
8UFFER 
»SDI .P 

#BUF . H 
#BUF . H 
#HDCOO 
VRVCBU 
S . CYLH 
#S . CYL 
#BUF. T 
#HIBYT 
#SDI . C 
#BUF . T 
TE COMMA 
WRITCD 

#SD I . P 
#BUF . B 

(5DI E 
#RVWRI 



BN IN (R2.R1), ROsBLOCKS 
AR - -> SDI CTL BLK 
UBAR\N,BAR %CALL S.LD10 
R7\N,BAR '/.CALL S.STR1 
R7\N,BAR "/.CALL S.STR2 
2 %CALL U . IOPX 

BAR %CALL S . LDR7 
O.S . CYLL+1 

RIO, 0, BAR '/.CALL LDR2R1 
R7\N,BAR '/.CALL 



UBAR 
R7\N 
THE 
T,0 

, UBAR 
, R7\N 

, UBAR 
, R1 , B 



#RVCFLI 
R1 , BUF 



, BAR 
, BAR 



\N,BAR "/.CAL 
, BAR '/.CALL 
N REFILL BU 

7.JNNEG 
\N,BAR 7.CALI 
, BAR "/.CALL 

7.J2RO 
\N,BAR 7.CALI 
7. C A L L 
7.JMP 
7.CALL 
7.CALL 
%CALL 
7.CALL 
%RET 



. LDOO 

J . IOPE 
STOO 

FFER *«« 

U . RV3D 

CKWRER 
S . LDR3 
U .RV3D 

S . L0R1 
U . VAXP 
U .BFLC 
U .VAXP 
S . LDR1 
S STR1 
S . LDR1 



GET MSCP PACKET POINTER INTO RIO 

SAVE LO BLK NUMBER 

SAVE HI BLK NUMBER 

ELIMINATE HEADER TYPE AND CONVERT IT 

RESTORE BUFFER PTR TO R7 

MAKE SURE SEOUENTIAL 

R2.R1 =CYL INOER NUMBER 

GET SDI LEVEL 1 CMD + HEAD NUMBER 

ISOLATE LEVEL 1 COMMAND FOR U.IOPE 

MOVE CYLINDER TO SD I . CL+SO I . CH , SET SEEK 

SAVE SDI LEVEL 1 CMD + HEAD * IN BUFFER 

MAKE SURE WRITE CODE IS NEG 

IF READ THEN CONTINUE 
SET UP OPCODE FOR U.BFLC 

[ 16K)R3=BUPPER PTR 

[16K1IF NEO O THEN JUMP TO REFILL BUFFER 

[ 16K]R1 ^EXTENDED STATUS 

[16K1SET REVECT WRITE FLAG/CHK FOR VAX KLUDGE 

[ 1 6K]C0 REFILL BUFFER 

[U52EC21CHK FOR VAX CLUOGE AGAIN 

[U0A1GET PROCESS VECTOR 

[UOA] INCREMENT IT 8 RETURN TO UPROC IDLE LOOP 

[UOAJGET UPPER/DRIVE FLAG 

[U0A1SWITCH TO . PROC/RETURN 
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AT THIS POINT, WE HAVE (WITH LUCK) READ 
I 1 6K1BUF.ST IS SET 
AS FOLLOWS: 

BFULL+BLAST 

BFULL*BLAST+BECC 

BPULL+BLAST+BECC+BGRUP 
THIS STEP INITIATES CORRECTION AND/OR RETRY 
THE RCT SCAN IF THE SECTOR DATA IS GOOD. 
NOTE! II ! 

THIS CODE IS ALSO USED TO CLEAN UP AFTER THE FINAL READ/WRITE OF THE REVECTOR 



BLOCK INTO RVBUF 



SECTOR HAD NO ERRORS 
SECTOR HAD AN ECC ERROR 
SECTOR COULD NOT BE READ 

ON ERRORS, AND PERFORMS 



lOOOOO 



U.RVCS: ; NOP 
WRPFLG 



(PRUPF 
BIT 1 5 



; [ U52EC2 ] ACTUALLY DONE IN THE DISPATCH VECTOR... 
; IU52EC2) RCTOFF FLAG, SET IF WE WRAP AROUNO RCT 



007022 
007023 
007024 
007025 
007026 
007027 
007030 



007033 
007034 
00703S 
007036 
007037 
007040 

00704 1 
007042 
007043 
007044 
007045 

007046 
0O7O47 
OO7O50 

00705 1 

007052 

0O7053 
0O7OS4 



013740 
010547 
1 14542 
014542 
014542 
035542 
013440 



007226 
007001 
000O2O 
010OO1 
10004 
13004 
OOOOOO 



125601 

13S57S 

1000O 
1 17033 
107031 

1 1 7140 
107047 



007031 034442 060002 076450 U.RV5J: 



007032 033760 010350 0S7041 



010547 
033743 
013440 
133740 
01 6303 
033740 

013740 

1 14541 
013440 
130541 
034446 

010545 
013440 
013740 
031440 

01 3440 



007OO2 
06010S 
007002 
OOOOOI 
0OOOO3 
0101 12 

007220 
000004 
OIOOOO 
000377 
000006 

007003 
060000 
007220 
010000 

013000 



135575 
1 17061 
OOOOOO 
13S220 
OOOOOO 
157061 

13SS74 
10000 
017046 
135620 
1 17054 

135616 
1071 40 
125604 
157052 

147140 



MOV 
AOO 
BIT 
BIT 
BIT 
BIC 
NOP 



U . RVSY: 
U . RVSW: 



#RVCBUF,BAR %CALL 

#BUF .ST,R7\N, BAR 7.CALL 

#BECC,R2 

#BGRUP,R2 

#BNXCOP, R2 

#BNXCOP, R2.BUF 



LDR7 
LDR2 



7.J2R0 
7.J2R0 
7.J2R0 
7.JMP 



U . RV5A 
U. RV5J 
U. RVFH 
U.RV5W 



RCT OR RBN BLOCK NUMBER AND ECC ERROR - 
CLR\F R2 7.CNUPF ECCC 



010545 007077 125600 U.RV5R: 



MOV\T 

RCT BLK 

AOO 

MOV 

MOV 

MOV 

XOR 

MOV\F 

RCT BLO 

MOV 

BIT 

NOP 

ADDC 

CLR 

RETRIES 

ADD 

NOP 

MOV 

OECYF 

MOV\F 

RCT NEX 

ADD 

ASSUME 



#<ST .OAT 
ECC 

BP, 
EED, 



NO 



#BUF 
#EDS 
R2 , 8 
*SEC 
(BUF 
#<ST 
CK EC 
#RVC 
#BIT 

#377 
R6 

FAIL 
#SDI 

#RVC 
RO 

R0,8 
T COP 

#SDI 
BUF . 



ISC.ECO.RO 7.JNZR 

ERRORS/ECC CORRE 

R7XN.BAR '/.CALL S 

R3 7.JUPF U 



U.RV5X 
CTABLE 

LDR2 

RV5Z 



AR 
SZ. R 
) ,R3 
. CNT 
C OR 
RTY, 
10, R 

,R1 

ED - 
SW, 



SCALL 



\N 
ISC 

EDC 
BAR 
1 



GO 
UBAR 



EDO , R 
ERROR 

%C 

7. J 
7.C 
%J 
TO NEX 
\N , BAR 
%J 



UF 

Y RE 
. RV, 
HH , E 



TRY 

UBAR 

O.BU 



%c 

%T 
%J 
CODE *< 
\N , BAR 
F . HLtl 



'/.JZRO 

- CHECI 

ALL S 

NZRO U 
ALL S 
MP U 
T COPY > 

%CALL 
UPF U 
ALL S 
ZRO 

ZRO U 
** 

7.CALL 



U. RVSZ 
I IF REC 
L0R1 

RVSY 

STR1 

RV5T 
*** 
S.STRO 

RVFH 

LLBO 

RVFH 
S . LDR6 



GET BUF 

1 16K1GE 

CHECK F 

BRANCH 

[U52EC2 

[U52EC2 

(U52EC2 

NLY CORR 

[ U52EC2 

[ U52EC2 

[US2EC2 

IF NOT 

R RBN 
R2=BUFP 
[US2EC2 
[U52EC2 
RO=W0RD 
IF EDO 
[U52EC 

OVERY EX 
R1 =RETR 
IF RETR 

THEN 
RESET R 
CLEAR R 



PER PO 
UFF 
OR ECC 
ON NO 
] IF BE 
1 IF BN 
1 ELS 
ECT IF 
] IF NO 
] ELS 
]WI LL 

CORRE 
FAKED 
ER POI 
1 IF RB 
]BAR=0 

COUNT 
S EO 
2] THE 
HAUSTE 
Y/RECO 
IES EO 
GO TO 
VCRTY 
6/GO D 



INTER IN R7 

ER STATUS IN R2 

OR OTHER ERRORS 
ERRORS, CHECK ERROR TYPE 
CC ONLY THEN DO CORRECTION 
XCOP EO THEN FATAL ERROR 
E GO TO NEXT COPY 

RCTI I *«« 
RBN THEN DO ECC CORRECTION 
FAKE SUCCESS SO 
CORRECT AND RETRY IF NECESSARY 
CTED THEN GO 00 RECOVERY 

ECC CORRECTION - CALCULATE AND CHECK 
NTBR 

I/O THEN SKIP 
ATA BUFFER PTR 
/GO CALC EDC IF ECC CORRECTED 

N CONTINUE/ ELSE EDC ERROR 
D «*« 
VERY WORD 

MAX 
NEXT COPY (IF RCT) 

RETRY 



[16K1SAVE MSCP STATUS 
IUS2EC21IF RBN THEN FATAL ERROR 
IUS2EC21ERR0R READING RCT/GET COPY COUNT 
IF EO THEN DON'T DECR 
I16K1IF EO THEN FATAL ERROR 

GET SIZE OF RCT IN R6 
MAKE SURE SEOUENTIAL 






: 



007054 
00705S 

007056 



000547 
01 3740 
017740 



007004 123211 
OS72SO 156771 
00305 1 OOOOOO 



THIS POINT ENTERED TO CONTINUE FROM U.RV7A »»» 



ADD 

MOV\F 

COM 



•BUF . HH , R7, 0, BAR %CALL L0R2R1 
*RVECUP,BAR 7.JUPF U.RV3A 
#<-V.RVC3-1>8L0BYT,BUF 



R2,R1=LBN OF BLOCK IN ERROR OR FINAL SEEK 

[ UOA ]I U52EC2 ] BRANCH IF THE TARGET I/O IS BEING RET 

CHANGE uproc PROCESS VECTOR Iraalll 
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0070S7 
0O7O60 



01374O 
031450 



0072S2 
003010 



007O61 034440 OSOOOO 



O07O62 
i 007O62 
0O7O63 
007064 
007O6S 
007O66 
007067 
007O70 
007071 
007072 
007072 
007072 
007073 
007073 
007O74 
00707S 
007O76 
007077 
007 100 



007101 
007102 
007103 
007104 
007 103 
007 lOB 
007 107 
007 1 10 



007 1 1 1 
007 1 1 2 
007 1 1 3 
007 1 1 4 
007 1 15 
0071 1 6 
007 1 17 
007120 
007121 
007122 
007 1 23 
007124 
0071 25 



007126 
KOBUP 






0037«O 
010547 
013740 
133542 
000146 
1 14640 
1 10043 
033710 



016142 
010043 
016501 
132440 
030560 
I 1 6540 



013740 
130441 
01 3740 
134546 
Ol 3740 
01 7740 
013740 
031450 



01374O 
I 14546 
133546 
013740 
134540 
1 36540 
033760 
010547 
033540 
013740 
017740 
013740 
1 3044 1 



00713 1 
007002 
007222 
0OOO4O 
10OOO 
000177 
1 7003 
000003 



O30O10 
017003 
000003 
OIOOOO 
030OO2 
000001 



007224 
OO0OO1 
0O7222 
003200 
007250 
00305 1 
007252 
O0301O 



007224 
0002OO 
010200 
0071 32 
000037 
OO0O27 
0101 10 
007001 
003O4O 
0072SO 
003047 
007252 
003001 



125602 
106771 



13321 1 
135576 
125600 
010000 
107 101 
000000 
007076 
010000 



1 35550 O10O20 117 114 



117111 
047O76 
O 1 OOOO 
107126 
057100 
1 1 7066 



125574 
135620 

oooooo 

OIOOOO 
OOOOOO 

oooooo 

125602 

1 1 6762 



125630 
OOOOOO 
107103 
125573 
OIOOOO 
OIOOOO 
0471 4 1 
135573 
OIOOOO 
OOOOOO 
OIOOOO 
135574 
1 27777 



MOV #RVECDP,BAR 7.CALL S.LD10 
DEC RIO, RIO, BUF SJMP U.RV3A 

: ««* RCT SECTOR IS GOOD - SEARCH IT FOR REVECT 
U.RV5Z: CLR RO %JUPF U.RV7A 



U . RVSD : 
U .RVSE : 



ASSUME RVCBNH.EQ, RVCBNL+1 



MOV 

ADO 

MOV 

BIS 

ADO 

BIT 

ADDC 

MOV 

ASSUME 

ASSUME 

BIC 

ASSUME 

XOR 

AOO\F 

XOR 

NEG 

ADO\T 

XOR 



%CALL 
%JZRO 



LDR2R1 
S . LDR3 
S . LDR6 

U . RVSD 



7.JNZR0 U.RV5C 



.RVSF 
RV5C 



#RVCBNH,9,BAR 7.CALL 

#BUF ,BP, R7\N,BAR 5SCALL 

#RCTOFF, BAR 

#RCT. PR, R2 

RO, R6,0 

»HIBYT-WRPFLG 

0, R3\N,BAR 

(BUF I , RIO 

RCT.MT.EO.O 

<-RCT .SE- 1>«RCT . PR.EO.O ; 

#<RCT.SE-RCT . PR> , RIO '/.JZRO U . RVFE 

RCT . EN , EO, 10OOOO 

R10.R2\N %JMSB 

Q,R3\N.BAR '/.JNZRO 

(BUF) , R1\N 

RO 7.JZR0 

#2,R0 %TNMSB 

#400,R0\N 7.JMP 



CHANGE dproc PROCESS VECTOR [raelll 
AND GO REREAD [rael 1 I 

OR LBN, EMPTV OR END ««* 
[US2EC21IF RBN THEN RETURN TO RV7A 
[US2EC2] OTHERWISE INIT RCT SEARCH DELTA 
MAKE SURE SEOUENTIAL 
R2/R1=HI/L0 LBN TO REVeCTOR 
GET POINTER TO RCT DATA IN R3 
GET INITIAL OFFSET TO SEARCH FROM IN R6 
CONVERT LBN INTO RCT PRIMARV CODE, + CLR Z 
BRANCH IF NO HITS,, COMPUTE NEXT WORD OFFSET 
[U52EC21 TEST FOR WORDPAIR OUT OF RANGE 0-376 
OFFSET INTO RCT, BR IF OFFSET OUT OF RANGE 
GET HIGH-ORDER WORO OF PAIR FIRST 

TREAT PRIMARY t 2DARV CODES IN RCT THE SAME 
; IF EMPTV THeN NO REPLACEMENT 



U.RV5G 



U.RVSB 



COMPARE HI WORDS 
GET LO RCT WORD 



BR IF END OF RCT, 

BR IF NOT EQUAL / 

COMPARE LOW WORDS 

BRANCH IF MATCH, ADVANCE DELTA 

OELTA GOES 0,2,-2,4,-4,6,-6.... 

UNTIL IT HITS 256 (BLOCK IS EXHAUSTED) 



THIS RCT BLOCK IS EXHAUSTED - GO TO THE NEXT ONE *** 



MOV 
INC 

MOV 
AND 
MOV 
COM 
MOV 
DEC 



END 

MOV 

BIT 

BIS 

MOV 

AND 

XOR 

MOV\T 

ADO 

BIS 

MOV 

COM 

MOV 

INC 



LDR1 
STR1 



#RCTBLK,8AR %CALL S 
R1 XCALL S 

#RCTOFF,BAR 
#WRPFLG. R6,BUF 
#RVECUP , BAR 

#<-V.RVC3-1>«L0BYT,BUF 
#RVECDP,BAR 7.CALL S.L010 
RIO, RIO, BUF 7.JMP U . RVC3 



GET THE RCT BLOCK OFFSET 

AND INCREMENT IT 

POINT TO INTRA-BLOCK OFFSET WORD IN MEMORY 

(U52EC21ZER0 OFFSET WHILE PRESERVING WRAP FLAG 

(UQAlBARsPTR TO PROCESS VECTOR WORD/RET 

CHANGE uproc PROCESS VECTOR [rasll! 

CHANGE dproc PROCESS VECTOR Iraell] 

AND GO REREAD [ rael 1 ] 

[U52EC2] BACK TO RCT READ STEPIraelU 



OF RCT DETECTED - WRAP BACK TO BEGINNING, BUT ONLY ONCE. 



"/.CALL 



% JZRO 
%CALL 



. CLRB 



. RV5E 
. LORO 



#RCTBLK,BAR 

#WRPFLG.R6 

OWRPFLG, R6 

#RVCTA,BAR 

#1 7400, RO 

#READCD, RO 

»<ST .DATISC . HOR>, RO XJNZRO U . RVFB 

#BUF .ST, R7\N,BAR '/.CALL S.LDRO 

#BRCTS, RO, BUF 

#RVECUP,BAR 

#<<-V.RVC7-1>SL0BYT>,BUF 

#RVECDP,BAR %CALL S.LDR1 

R1 , R1 ,BUF 7.RTN 



CLEAR BLOCK OFFSET WITHIN RCT 

SEE IF WE HAVE DONE THIS ALREADY 

IF NOT, CONTINUE AT BLOCK OF RCT 

[EERRECIGET REAL TIME COMMAND 

[EERREC1MASK IT 

[EERREC1WAS IT A READ? 

; IEERREC1IF NOT, BRANCH 

[EERRECIELSE, GET STATUS 

IEERREC1SET RCT SEARCHED 

(EERREC1N0W SKIP STEP 

[EERREC] 

[EERREC1SKIP STEP 6 FOR 

[EERREC) 



AND 
FOR I 



EXIT 



; »»* COME HERE IF WE ACTUALLY FIND THE DESIRED LBN IN THE RCT (GLORY BE1I) **« 
; «»* = WORO OFFSET INTO RCTBLK *** 
000376 OOOOOO U.RV5G: ANDNR #376,0, R3 ; CONVERT WORD OFFSET INTO ITEM OFFSET 
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007127 
O07130 
O07 1 3 1 

0071 32 

0071 33 

0071 34 
007 1 35 

0071 36 

007 1 37 



013740 
003740 
0OS541 
036042 
133542 
033041 
010S45 
010545 
03454O 



0072 2 4 
OO0O1 1 
000177 
000001 
0001 40 
O00OO3 
O070O3 
0O7O67 
000077 



125574 
12S501 
OOOOOO 
OOOOOO 
137151 
OIOOOO 
125630 
125573 
1 1 6774 



S. LDR1 
S .RRR1 



MOV #RCTBLK,BAR 7.CALL 

MOV #9. ,« %CALL 

BIC #177, R1 ,0 

XOR R1 .0, R2 

BIS #RBNC0D,R2 7.CALL U.RVRT 

BIS R3.Q.R1 

ADD #SDI .SW, UBAR\N,BAR '/.CALL S.CLR8 

ADO #SDI -RT, UBAR\N,BAR %CALL S.LDRO 

AND VRBNMSK.RO %JMP U.RV3C 

. PAGE 



GET RCT BLOCK OFFSET 

MULTIPLY BY 128 

ISOLATE LOW-ORDER PRODUCT IN 

AND HIGH-ORDER PROOUCT IN R2 

IEC0#1]AD0 RBN HEADER TYPE TO HI RBN/RESET BUF . TA 

IU52EC2] [EC0#1 1C0MBINE ITEM OFFSET INTO LO RBN 

[U52EC31ZAP ERROR CODE (IF ANY) 

GET RBN'S/TRACK IN R0<5:0> 

ISOLATE RBN'S/TRACK IN RO 
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007140 
0O7141 
0O7142 
007143 
007144 
007 1 45 
007146 



007147 
007147 
007 1 50 
0O7 1 50 



010545 
01 3440 
O10S45 
033541 
013740 
037441 
135541 



00374O 
OOOS47 



007003 
000000 
007026 
003020 
007254 
00000 1 
003200 



007 131 
007003 



135S73 
127147 
135574 
134574 
135574 
000000 
137777 



13321 1 
1 13213 



U . RVFH 
U . RVFB 



ERROR ROUTINES AND SUBROUTINES »*» 
FATAL ERROR EXIT [RBN OR RCT LBN) 
#501 . SW. UBARNN , BAR '/.CALL S 



ADO 
NOP 
ADO 
BIS 
MOV 
COM 
BIC 



LDRO 
'/.CALL U.RVRL 
#SDI. ES, UBARNN, BAR 7.CALL S.LDR1 
%CALL U.DERE 
%CALL S.L0R1 



#RVACTV, R1 ,8UF 

#RVCFLG, BAR 

R1 

#BIT15, R1 ,BUF 



%RET 



ROsFATAL ERROR STATUS 

[US2EC2] IEC0#1 ]GET ORIG LBN IN BUF . HL /BUF . HH 

[U52EC21R1 sEXTENDED STATUS 

IU52EC21I 16K1SET REVECT ACTIVE/GO DO LOGS, ETC 

[UOAlRliPROC FLAG 

IU9A1SWITCH TO O.PROC 

(U0A1CLEAR ERROR BIT/RETURN 



****r 



RESTORE ORIGINAL LBN TO BUFPeR CONTROL AREA POINTED TO BY R7 «»* 



ASSUME <RVCBNH*17>,EQ,<RVCBNL<17>+1 

MOV *RVCBNH,0, BAR "/.CALL L0R2R1 

ASSUME BUF.HH, 60, BUF . HL+1 

ADD #BUF . HL, R7.0, BAR %JMP STR1R2 



MAKE SURE AUTO INCR WILL WORK 
R2,R1:SAVE0 ORIGINAL LBN 
MAKE SURE SEOUENTIAL 
RESTORE ORIGINAL LBN/RETURN 



00715 1 
0071 52 



013740 
010547 



007132 
OO7005 



125573 

115616 



RESTORE ORIGINAL BUF.TA *»* 

MOV #RVCTA,BAR %CALL 

ADD #BUF.TA, R7NN.BAR %JMP 
. PAGE 



S.LDRO 
S.STRO 



RO'ORIGINAL BUF.TA 
RESTORE TO BUFFER/RETURN 
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WE COME HERE WHEN THE OPERATION ON THE REVECTOR BLOCK IS COMPLETE, TO CHECK FOR ERRORS 

AND EITHER RETRY OR POSITION BACK INTO THE STREAM OF USER I/O 

; NOP IPSUPF %JMP U.RV57 [ US2EC2 ] ACTUAL L Y DONE IN DISPATCH VECTOR... 



007 153 
007 154 
007155 
007156 
007157 
0071 60 
007161 
007 162 
007 162 



034446 
01 3740 
136540 
01O547 
010547 
1 454 1 
013440 



000006 
O07230 
000 10O 
OO7O0O 
007O0 1 
000040 
10000 



137151 
135573 
127147 
125616 
125574 
OOOOOO 
017054 



U.RV57 RETURNS CONTROL AT U . RV7A IF EVERYTHING IS KOSHER *** 
SUCCESS AT LAST)!! - WE HAVE PERFORMED THE ORIGINAL I/O ON THE RBN 



010545 037007 035616 



007163 013440 OOOOOO 117054 



CLR R6 

MOV #RVCEBF,BAR 

XOR #BFULL,RO 

ADD *BUF.NL ,R7\N, 

ADD #BUF .ST,R7\N, 

BIT #BRCTS,R1 

TST RO 

ASSUME BLAST , EO, B IT 15 

ADO #SDI .OB, UBARNN, BAR 7.CNMSB 



•/.CALL 


U . RVRT 


'/.CALL 


S. LDRO 


•'.CALL 


U . RVRL 


BAR '/.CALL 


S STRO 


BAR XCALL 


S . LDR1 


*/.JN2R0 


U.RV5T 



SEEK BACK 
NOP 



TO THE USER'S 



OLD CYLINDER - 
*/.JMP U.RV5T 



RESTORE BUF.TA (IN CASE RETRY I 
RESTORE BUFFER STATUS 

FLIP FULL FLAG/RESTORE ORIGINAL LBN 
THIS SETS SECC-O AND RESTORES OLD BLAST 
[chOS] LOOK AT THE STATUS 
IchOl) SEE IF LBN NOT IN RCT 
[chOSl IF SET, BYPASS SOI.DS UPDATE 
MAKE SURE BLAST IS MSB FOR CHECK 
[U52EC21IF NOT LAST THEN ADVANCE 
IU52EC21BUFR PTR PAST REVECTORED BUF 
(PSUPF IS SET TO INDICATE THIS. 

; GO FAKE AN ERROR RETRY TO POSITION 

I THE OISK THE SAME AS WHEN THE REVECTOR STARTED 



Q 
< 

a 

ii 

s 

cc 

O 

u. 

05 
O 
</> 



c 
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007375 
007376 
007377 



1 77777 
000000 
000000 



177777 
OOOOOI 



177401 

oooooo 



000000 000777 



org 

word 

org 

word 

org 

word 



2 90 1 ASSEMBLER VERSION 3 2 



NOTE: This 3 word (word s 48 bits) pattern is used by test 
engineering. It should never be moved. The point 
is to have an all 1 and an all zero bit pattern for 
each of the six bytes. This is complicated by the 
fact that parity must be maintained across the 48 bits 
as diagnostics will fail even if these are not executed. 
Byte is the least Significant byte in my comments below. 

737S 

177777, 177777, 177401 

7376 

OOOOOO, 000001, OOOOOO ; OS in bytes 5,4,3, 1,0 (not 2) 

7377 

OOOOOO, OOOOOO ,000777 ; 1 in byte O, in byt e 2 



1S in bytes 5,4,3,2,1 (not 0) 
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; JUMP TO ERROR ROUTINE 



******* * * * 



THE PAR (Pipeline Address Register) IS FORCED HERE TO THE LO VECTOR 
TABLE AND TO THE H I VECTOR TABLE DURING THE PAR TEST. 

NOTE: THE LOCATION LOPAR (AH0F03) AND HIPAR (AHOFFC), WHICH ARE USED 
IN THE PAR TEST. MUST NOT BE CHANGED. 



********** 



007403 013440 OOOOOO 117774 LOPAR: NOP 



********* XXXXXX********** 

HIPAR ; JUMP TO HIPAR 



*x**xx***«* 



************************ 



Read transfer vector table 



KXXX***** 



*************** 






Q 












< 












_) 








BIRDBR: 


a 


007404 


131545 


OOOOIO 


1 15703 


SUB 


ii 


007405 


131545 


000010 


105720 


SUB 


2 

a 
O 
u. 


007406 


131545 


ooooto 


1 15735 


SUB 


007407 


131545 


000010 


105752 


SUB 


0074 10 


131545 


OOOOIO 


105767 


SUB 


0074 1 1 


131545 


0000 10 


1 1 6004 


SUB 


007412 


131545 


OOOOIO 


106021 


SUB 


<f) 


007413 


13 1545 


OOOOIO 


106036 


SUB 


O 


007414 


131545 


OOOOIO 


1 15676 


SUB 


(f) 


0074 15 


13 15 4 5 


OOOOIO 


115712 


SUB 


-1 


00741 S 


131545 


OOOOIO 


1 15727 


SUB 




007417 


131545 


OOOOIO 


1 15744 


SUB 




007420 


131545 


OOOOIO 


105761 


SUB 




007421 


1 3 1 545 


OOOOIO 


105776 


SUB 




007422 


1 3 1 545 


OOOOIO 


1 16013 


SUB 




O07423 


13 1546 


OOOO 10 


106030 


SUB 



Transfer table for u It ra- opt i mi zed read 



. , UBAR 
. , UBAR 
. , UBAR 
. , UBAR 
. , UBAR 
. . UBAR 
. , UBAR 
. , UBAR 
. , UBAR 
. .UBAR 
. , UBAR 
. .UBAR 
. .UBAR 
.UBAR 
. , UBAR 
. .UBAR 



%JMP 


BIRDOO 


Predecr 


UBAR, 


enter 


proper 


1 oop 


%JMP 


BIR0O1 


predecr 


UBAR, 


enter 


proper 


loop 


%JMP 


BIR002 


Predecr 


UBAR, 


enter 


proper 


loop 


%JMP 


BIR0O3 


Predecr 


UBAR, 


enter 


proper 


1 oop 


%JMP 


BIRD04 


Predecr 


UBAR, 


ant er 


proper 


loop 


%JMP 


BIR0O5 


Pr ©deer 


UBAR, 


ent er 


pr oper 


1 oop 


%JMP 


BIRD06 


Predecr 


UBAR, 


ent er 


proper 


1 oop 


%JMP 


BIRD07 


Predecr 


UBAR, 


enter 


proper 


loop 


%JMP 


BIRD08 


Pr edec r 


UBAR, 


enter 


proper 


1 OOP 


%JMP 


BIRD09 


Predecr 


UBAR, 


ent er 


proper 


loop 


%JMP 


BIROtO 


Pr edec r 


UBAR, 


enter 


proper 


loop 


%JMP 


BIRD1 1 


Pr edec r 


UBAR, 


ent er 


proper 


loop 


7. J MP 


BIRD 12 


Predecr 


UBAR, 


enter 


proper 


loop 


%JMP 


BIR013 


Predecr 


UBAR, 


ent er 


proper 


loop 


%JMP 


BIRD1 4 


Predecr 


UBAR, 


ent er 


pr oper 


loop 


%JMP 


BIRD 1 5 


Pr edec r 


UBAR, 


ent er 


pr oper 


1 oop 



o 



************** pop mechan ism xxxxxxxxxxxxxx* 

This is the address #POP plus PAR 74xx (octal). This is 

used to unwrap the stack from a timeout error condition 



007424 013440 OOOOOO 127777 POP): 



Pop mechan i sen. 
PTE is det ect ed 



%RET ; this return is taken 

This is used to unwrap the stack when an invalid 



[E121 1 


[E121 1 


[ E 1 2 1 ] 


[E121 1 


IE121 ] 


[ E 1 2 1 ] 


[E121 ] 


IE121 ] 


[E121 ] 


[E121 ] 


t E 1 2 1 ! 


[E121 ] 


[E121 ] 


[ E 1 2 1 ] 


IE121 ] 


[EI21 1 


[E121 1 


[E121 1 


[E121 1 


[ E 1 2 1 ] 


[E 121 1 
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007425 013440 000000 115312 P0P2: NOP 

page 



%JMP U.INVA ; drop u.getp ret 



L/ 
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**************** 



000026 








TESTBL 


" 


7400 


00742E 


034447 


000007 


1 10077 


UTSTBL i 


CLR 


UER 


007427 


034447 


000007 


1 10102 




CLR 


UER 


OO7430 


034447 


000007 


1 10132 




CLR 


UER 


007431 


034447 


000007 


100 139 




CLR 


UER 


007432 


034447 


000007 


100 136 




CLR 


UER 


0O7433 


034447 


000007 


100135 




CLR 


UER 


007434 


034447 


000007 


100136 




CLR 


UER 


007435 


034447 


00O007 


110145 




CLR 


UER 


007436 


034447 


0OOO07 


1 10146 




CLR 


UER 


007437 


034447 


000007 


1 10152 




CLR 


UER 


007440 


033701 


000003 


010000 


SETHVR: 


MOV 


(BUF) 


00744 1 


033243 


000003 


010000 




MOV 


0.R3 


007442 


003740 


000010 


1 35501 




MOV 


#8. ,0 


0O7443 


0O3443 


000003 


10000 




MOV 


R3,0 


007444 


033140 


000001 


103370 




OR 


R1 , RO 



FUNCTIONAL DESCRIPTION: 

This table contains the addresses of U-PROC tests that can be looped 
on . 

I**************************************************************************** 



LOOP U-PROC TEST 

LOOP U-PROC TEST 

LOOP U-PROC TEST 

HANG U-PROC 

HANG U-PROC 

HANG U-PROC 

HANG U-PROC 

HANG U-PROC 

LOOP U-PROC TEST 

HANG U-PROC, LET 



y.jMP 


TO 


%JMP 


T1 


%JMP 


T2 


%JMP 


HU.T3 


%JMP 


HU. T4 


%JMP 


HU. T5 


%JMP 


HU. T6 


7.JMP 


HU. T7 


%JMP 


T8 


%JMP 


HU . T9 


'/.CALL 


$.. RRR1 


■/.JMP 


STROLG 



LET 0-PROC LOOP 

LET 0-PROC LOOP 

LET D-PROC LOOP 

LET D-PROC LOOP 

LET D-PROC LOOP 



PROC LOOP 
[mjtoel get the hardware revision (in lower byte) 
[rajtoe j save q 

[mjt06] rotate rl to upper byte 
[ m jt 06 j restore q 
[mjtosl Get the hardware revision number and stuff 






KDB50. MICROCODE. , 22 -APR- 1988 11 : 16: 48. 97 



KDBUP DIGITAL EQUIPMENT CORP. 

HARDWARE/SOFTWARE VECTOR TABLES 



2901 ASSEMBLER VERSION 32 



TABLE NAME: 

VECTAB 



(CONTROLLER HARDWARE ERROR, STATE AND ERROR VECTOR TABLE) 






< 

o 

II 

s 

O 

LL 

en 
o 

CO 



FUNCTIONAL DESCRIPTION: 

THIS TABLE CONTAINS ALL OF THE VECTOR TABLES FOR BOTH THE U . PROC 
ANO PROC. CONTROLLER MICROCOOE LOADING THE 'PAR' REGISTER IN PREPARATION FOR 
ENTERING THIS TABLE NEED ONLY LOAD THE LEAST SIGNIFICANT 8 BITS (LOW BVTE) 
OF THE REQUIRED OFFSET. THE CONTROLLER HARDWARE WILL FORCE THE MOST SIGNIFICANT 
S BITS (HI BVTE) TO ALL ONES. THE CONTROLLER ERROR DETECTING HAROWARE USES THE 
LAST 16 ENTRIES OF THE VECTOR TABLE AND THESE ENTRIES MUST START AT ADDRESS 
OFFO HEX). A DESCRIPTION OF HOW THE HARDWARE FORMS THE VECTOR ADDRESS 
AND THE ERRORS DETECTED FOLLOW: 

ERROR VECTOR ADDRESS - GENERAL 

THE ERROR VECTOR ADDRESS IS 'BIT ENCODED' BASED ON THE ERROR 
WHICH OCCURRED. IN ALL CASES, THE INSTRUCTION IN WHICH THE 
ERROR OCCURRED WILL COMPLETE, THE FOLLOWING INSTRUCTION WILL 
COMPLETE, AND THE NEXT INSTRUCTION WILL BE THE ERROR VECTOR. 

SEO ADR BIT 03 OCTAL DECODE; 

0= D PROCESSOR 

1: U PROCESSOR 
SEO ADR BITS O2-0O OCTAL DECODE. 

0= NOT USED BY HARDWARE 

I: BI READ PARITY ERROR 2 

2= BI WRITE PARITY ERROR 2 

3: BCI PARITY ERROR I 

4: NOT USED BY HARDWARE 

5s RAM PARITY ERROR 

6= TIME OUT ERROR 

7= CROM PARITY ERROR 

CONTROL MEMORY PARITY ERROR 

THE PROCESSOR WITH THE CROM PARITY ERROR WILL EXECUTE THE 
FAULTY INSTRUCTION, THE FOLLOWING INSTRUCTION. THEN THE ERROR 
VECTOR INSTRUCTION. THE SIGNAL 'CROM PE L' WILL BECOME ACTIVE 
ON THE CYCLE FOLLOWING THE ERROR. THIS CORRESPONDS TO THE THIRD 
INSTRUCTION AFTER THE ERROR WHEN USING THE LOGIC ANALYSER. 
IF THE VECTOR ADDRESS HAS A PARITY ERROR. THE PROCESSOR 
WILL HANG. (UNTIL IT GOES AWAY I SO OISPLAV STATUS. 

TIMEOUT ERROR 

THE TIMEOUT CIRCUIT IS ENABLED WHEN EVER A SUCCESSFUL JUMP IS 
EXECUTEO. FALLING THROUGH TO THE NEXT INSTRUCTION RESETS THE 
TIMEOUT CIRCUIT. NOTE - TIMEOUT ERRORS DO NOT OCCUR ON THE 
UNIBUS PROCESSOR. 

**»«THE HAROWARE MUST BE CHANGED TO OISABLE THE UNIBUS T IMEOUT . » * « « » 



; TIME! 
I TIME* 
; INST= 



< 1 SSOO. *7/ 1000 . > 
< I 6600 . *S/ 1O00 . > 
< 16 6O0. >7« 1000. /INSTR> 



MSEC MINIMUM TIMEOUT 
MSEC MAXIMUM TIMEOUT 
INSTR MINIMUN 
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o 



007725 
007726 
007727 
007730 



00773 1 
007732 
007733 
007734 
007735 
007736 
000006 



0000 12 

O07737 
007740 
00774 1 
007742 
O07743 
007744 
007745 
00002 I 



01 3440 
01 3440 
Ol 3440 
01 3440 



0005S0 
1 14544 
033740 
013740 
013740 
135544 



033751 
03445 1 
013740 
033747 
033747 
033743 
033740 



003001 
000000 
000600 
000400 



000007 
000040 
OOOOOI 
0O7 15O 
007146 
000060 



OOOOOI 
OOOOI 1 
007007 
007 146 
007150 
OOO0O5 
000026 



107020 
1 16762 
107022 
1 17022 



1 13725 
103737 
102420 
1037S3 
1 13763 
102303 



1 15407 
1 15407 
1 15423 
1 15427 
105427 
105446 
1 15454 



VECTAB 
V. URVC 
V . RVCT 
V . RVC3 
V .RVC5 
V .RVC7 
V .RVCS 



NULL AREA WITH JUMP TO ERROR ROUTINE (+PARITY) - JUST IN CASE *«» 

.FILL 13440, 0, < B I T 1 5*5 I T 1 2 + SE0ERR> i JUMP TO ERROR ROUTINE 

"H0FD5 J ORIGIN OFOS HEX 

; FOR THE LAST . IF 

NOTE - IF VECTAB SIZE CHANGES THEN THE PRECEEOING ORG MUST ALSO *»« 
THE EQUATION IS ORG. VALUE = FESH - SIZE OF VECTAB «»« 
START CONTROLLER VECTOR TABLE »** 

REVECTORING STATE VECTORS - MUST START ON ODD WORD. 

CODE IN VECTOR IS TO STORE INCREMENTED VECTOR PTR BACK IN MEMORY 

ASSUME .S1,EQ,1 ■ UPROC STARTS FIRST 



MOV 
NOP 
NOP 
NOP 



DUP VECTOR TABLE **» 



R1 


BUF 




%JMP 


U 


RVUX 








%jmp 


U 


RVC3 






(PRUPF 


%JMP 


U 


RVCS 






8>SUPF 


%JMP 


u 


RV57 



ADD 
BIT 
MOV 
MOV 
MOV 
BIC 



#<P .BCNO- 1 >, RIO 

#DMBEG, RLL 

f»ST . CMO.RO 

#MWOUE, BAR 

#MRQUE,BAR 

#<OXFC ! OMBEG> ,RLL %JMP U.IMEX 



Q '/.JMP 


U 


GSST 


7.JMP 


U 


EXSP 


%JMP 


U 


C2EP 


%JMP 


U 


DATA 


%JMP 


U 


DATA 



UNIBUS PROCESSOR XFC VECTORS 



XFCTAB: 
XFCUPR : 



. -XFCTAB+1 2 



MOV 
CLR 
MOV 
MOV 
MOV 
MOV 
MOV 



#1 , R1 1 

R1 1 

ODMREGO , BAR 

#MRQUE , R7 , BAR 

#MWQUE , R7 , BAR 

#5 , R3 



%JMP 
7.JMP 
%JMP 
%JMP 
%JMP 
°/.JMP 



UXFC1 1 
UXFC1 1 
UXFC13 
UXF14A 
UXF14A 
UXFC16 



[UQA1SYNCHR0NI2E UPPER PROCESSOR 
INITIATE READ OF RCT BLOCK 

[US2EC2ISEARCH RCT BLOCK FOR REPLACEMENT 
(U526C21CHECK OPERATION FOR ERRORS 8 RETRY 
FOR LAST STEP 



IsGET OUST STATUS COMMAND 
2:EXECUTE SUPPLIED PROGRAM 
3=EXECUTE LOCAL PROGRAM COMMAND 
4=SEND DATA COMMAND 
SsRECEIVE OATA COMMAND 
M6K!S = AB0RT PROGRAM COMMAND 



XFC II - READ UNIBUS MEMORY 

XFC 12 - WRITE UNIBUS MEMORY 

XFC 13 - PERFORM ECC CORRECTION 

XFC 14 - SEND OATA 

XFC IS - RECEIVE OATA 

XFC 16 - CONVERT TO PHYSICAL AODRESS 



#< 1 6384 . -DM.BEOSLOBYT.RO 7.JMP UXFC17; [16K1XFC 17 - EXIT DM MODE 



. -UP . XFC+XFCUPR 



XFC DONE VALUE 



007746 033740 000360 105462 



007747 
007747 
007747 



MOV #DM.BEG*DSTSLSL0BYT,RO 7.JMP UXFC1S ; [16K1XFC 18 - INCREMENT DUST STATUS 
:= . -UP . XFC*XFCUPR ; MAXIMUM XFC VALUE 

ASSUME XFCMAX.EQ.22 
ASSUME XFCFIN.EQ.21 
ASSUME XFCUPR, EQ, 12 
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KDBUP DIGITAL EQUIPMENT CORP. 

HARDWARE/SOFTWARE VECTOR TABLES 



Ol 3440 OOOOOO 
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NOP 
AH0FE8 



PACE 334 



FOR ALIGNMENT 
«** IMPORTANT 



THE U.HWVR SUBROUTINE MUST START AT OFES 
THE U.SCID SUBROUTINE MUST START AT OFES 



ROUTINE NAME: 
U . HWVR 
U.SCID 



V 



) 



(SET HARDWARE VERSION NUMBER) 
(SET CONTROLLER ID) 



FUNCTIONAL DESCRIPTION: 

THE U.HWVR ROUTINE WILL SET THE CONTROLLER HARDWARE VERSION NUMBER IN 
AREA POINTED TO BY 0. THIS ROUTINE STARTS AT T7S0 OCTAL AND ALL HARDWARE 
VERSION NUMBERS IN THE 8 BIT LITERAL FIELD MUST HAVE EVEN PARITY. 

THE U.SCIO ROUTINE WILL SET THE CONTROLLER IDENTIFIER IN THE AREA 
POINTEO TO BY REGISTER 0. THIS ROUTINE STARTS AT TTS1 OCTAL AND 
ALL VALUES PLACED IN THE 8 BIT LITERAL FIELDS MUST HAVE EVEN PARITY. 



INPUTS : 



OUTPUTS : 

U.SCID 
U. HWVR 



POINTER TO STORAGE AREA 



CONTROLLER ID IN AREA POINTEO TO BY 9 

CONTROLLER HARDWARE VERSION NUMBER IN AREA POINTED TO BY 



007750 


013740 


007275 


1 17440 


U 


HWVR: 


MOV 


0077S 1 


033740 


OOOOOO 


OIOOOO 


u 


SCID: 


MOV 


0077S2 


133S40 


OOOOOO 


123370 






OR 


0077S3 


033740 


OOOOOO 


10000 






MOV 


O077S4 


133S40 


OOOOOO 


123370 






OR 


O077S5 


O33740 


OOOOOO 


OIOOOO 






MOV 


0077S6 


133540 


OOOOOO 


123370 






OR 


007757 


133740 


000001 


1 15477 






MOV 



#BUFP49,BAR 
#0, RO 
##0 , RO 
#0, RO 
##0,R0 
#0, RO 
##0, RO 
#CCLASS , RO 



%JMP 


SETHVR 


•/1CALL 


STROLG 


XCALL 


STROLG 


7.CALL 


STROLG 


5CJMP 


U .MOOL 



GO STORE SW/HW VERSION #/RETURN 

RO=LO BYTE OF 1ST WORD 

OR IN HI BYTE/STORE 

RO = L0 BYTE OF 2ND WORD 

OR IN HI BYTE/STORE 

ROsLO SYTE OF 3RD WORD 

OR IN HI BYTE/STORE 

ROsCONTROLLER CLASS jump to insert model IraeOt! 



«** NOTE ■ THESE HARDWARE ERROR VECTORS MUST START AT OFFOH «»« 
*»* D. PROCESSOR ERROR VECTORS **« 











. ORG 


AHOFFO 






007760 


033447 


000004 


1 17761 


E.WPE2: 


MOV 


CRI ,R7 




0077S1 


134547 


000004 


107762 




AND 


#DFAIL , 


*7 


007762 


133547 


004O20 


1 17763 




BIS 


VER.SRP 


R7. 


007763 


174547 


000020 


1 17767 




AND\L 


#ER.SRP 


R7 


007764 


173747 


004020 


107767 


E . RPE2: 


MOV\L 


#6R SRP 


R7. 


007765 


1 14544 


OO0O02 


137777 




BIT 


#INOIAG 


RLL 


007766 


170447 


000007 


107765 


CON . ER: 


INC\L 


R7.R7 




007767 


070147 


OOOO07 


107770 


U . ER : 


ADD\L 


R7 ,R7 





SJHP 


U .ER 


XJMP 


U. ER 


XRET 




%JMP 


. - 1 



007770 
KDBUP 



7.JMP 

; »«* U. PROCESSOR ERROR VECTORS >*• 
000007 102067 INC\L R7 , R7 XJMP 

KDB5O.MICR0C00E..22-APR-1988 11:16:46. 97 



IMPORTANT *** 

NOT USED (BY HARDWARE) 

NOT USED (BY HARDWARE) 

(BY HARDWARE) 

(BY HARDWARE) 

(BV HARDWARE) 

(BY HARDWARE) 

(BY HARDWARE) 

(BY HARDWARE) 



NOT USED (BY HARDWARE) 



2 


NOT 


USED 


3 


NOT 


USED 


4 


NOT 


USED 


5 


NOT 


USED 


6 


NOT 


USED 


7 


NOT 


USED 



,f 



KDBUP DIGITAL EOUIPMENT CORP. 

HARDWARE/SOFTWARE VECTOR TABLES 



007771 


015546 


006001 


107764 


BIC 


007772 


015546 


006001 


1 17760 


BIC 


007773 


173747 


004020 


107767 


M0V\L 


007774 


0701 47 


000S27 


107766 HIPAR: AODNL 


007775 


033707 


003003 


1 17776 


MOV 


007776 


173747 


004040 


107767 


MOV\L 


007777 


173747 


0040S0 


1 17767 


MOV\L 


OIOOOO 








. END 



2901 ASSEMBLER VERSION 32 



#B . NABO, R6\N, BREG %JMP 
#B . NABO. R6\N. BREG XJMP 
#ER.SRP. R7.UCR0 %JMP 
R7 , R7 (PSCLR XJMP 
(BUF) , R7 , BUF XJMP 
#ER.SAP,R7, UCRD %JMP 
#ER . S0P.R7.UCR0 %JMP 



E . RPE2 
E .WPE2 
U . ER 
CON . ER 
. t 1 
U. ER 



BI RD PE2 [mrl0051 

BI WR PE2 (mrl005) 

BCI PE1 

NOT USED (BY HARDWARE) 

RAM PE (ATTEMPT TO CLEAR ERROR) 

NOT USED (BY HARDWARE) 

CROM PE 



;END OF FILE 



KDB50 MICROCODE . 



.22-APR-19S8 11:16:48.97 



A 


006604 


ACLO 


0OO0O7 


ALGADR 


03400O 


ALGERR 


00007 1 


ALOLMT 


000035 


ALUTST 


000373 


ATTCOD 


O0O100 


ATTN 


000002 


AVAIL 


OOOIOO 


AVL . LN 


000040 


8 


00661 1 


BA 


037777 


BADRH 


000266 


BADRL 


000265 


BAD . LN 


000034 


8AN0T 


1 40000 


BAR 


000007 


BA1 6 


00000 1 


BA17 


000002 


BA18 


00O0O4 


BA19 


000010 


BA20 


00002O 


BA21 


000040 


BA22 


OOOIOO 


BA23 


00O20O 


BA24 


0OO400 


BA25 


OOIOOO 


BA26 


002000 


BA27 


004000 


BA28 


1 0000 


BA29 


020000 


BCAIO 


000005 


BCAIS 


OOOOIS 


BCATST 


000530 


BCGRP 


000002 


BCICSR 


00O050 


BDCST 


000015 


BOSNF 


002000 


BECC 


10000 


BECER 


020000 


BERON 


000400 


BERMAX 


000 150 


BFRQ 


000020 


SFSV 


000100 


BFULL 


040000 


■1 BGOOO 


004000 


BGRUP 


000001 


BIBAD 


000037 


BIBER 


000010 


BICSR 


000004 


BICSRE 


000200 


BIOTYP 


OOOOOO 


BIEAOR 


000044 


BIECSR 


OOOOI 4 


BIGPRO 


000360 


BIGPR1 


00O364 


BIGPR2 


000370 


BIGPR3 


0OO374 


BI IDES 


000020 


BIIMSK 


000024 


B I I TS T 


00O7S 1 


BIMEM 


001026 


BIPE 


000630 


BIPSDE 


000030 


BIPSFC 


000060 


BIPSRC 


000034 


BIRDBR 


007404 


BIRDCM 


000001 


BIRDOO 


005703 


BIRDOI 


005720 


BIRD02 


005735 


BIRD03 


005752 


BIRD04 


00S767 


BIRD05 


006004 


BIRD06 


00602 1 


BIRD07 


006036 


BIROOS 


005676 


BIRD09 


005712 


B IRD 1 


005727 


BIRD1 1 


005744 


BIRD 12 


005761 


BIRD13 


OOS776 


BIRD14 


00601 3 


BIRD 15 


006030 


BIREOK 


0O61 12 


BIRTRY 


000300 


BIR. CM 


0O6O60 


BIR.EV 


006053 


BIR. EX 


006075 


BIR. LP 


006041 


BIR. LW 


006061 


BIR. L2 


006052 


BIR . NI 


006047 


BIR. NO 


006 1 13 


BIR. 00 


006042 


BIR. OK 


006062 


BIR. SO 


006 1 1 4 


BIR. X2 


006076 


BIR . 1W 


006074 


BIR. 2W 


006073 


B I R . 3W 


006072 


B I R . 4W 


OOS071 


B I R . SW 


0O6O7O 


B I R . 6W 


006067 


SISADR 


000040 


BITOO 


0000O1 


BITOI 


000002 


BIT02 


000004 


BIT03 


OOOOIO 


8IT04 


000020 


BITOS 


00004O 


BIT06 


000 10O 


BIT07 


000200 


BITOS 


000400 


8IT09 


0010OO 


BITIO 


002000 


BIT1 1 


004000 


BIT 1 2 


010000 


SIT1 3 


020000 


BIT 14 


040000 


BIT15 


100000 


BIT16 


00000 1 


BIT17 


0OOOO2 


8IT1S 


000004 


BIT19 


OOOOIO 


BIT20 


00OO20 


BIT21 


000040 


BIT22 


0OO1OO 


BIT23 


000200 


8IT24 


000400 


BIT25 


001000 


BIT26 


0O20O0 


BIT27 


0O4OOO 


BIT28 


10000 


BIT29 


020000 


BIT30 


040000 


BIT31 


100000 


BIUCSR 


OOOIOO 


BIWRCM 


000004 


BIWSTA 


000054 


BIW. EX 


006325 


BIW. LP 


006274 


BIW. LO 


0O625O 


BIW. LS 


006330 


BIW. NO 


006417 


BIW. OK 


0O63O2 


BIW. SO 


006361 


BIW. TS 


006326 


BIW 5R 


006312 


BI .ERR 


006210 


BI . EX 


006231 


BI , RD 


005635 


BI . RLP 


005643 


BI .STO 


006235 


BI .STP 


006237 


BI TO 


006201 


BI . UDO 


006303 


BI . UDX 


006065 


BI .WOW 


006407 


BI .WR 


006242 


BLAST 


100000 


BLOCK 


OOOOO 1 


BLRWR 


0O100O 


BLSTB 


040000 


BMAPDN 


OOOOIO 


8NXC0P 


000004 


B0AR02 


OOIOOO 


BP 


0066 1 4 


BRARS 


000020 


BRCTS 


0OO04O 


BREG 


O0O0O6 


BRGAOR 


00O265 


BRL V4 


OOOOO 1 


BRLV4R 


000400 


BRLV4S 


000020 


BRLV5 


00O0O2 


BRLV5R 


OOIOOO 


BRL V5S 


000040 


BRLV6 


000004 


BRLV6R 


002000 


BRLV6S 


000100 


BRLV7 


00O01O 


BRLV7R 


004000 


BRLV7S 


000200 


BROKE 


OIOOOO 


BRTRY 


J ooooo 


BROOLP 


005672 


BROOLX 


005673 


BR01LP 


OOS706 


BR0 1LX 


005707 


BR02LP 


OOS723 


BR02LX 


005724 


BR03LP 


00574O 


BR03LX 


005741 


BR04LP 


005755 


BR04LX 


005756 


BROSLP 


005772 


BR05LX 


005773 


BROSLP 


006007 


BR06LX 


006010 


BR07LP 


006024 


BR07LX 


0O6025 


BR08LP 


005677 


BR09LP 


005713 


BR10LP 


005730 


BR1 1 LP 


005745 


BRI2LP 


OOS762 


BR13LP 


005777 


BR14LP 


00601 4 


BR15LP 


006031 


BTCNT 


000236 


BTROTH 


004000 


BUF 


0OOOO3 


BUFBEG 


002055 


SUFEND 


005255 


BUFLMT 


00O04 1 


BUFPTR 


000 133 


BUFPOO 


000 133 


BUFP01 


000135 


BUFP02 


0001 37 


BUFP03 


0OO14 1 


BUFP04 


000143 


BUFPOS 


0001 45 


BUFP06 


000147 


BUFP07 


00015 1 


BUFPOS 


000 153 


BUFP09 


000155 


8UFP10 


000157 


BUFP1 1 


00016 1 


BUFP12 


000163 


BUFP13 


OOOI 65 


BUFP 1 4 


OOOI 67 


BUFP15 


000171 


BUFP1 6 


000 173 


BUFP17 


0001 7 5 


BUFP18 


000 177 


BUFP19 


00O2O1 


BUFP20 


0O0203 


BUFP21 


000205 


BUFP22 


000207 


BUFP23 


00021 1 


BUFP24 


0002 13 


BUFP2S 


0002 1 5 


BUFP26 


0002 17 


8UFP27 


000221 


BUFP2S 


000223 


BUFP29 


000225 


3UFP30 


000227 


BUFP31 


O0023 1 


8UFP32 


000233 


BUFP33 


000235 


BUFP34 


000237 


BUFP35 


00024 1 


BUFP36 


000243 


BUFP37 


000245 


BUFP38 


000247 


BUFP39 


000251 


BUFP40 


0OO253 


BUFP41 


000255 


BUFP42 


000257 


BUFP43 


00026 1 


BUFP44 


000263 


BUFP45 


0OO265 


BUFP46 


000267 


BUFP47 


00027 1 


BUFPOS 


000273 


BUFP49 


000275 


BUFP50 


000277 


BUFP5 1 


000301 


BUFP52 


000303 


BUFR1 . 


005255 


BUFR2 . 


00S672 


BUF . BC 


OOOOI 2 


BUF . BP 


000002 


BUF. DL 


0004 15 


BUF . EC 


00040 1 


B U F . E 


000400 


BUF. OP 


OOOOI 1 


BUF . HH 


0O0OO4 


BUF. HL 


000003 


BUF . LL 


000015 


BUF . NL 


OOOOOO 


BUF.SD 


0O0006 


BUF . ST 


000001 


BUF . TA 


000005 


BUF. UA 


000007 


BUF . US 


00OO1O 


BUF . U 1 


0000 13 


BUF . U2 


000014 


BUF . 56 


OOOOOO 


BW.S01 


006367 


B . BAD 


OOOOIO 


B . BTO 


000004 


B . CPE 


000200 


B. CTE 


010000 


S. DTYP 


0004 16 


B . ICE 


000001 


B . ISE 


0O20OO 


B . IVE 


000400 


B . LED 


000020 


B. LOOP 


OOOI 00 


B .MPE 


004000 


B .MICE 


020000 


B .NABO 


000001 


B . NEX 


00OO02 



B. NMR 

B.SPE 

CCSRW1 

CF .THS 

CKWREA 

CLRTST 

CMOPOF 

CNT . LN 

CN. ERR 

CON. ER 

CRDY 

CTMOUT 

OATT 

DCMASK 

DDC 

DFAIL 

DISM 

DIVO 

DMATST 

DMOVH 

DMREG3 

DMSTR 

DM . WR 

OPRDC 

ORVCLR 

DRV. C2 

DRV . DE 

DRV. OA 

DRV . RU 

DRV.S2 

DRV . U 1 

DRV . W1 

DSK. LN 

DTEMP1 

D .E. C . 

ECCCB 

ECC1B 

ECC9 . 3 

ECOUNT 

EF .BBU 

ELPN 

EO 

ERRB1 

ERRB1M 

ERRB2E 

ERRRR 

ERR01 

ERR06 

ER . DMX 

ER .MER 

ER. PWR 

ER.RTO 

ER.SRP 

E R . WP 2 

E3 1 1 

E9 10 

FAILUR 

FDCLK 

FM. CNT 

FORSCD 

FSTST 

GO 



040000 
00O100 
000033 
0O0020 
004 124 
O0OO75 

00003 1 
000030 
O0400O 
007766 
OOOOIO 
00017O 
000400 
000170 
002000 
O020OO 
000062 
005547 
001234 
OOOOI 1 
0000O3 
000013 
O06430 
000006 
000005 
002000 
0OO2OO 
00O200 
OOOOO 1 
020000 
OIOOOO 
OIOOOO 
000054 
000206 
000003 
006467 
006512 
000057 
000134 
040000 
000035 
00002 1 

00004 5 
000O3 7 
000046 
006734 
000040 
00O3O0 
0000 14 
0OO144 
000002 
000150 
OIOOOO 
000003 
006535 
006702 
000034 
000O20 
OOOOOO 
046400 

000 153 

00000 1 



8. NRTY 


O0O2OO 


8. STO 


00O01O 


COONE 


OOOOI 6 


CHGFLG 


000202 


CKWRER 


004123 


CMDCOF 


000030 


CMDPTR 


00OO27 


CNVTV1 


000040 


CODVER 


000023 


CON .ST 


0001 70 


CRI 


000004 


CYCLE 


000552 


DBAR 


0O001 5 


DCN.ST 


OOOOO 1 


ODD 


0O40OO 


01 


0O040O 


DISN 


000063 


01 VDO 


005546 


DMBEG 


020000 


OMOVL 


OOOOIO 


DMREG4 


0OOOO4 


OMTEMP 


000156 


DOT 


00675 1 


ORAVL 


OIOOOO 


DRVOL 


004000 


DRV .C3 


OOIOOO 


DRV .OF 


00002O 


DRV . PE 


000040 


DRV . SN 


1700OO 


DRV. S3 


04O00O 


DRV . U2 


020000 


DRV .W2 


020000 


OSLEDS 


000236 


DTMP 


00001 2 


. STPA 


007725 


ECCMSK 


176000 


ECC2 


006520 


ECHOCD 


1 64000 


ECSUMH 


022000 


EF . LOG 


020000 


ELPO 


0OO07O 


ERECOV 


O0OOO6 


ERRB1A 


000026 


ERRB10 


00003 1 


ERREG 


000017 


ERRRTC 


000004 


ERR02 


OOOIOO 


ERR07 


0OO340 


ER. HTO 


OOOOI 1 


ER.MRR 


000026 


ER . RAP 


0000O4 


ER .RWR 


000007 


ER.STP 


OOOI 4 6 


ETST1 


000013 


E335 


006555 


E915 


006715 


FAIRCT 


077400 


FDIAG 


1 OOOOO 


FM. OSK 


000002 


FPE 


0OO2O0 


FTEST 


OOOOIO 


GORD 


00OOO1 



B .ODD 

B. TDF 

CFLAGS 

CHGMOD 

CKWROM 

CMDLEN 

CMOOEL 

CNVTV2 

COMPLT 

C0PY4 

CRY 

CYLSTR 

DCERR 

OCN . TT 

DER 

DIAG 

DI VA 

OIVX 

DMBPC 

DMREGO 

DMREGS 

DM. BEG 

D0T1 

DRDUP 

DRV . AT 

DRV . C4 

ORV . DR 

DRV . PS 

DRV SR 

DRV S4 

ORV . U3 

ORV .W3 

DSR 

OUPVC 

ECC 

ECCOA 

ECC2A 

ECMOVE 

ECSUML 

ELEV 

ELPP 

ERET 

ERRB1B 

ERRB10 

ERRINI 

ERRSET 

ERR03 

ER. BCA 

ER. INT 

E R . MS T 

ER. ROP 

ER.SAP 

ER. TMO 

EVAL 

E345 

E9 17 

FCT .MD 

FLAG 

FM.SDI 

FRERR 

GETID 

GOWR 



OO0040 
001000 
000320 
000201 
004121 
000026 
0O0022 
OO0O42 
0001 7 6 
OOOOOO 
0O0022 
170000 
000001 
000200 

00001 1 
000400 
005551 
00555O 
00O002 
0O0007 
000005 
001352 
006752 
002000 
OO2000 
000400 
OOO040 
000002 
000020 
1 OOOOO 
04000O 
040000 
000035 
OOIOOO 
000007 
00647 1 
006523 
OOSS72 
OOO305 
100000 
OO0057 
006730 
000043 
00003 6 
O40OO0 
000051 
OOOI 40 
0001 47 
OOOOIO 
000013 
000005 
0200OO 
OOOOI 5 
000046 
006575 
006716 
OOOOOO 
040000 
000003 
000004 
0O0253 

00001 2 



B . RDS 

CCLASS 

CF. ATN 

CHKBDR 

CLIMIT 

CMDLIM 

CMPBUF 

CNVTV3 

CONT 

CPE 

CSERR 

C$TYPE 

DCLASS 

DCRO 

DERR 

DI INTR 

DI VB 

DIVXIT 

DMODE 

DMREG1 

OMREGB 

DM. RD 

D0T2 

DRDY 

DRV AV 

DRV DB 

ORV .EL 

ORV . RE 

DRV .SU 

DRV . S.7 

DRV . U4 

DRV .W4 

DSTSH 

DUP ..LN 

ECCC 

ECC1 

ECC9 . 1 

ECMOVX 

EOSEEO 

ELOC 

ENCACH 

ERR 

ERRB1E 

ERRB1T 

ERRINP 

ERRVEC 

ERR04 

ER. BP1 

ER . IWR 

ER . NIM 

ER. RP2 

ER.SOP 

ER. UID 

e RPE2 

E350 

E920 

FCT . VI 

FLOAT 

FORCE 

FRMCD 

GETRES 

GPRO 



000040 
000400 
0O02OO 
00S170 
OOOI 42 
000024 
OO0242 
000044 
OOOOO 1 
0000 12 
OOOOIO 
000002 
OOIOOO 
000004 
0000O4 
001 1 34 
005554 
005557 
040000 
000001 
OO00O6 
006142 
006753 
000001 
004000 
OOIOOO 
OOOOIO 
OOOIOO 
1 70000 
000400 
100000 
100000 
O00OO7 
000014 
0O6450 
006477 
00003S 
006671 
000105 
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000400 


UDS 


OOOOI 5 


UF .RMV 


000200 


UGUCPC 


0026 1 6 


UHELP 


000055 


UNB . CA 


0O4701 


UNB. RO 


005635 


UNC .SS 


1 00000 


UN . BRC 


OOS636 


UP . XFC 


007737 


UROMPE 


000471 


UWMCI 


000006 



SDI . ER 


000035 


SDI . GC 


000065 


SDI . I 1 


000037 


SDI . LT 


000034 


SDI . OE 


000024 


SOI .PO 


OOO02 2 


SDI RS 


OO0036 


SOI .SS 


0000 14 


SDI S2 


0O0045 


SOI TG 


0O0066 


SOI .UE 


000043 


SDI V! 


000062 


SDI . IT 


000010 


SDI .4 


O01735 


SECCT 


0000 1 7 


SEEKL 


000006 


SENDS4 


001 1 14 


SERIAL 


000040 


SEX2SK 


OO0036 


SGRPCD 


107000 


SM 


0OOO4O 


SSSDIA 


OO1073 


STBFLH 


003360 


STEP . X 


OOI 1 IS 


STEP1 


0O4O0O 


STOP 


OOOOI 1 


STR1R2 


003213 


ST . CMP 


000007 


ST .MFE 


000005 


ST .SUC 


OOOOOO 


SY 


000 1 12 


SY8 


000122 


S . BITO 


005603 


S . CYLL 


000024 


S . FUNB 


005534 


S . LDCR 


005567 


S . L0R2 


005575 


S . LDUB 


005577 


S .MLBS 


005607 


S . RLSA 


005506 


S .SDI 1 


005526 


S .STIU 


005624 


S .STR3 


005622 


S.ST10 


005626 


S . TRAK 


000027 


TEMPI 


000046 


TMR.BS 


0001 76 


TSCRPE 


OOOOI 4 


T1 


000102 


UBURST 


OOO 1 40 


UC2EDA 


0024 13 


UER 


OOO007 


UF . RPL 


1 ooooo 


UGUSTA 


002625 


UI0PA1 


0O2747 


UNB . CB 


0O472O 


UNB . RS 


005633 


UNERR 


OO0O4O 


UN . BUF 


001355 


UO. CNT 


OOOOOO 


USTRTA 


OOI 52 1 


U X F C RVY 


005407 



SOI .ES 


000026 


SOI . GO 


000074 


SDI . 12 


000040 


SOI . L 1 


000075 


SOI . OM 


000025 


SDI . RC 


000034 


SDI . RT 


0000 6 7 


SDI .ST 


OOOOOO 


SDI St 


000050 


SDI . TI 


00OO42 


SDI .UF 


000060 


SDI . XH 


OOOOI 6 


SDI . 12 


000074 


SOPF 


OOOOOO 


SECOND 


1 1 200O 


SEKPRV 


00005 1 


SEOERR 


000003 


SES 


040000 


SF 


000400 


SHFIO 


0O0254 


SPURT 


OOO04O 


SST 


OO200O 


STCACH 


033317 


STEP . 1 


OOI 147 


STEP2 


OIOOOO 


STOPCM 


140000 


STS 


004000 


ST. CNT 


0000 12 


ST. MSK 


000037 


ST.WPR 


000006 


SYNC 


000202 


SZBUFA 


005543 


S. BUFR 


001 104 


S . DECB 


0O5614 


S . GRUP 


000026 


S. LDIU 


005600 


S. LDR3 


005576 


S . LD10 


005602 


S. OPFL 


0OOO3 1 


S.RRR1 


005501 


S.SECI 


00003 1 


S.STOO 


005613 


S .STRS 


005623 


S.ST1 1 


005627 


S . TST 


0O224O 


TEMP2 


000047 


TMR ,MC 


000174 


TSTCNT 


OOOOOO 


T2 


00O132 


UCRD 


000004 


UDA1 


00000 1 


UF. CMR 


000001 


UF .WPH 


02O0OO 


UGUSTB 


002631 


UIOPER 


0O3022 


UNB . CC 


004726 


UNB .SR 


004704 


UNITF 


177400 


UN . BWC 


006243 


URAMDA 


001625 


UTEMP1 


000210 


UXFC1 1 


005407 



SOI EO 


000020 


SDI . GP 


0000 13 


SOI . 13 


00004 1 


SDI . 12 


000076 


SDI .OP 


000054 


SDI . RH 


000032 


SOI . RV 


000077 


SDI .SV 


00002 1 


SOI .S5 


00005 1 


SOI . TM 


OOO0O4 


SOI UG 


OOOOOS 


SOI . XL 


000015 


SOI 2 


001475 


SOTIMO 


000200 


SECSZ 


000400 


SEKSAV 


000052 


SEOTST 


OOOOI 7 


SETBAR 


00676 1 


SFERR 


000002 


SHFRES 


006466 


SRM 


0000 15 


STARSP 


000366 


STOALN 


OO040O 


STEP . 2 


001202 


STEP3 


020000 


STOPEN 


020000 


ST .ABO 


000002 


ST . DAT 


000010 


ST . OFL 


000003 


SUPF 


OOOOOO 


SYNCH 


023000 


S . ADRH 


000023 


S . CLRB 


005630 


S .OECO 


005615 


S . INC6 


00561 1 


S. LDOO 


OOS572 


S . LDR5 


0OSS77 


S. LLBO 


0O56O4 


S .RELC 


0OS5O5 


S. RRR7 


005503 


S.SECS 


000030 


S .STRO 


00561 6 


S .STRS 


005624 


S . SWB 1 


005504 


S . XORO 


005610 


TEMP3 


000050 


TOPOL 


000220 


TSTMOO 


002263 


T8 


OOO 146 


UCRS 


0OOO1 4 


UDO 


0OOOO5 


UF .CMW 


000002 


UF .WPS 


OIOOOO 


UGUSTC 


002632 


UMP 


000020 


UNB . CM 


004667 


U N B . WR 


006242 


UNLOCK 


005474 


UPF 


OO0026 


URAMPE 


000475 


UTMP 


OOOOIO 


UXFC12 


005407 



UXFC13 


005423 


UXFC14 


005427 


UXFC15 


005446 


UXFC1 6 


005446 


UXFC17 


005454 


UXFC16 


005462 


UXFUIO 


005634 


UXF14A 


OOS427 


UXF 14B 


005443 


UXF16B 


005453 


U 


ABRT 


002274 


U 


ACC 


OO2670 


U 


ALDC 


003774 


U 


ALOH 


004040 


U 


ALOL 


004062 


U 


ALOZ 


0041O3 


u 


ATTA 


002336 


U 


ATTN 


0023 13 


u 


AVAL 


002344 


U 


AVLA 


002362 


U 


AVLB 


002365 


u 


AVLC 


002373 


U 


AVLO 


002347 


u 


AVL 1 


002354 


u 


BDSM 


004337 


U 


BFIL 


004161 


u 


BFLA 


004 165 


U 


BFLC 


004205 


u 


BFLF 


004217 


u 


BFLH 


004234 


U 


BFLX 


004232 


U 


BFSV 


004 147 


U 


BLST 


00447 1 


U 


BMTA 


004373 


u 


BMTC 


OO4403 


u 


8MTD 


0044 1 S 


U 


BMTE 


004431 


U 


BMTF 


004445 


U 


BMTI 


0O446O 


u 


BMTJ 


004465 


u 


BMTK 


004362 


U 


BMTO 


004545 


U 


BMTR 


0045 12 


U 


BMTS 


004553 


u 


BMTT 


004530 


u 


BMTU 


004535 


U 


BMTV 


004542 


U 


BMTW 


004334 


U 


BMTX 


00*33 1 


u 


BMTY 


004327 


u 


BMTZ 


004341 


u 


BSET 


005014 


u 


BST1 


005070 


u 


CCD 


0O227O 


u 


CINT 


001572 


u 


CIN1 


001574 


u 


CKEA 


00521 4 


u 


CKEB 


005220 


U 


CKED 


005 175 


u 


CKTC 


OOS224 


u 


CLGA 


004300 


u 


CLG3 


0043 1 4 


U 


CLGC 


004315 


u 


CLGD 


004306 


u 


CLM1 


0OS076 


u 


CLOG 


004273 


u 


CLRM 


005075 


u 


CLRS 


002375 


u 


CLSX 


002376 


u 


CMOA 


002506 


u 


CMDB 


0025 1 1 


u 


CMDC 


002513 


u 


CMDE 


002502 


u 


CMER 


002231 


u 


CMP 


003143 


u 


CMPR 


002662 


u 


CNVT 


002430 


u 


CPGC 


004503 


u 


CPME 


005157 


u 


CPRM 


0O5101 


u 


CRCT 


0032 15 


u 


CROS 


004655 


u 


CRSA 


0046E2 


u 


CSDI 


003766 


u 


CSLA 


003336 


u 


CSPT 


002473 


u 


CSTA 


003645 


u 


CUNK 


002477 


u 


C2ED 


002377 


u 


C2EP 


OO2420 


u 


C2EZ 


0024 17 


u 


DAP 


002346 


u 


DATA 


003763 


u 


OERC 


004571 


u 


DERD 


004573 


u 


DERE 


004574 


u 


DERF 


004570 


u 


DERP 


004324 


u 


DIAG 


00OO77 


u 


OONE 


003641 


u 


DONX 


00364O 


u 


END 


0002 15 


u 


ER 


007767 


u 


ERS 


002672 


u 


EXLP 


0O3763 


U 


EXSP 


003737 


u 


FLU 


002272 


u 


GCSA 


002531 


u 


GCSB 


002533 


u 


GCSC 


002535 


u 


GCST 


002515 


u 


GETP 


005273 


u 


GLBN 


004577 


u 


GLBX 


004602 


u 


GMST 


005476 


U 


GPKA 


002007 


u 


GPKB 


0020 1 1 


u 


GPKT 


002005 


u 


GREF 


002536 


u 


GRFA 


002542 


u 


GRFB 


002550 


u 


GSDA 


002553 


u 


GSDS 


002556 


u 


GSDC 


002562 


u 


GSDD 


0O2566 


u 


GSDI 


002551 


u 


GSON 


002552 


u 


GSDW 


002572 


u 


GSDX 


002602 


u 


GSDX 


0O26O7 


U 


GSST 


003725 


u 


GTAD 


001777 


u 


GUCP 


002610 


u 


GUS 


00261 7 


u 


GUST 


002617 


u 


HERR 


002067 


u 


HTMO 


001622 


u 


HWVR 


007750 


u 


IOLB 


001545 


u 


IDLC 


001 562 


u 


IDLD 


001 564 


u 


IDLE 


001537 


u 


IMEX 


002303 


u 


INTA 


002030 


u 


INTI 


O02013 


J 


INTR 


002030 


u 


INTY 


002015 


u 


INTX 


002030 


u 


INVA 


OOS3I2 


u 


INVM 


00S31 1 


u 


IOCM 


002757 


u 


IOPA 


002744 


u 


I OPB 


002756 


u 


IOPC 


002770 


u 


IOPE 


003073 


u 


IOPF 


00 3100 


u 


IOPG 


0031 10 


u 


I OP I 


003 125 


u 


IOPJ 


00313 1 


u 


IOPK 


003144 


u 


IOPL 


003146 


u 


IDPM 


003176 


u 


IOPN 


003153 


u 


IOPP 


003032 


u 


I OPR 


0O27O5 


u 


IOPS 


002732 


u 


IOPW 


00301 1 


u 


IOPX 


002761 


u 


IOPY 


002764 


u 


IOPZ 


003034 


u 


IOPO 


002676 


u 


I0P1 


0027 1 1 


u 


IGSA 


003172 


u 


IOSH 


003162 


u 


LNKA 


003223 


u 


LNKB 


003224 


u 


LNKH 


003230 


u 


LNKP 


003222 


u 


LOGA 


003245 


u 


LOGS 


003233 


u 


LRR1 


004636 


u 


L1R1 


004136 


u 


MAP 1 


005051 


u 


MAP2 


005047 


u 


MINT 


005232 


u 


MINI 


005265 


u 


MIDA 


003373 


u 


MIOB 


003375 


u 


MIOP 


003372 


u 


MLUN 


003401 


u 


MNRD 


003406 


u 


MNWR 


0034 13 


u 


MODL 


OOS477 


u 


MWDA 


003420 


u 


MWOB 


003421 


u 


NOP 


002304 


u 


ONLA 


003436 


u 


ONLB 


00344 1 


u 


ONLC 


003505 


u 


ONLO 


003520 


u 


ONLE 


003S27 


u 


ONLF 


003546 


u 


ONLG 


003573 


u 


ONLH 


003600 


u 


ONL I 


O036O7 


u 


ONLL 


003631 


u 


ONLN 


003424 


u 


ONLR 


003563 


u 


ONLS 


003504 


u 


ONLX 


003554 


u 


ONLY 


003S64 


u 


ONLZ 


003500 


u 


ONLO 


003426 


u 


OPCD 


002166 


u 


OPCE 


002223 


u 


OPDM 


002224 


u 


OPIM 


0022 15 


u 


OVLA 


004643 


u 


OVLB 


004644 


u 


OVLP 


004837 


u 


PKTZ 


003206 


u 


PTEL 


005314 


u 


PTL2 


OOS341 


u 


PTL3 


005323 


u 


PTL4 


005326 


u 


PTL5 


005345 


u 


OSND 


003340 


u 


RAMD 


OOI 624 


u 


RAMX 


00154 1 


u 


RCSA 


001745 


u 


RCSB 


00 1746 


u 


RCSC 


OOI 747 


u 


RCSR 


001737 


u 


RCVE 


001 73S 


u 


RO 


002664 


u 


RECV 


001675 


u 


RPL 


002674 


u 


RRCA 


004732 


u 


RRCC 


0O4754 


u 


RRCE 


004767 


u 


RRCX 


004741 


u 


RREC 


004731 


u 


RSTR 


000002 


u 


RSVA 


002241 


u 


RSVB 


002247 


u 


RTST 


002233 


u 


RVCK 


004323 


u 


RVCT 


004 137 


u 


RVC1 


006762 


u 


RVC3 


006762 


u 


RVC5 


007022 


u 


RVC7 


0071S3 


u 


RVFA 


007 144 


u 


RVFB 


007 1 4 1 


u 


RVFE 


007 1 14 


u 


RVFH 


007 140 


u 


RVRL 


O07147 


u 


RVRT 


00715 1 


u 


RVUX 


OO702O 


u 


RV3A 


00677 1 


u 


RV3B 


007015 


u 


RV3C 


006774 


u 


RV3D 


0070 16 


u 


RV5A 


OO7033 


u 


RV5B 


007066 


u 


RV5C 


007O76 


u 


RV50 


007 101 


u 


RV5E 


007 103 


u 


RV5F 


007 1 1 1 


u 


RV5G 


007126 


u 


RV5J 


007031 


u 


RV5R 


007053 


u 


RV5T 


007054 


u 


RV5W 


007047 


u 


RV5X 


OO7041 


u 


RV5Y 


007046 


u 


RV5Z 


007061 


u 


RV57 


007022 


u 


RV7A 


007153 


u 


R1R0 


OOS223 


u 


R1 R1 


OOS310 


u 


SABT 


003766 


u 


SAOO 


002004 


u 


SADX 


002003 


u 


SBCN 


003210 


u 


SCCH 


003653 


u 


SCID 


0077S1 


u 


SEKA 


0O2077 


u 


SEKB 


002107 


u 


SEKC 


002 1 12 


u 


SEKG 


002147 


u 


SEKH 


002 150 


u 


SEKI 


0O2103 


u 


SEKO 


002101 


u 


S E N D 


001 627 


u 


SETS 


003102 


u 


SETX 


003103 


u 


SGRP 


004664 


u 


SLBN 


004604 


u 


SLEN 


003337 


u 


SNDA 


001647 


u 


SNDB 


OOI 664 


u 


STER 


007733 


u 


STOP 


001753 


u 


STRT 


001500 


u 


STSX 


003107 


u 


STUD 


O0372I 


u 


STIU 


002472 


u 


SUCH 


003422 


u 


SUID 


003675 



u . sum 

U . TMRA 

U . ULNK 

U . UNEE 

U . VAXR 

U . XCMA 

VAXINT 

VC . LOG 

V.RVC3 

WAIT 

WMCI 

WRITCD 

WRRDX1 

WTCMDD 

XCMP 

XWRCMO 

$0IG3 

SPAR 

SSKDB 



003702 
001 610 
0037 13 
004246 
002027 
004472 
00040O 
000020 
007728 
000243 
000007 
122400 
175377 
000323 
000200 
0020S0 
0001 15 
000445 
000002 



U . TBEC 

U .UCSR 

U . UNEA 

U . UNER 

U. VCER 

U. XCMP 

VAXO 

VC. RSP 

V.RVCS 

WAITS 

WRAP 

WRITE 

WRSND 

WT . D I A 

XFCFIN 

XWTCMD 

SDMA1 

SSETL 

SSODA 



004624 
001755 
004255 
004247 
002176 
005230 
O00O06 
OOOOOO 
007727 
0O0246 
OOOOOO 
0OOO04 
00OO03 
006245 
00O02 1 
00206 1 
001241 
001 143 
00000 1 



U . TIMR 

U .UERD 

U . UNEB 

U . UNRD 

U.WR 

U . XFCP 

VOX PC 

VECT 

V.RVC7 

WASTE 

WRC 

WRNXT 

WRT 

WT .RAM 

XFCMAX 

2R0 

SDMA2 

SSVEC 

SSUDA 



001 603 
002066 
004268 
00421 I 
002666 
005402 
000400 
OOOOIO 
007730 
00027S 
0OO037 
0000 15 
000002 
001077 
000022 
00002 1 
001245 
007400 
OOOOOO 



U. TMDA 

U . JERR 

U . UNEC 

U . UNWR 

U .WTSA 

U . ZPSW 

VC . CMO 

VECTAB 

V . RVC3 

WCI 

WRCMO 

WRPFLG 

WRTERR 

XBNCOD 

XFCTAB 

S0IG1 

$ENO 

SSBDA 



00432O 
0O2O7 1 
004252 
004407 
004627 
00337 1 
OOOOOO 
007725 
007731 
OOOOOS 
000302 
100000 
0O0366 
1 20000 
007737 
000 1 10 
10OOO 
000002 



U . TMOO 

U.ULKA 

U.UNED 

U. VAXP 

U.WTST 

USK 

VC.OMM 

V .RVCT 

V.URVC 

WD 

WRFST 

WRRDXR 

WRTSA 

XBNSTR 

XFCUPR 

SDIG2 

SHVEC 

SSKOA 



004321 
00371 1 
00424 1 
OO20 14 
004625 
OOOIOO 
177760 
007725 
00772S 
OOOOOO 
OOOOOS 
13 10OO 
000365 
170000 
000012 
OOOI 1 3 
007760 
00000 1 



D 



i 
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SSKDA 
SSKDB 
SSODA 



51 -O 

77- 1 1 
102-456 
139- 1325 
193-3007 
251 -5136 
334-7760 



SDIG1 

SDIG2 

SDIG3 

SDMA1 

SDMA2 

SEND 

SHVEC 

SPAR 

SSETL 

SSVEC 

A 

ACLO 

ALGADR 

ALGERR 

ALOLMT 

ALUTST 

ATTCOO 

ATTN 

AVAIL 

AVL . LN 

. BAD 

. BTO 

. CPE 

. CTE 

. DTYP 

. ICE 

. ISE 

. IVE 

. LED 



65-0 

102-458 

140- tS14 

235-4410 

288-5634 

1 -O 

4S-0 

80-55 

128- 1 146 

232-4241 

306-6450 

83-1 lO 

83-113 

84- 1 IS 

136- 1241 

136- 1245 

335-3000 

334-7760 

101 -445 

128- 1 143 

329-7400 



8-0 
51 -O 

77-15 
102-456 
140- 1515 
202-3344 
259-5352 

1 -O 

1 -o 
1 -o 

65-0 
102-456 
148-1706 
243-4706 
296-6170 
8-0 

46-0 

82-75 
129- 1 147 
235-4404 
334-7750 



12-0 

SI -0 

79-26 

102-456 



13-0 

51 -0 

80-37 

102-460 



14-0 
64-0 

80-54 
106-530 



14-0 
65-0 
80-55 



15-0 
67-0 
82-75 



15-0 
71 -0 
83-111 



18-0 
73-0 
84- 1 16 



22-0 
74-0 
84-122 



30-0 

74-0 
85- 142 



38-0 
78-0 
85-153 



126-1115 128-1137 129-1147 132-1210 133-1215 133-1220 133-1222 



45-0 46-0 
76-3 76-3 
91 -252 91 -253 

138- 1300 139- 1322 



142-1541 142-1541 145-1604 148-1701 148-1704 152-2002 153-2004 155-2014 15S-2023 155-2023 160-2072 191-2730 

212-3614 220-3725 221-3743 232-4247 232-4254 237-4510 240-4627 246-4771 248-5022 249-50S7 249-5075 251-5127 

278-5541 278-5542 286-5633 289-5634 297-6201 301-6242 329-7400 329-7404 331-7440 332-7445 333-7445 334-7750 

268-5466 
268-5466 

8-0 12-0 13-0 15-0 15-0 

71-0 76-0 76-3 77-11 77-15 

102-466 122-1072 124-1075 126-1110 126-1115 

160-2072 178-2424 191-2725 196-3136 203-3355 

248-5016 248-5034 249-5065 249-5075 253-5201 

297-6201 300-6242 300-6242 3O0-6242 329-7404 

12-0 13-0 1S-0 15-0 18-0 

59-0 67-0 70-0 74-0 74-0 

82-75 83-105 84-114 84-130 85-147 

133-1216 133-1222 134-1233 134-1234 143-1572 

235-4407 237-4503 238-4512 243-4704 248-5014 



18-0 30-0 45-0 46-0 63-0 

77-16 80-45 80-55 82-7S 83-112 

128-1137 128-1145 129-1147 133-1222 138-130O 

206-3410 207-3414 212-3612 220-3725 221-3741 



65-0 65-0 
84- 125 85-153 

1 39 - 1 315 139-1321 

222-3763 230-4212 



259-5333 259-5342 278-5542 287-5634 287-5634 288-5634 288-5634 

330-7426 330-7426 333-7734 334-7750 

2O-0 21-0 22-0 22-0 25-0 27-0 29-0 

75-0 76-0 76-3 77-11 77-15 79-27 79-31 

85-153 103-475 104-500 124-1077 124-1104 126-1115 128-1137 

145-1624 180-2072 201-3305 220-3725 226-4070 230-4206 230-4211 

249-5075 253-5177 256-5232 278-5536 278-5542 282-5567 285-5633 



30S-6450 315-6604 315-6621 317-6667 
13-0 
65-0 137-1263 238-4514 238-4521 315-6606 319-6743 



13-0 



238-451 2 



83-77 
45-0 



306-6450 

30-0 

42-0 

42-0 

42-0 

42-0 

42-0 

42-0 

42-0 

30-0 
156-2035 

30-0 



65-0 
238-4512 
48-0 

99-373 
200-3243 



201 -3261 
315-6611 
76- 1 

115-715 

87-203 



86-154 
1 56 -2036 
76- 1 



155-2015 



315-6617 
76-3 



160-2072 160-2075 



86-170 98-3S5 122-1070 122-1071 126-1120 129-1153 130-1162 133-1221 133-1223 133-1224 139-1323 148-1701 
289-5643 299-8212 299-8213 299-6237 299-6240 3O1-6250 
76-3 80-58 80-86 81-73 86-154 95-335 98-365 98-366 122-1070 160-2072 160-2075 
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a .mpe 

B .MTCE 
B . NABO 



3 -NEX 
S . NMR 
B. NRTY 



. 000 
. RDS 
. RTO 
.SPE 
.STO 
. TOP 

BA 

BA1 6 

BA17 

BA1S 

BA19 

BA20 

BA21 

BA22 

BA23 

BA24 

BA2S 

BA26 

BA27 

BA28 

BA29 

BAO . LN 

BAORH 

BADRL 

BANOT 

BAR 



42-0 

42-0 

30-0 
122- 1071 
335-7772 

42-0 

42-0 

30-0 
129-1153 
299-6237 

30-0 

42-0 

42-0 

42-0 

42-0 

42-0 

21 -O 

21 -0 

21 -O 

30-0 



42-0 
42-0 



42-0 
52-0 

5 1 -0 

51 -O 
191 -2730 

18-0 

98-357 
108-572 
116-731 
122- 1066 
133-1216 
1 40- 1 500 
142- 1540 
14S- 1 623 
147-1 664 
ISO- 1742 
155-2015 
1 62-2123 
164-2167 
173-2331 
179-2430 
180-2472 
1 84- 2536 
1 88- 2632 



80-56 86-154 
126- 1 1 20 1 29 - 1 1 53 



76- 1 76-3 
130- 1 1 62 133-1221 
299 -6240 301 - 6250 



30-0 
30-0 
30-0 
42-0 
42-0 
42-0 
42-0 
43-0 
43-0 
43-0 
43-0 
43-0 
43-0 
43-0 
43-0 



86-155 86-170 98-365 98-366 107-531 108-552 
130-1162 133-1221 133-1224 139-1323 148-1702 156-2036 



80-55 80-56 81-73 86-154 86-170 95-335 
133-1223 133-1224 139-1323 148-1701 156-203S 156-2036 



43-0 
43-0 
43-0 



128-1137 128-1143 278-5541 
43-0 
43-0 



202-3345 

86- 1 60 

91 -263 
193-3007 

76-0 

99-377 
108-576 
1 1 6-733 
1 24- 1073 
134- 1226 



1 40- 
142- 
145- 
147- 
ISO- 



1 501 
1544 
1 624 
1 671 
1744 



155-2022 
162-2124 
164-2170 
173-2333 
179-2431 
1 80-2473 
1 84-2537 
188-2633 



92-270 

92-265 

202-3344 

79-32 
104-475 
108-603 
1 17-751 
124- 1 lOI 
134- 1227 
MO- 1503 
142-1547 
145-1626 
149- 1712 
150- 1746 
158-2053 
1 62-2127 
1 65-222S 
173-2334 
179-2432 
180-2474 
184-2542 
188-2634 



84 
1 04 
109 

1 17 
1 25 
134 
140 
142 
146 
149 
150 
158 
1 62 
1 65 
173 
179 
1 8 1 
1 84 
1 S3 



357 

354 

5137 

132 

501 

'606 

762 

■ 1 105 

■1231 

1505 

1553 

1 636 

1715 

■1751 

■2055 

2131 

2231 

2342 

2433 

2477 

2544 

2635 



259- 
86' 
106- 
1 10 
117 
125 
134- 
140- 
142- 
146- 
1 49 • 
15 1- 
158- 
162- 
166- 
174- 
179- 
182- 
184- 
189- 



5352 

160 

512 

61 1 

770 

1 107 

1233 

1510 

1554 

1640 

1716 

1755 

2057 

2145 

2233 

2354 

2437 

2503 

2545 

2645 



278-5541 

87-201 
106-515 
110-613 
1 17-772 
126-1132 
136- 1235 
140- 1512 
142- I5S6 
146-1641 
149-1721 
151 -1756 
160-2071 
162-2150 
167-2242 
174-2362 
179-2442 
182-2504 
184-2547 
189-2646 



278-5541 

91 -263 
106-527 
1 10-615 
1 IS- 1002 
128- 1 1 46 
136- 1242 
140- 1S15 
142-156 1 
147-1646 
149- 1724 
151 - 1762 
1 61 -2077 
1 63-2151 
167-2252 
174-2365 
179-2443 
182-2507 
185-2551 
189-2647 



92 
107- 
I 10 
116 
131 ' 
136- 
140- 
143- 
147- 
149- 
151 ■ 
161- 
1 63 
1 68- 
174- 
179- 
182- 
138- 
189- 



265 

530 

617 

1004 

1 1 67 

1247 

1522 

1562 

1647 

1725 

1764 

2101 

2152 

2257 

2366 

2447 

251 1 

2573 

2650 



92-270 
108-545 
1 10-623 
118-1010 
13 1-117 1 
136- 12S1 
140- 1526 
143- 1565 
147- 1 651 
149-1 727 
15 1-1 772 
161 -2103 
163-2154 
1 69-2264 
175-2370 
179-2452 
132-2512 
186-2577 
139-2652 



115-712 116-742 117-754 119-1022 122-1070 
289-5643 299-6213 299-6240 301-6250 334-7771 



98-365 98-366 122-1070 122-1071 126-1120 
160-2072 160-2075 289-5643 299-6212 299-6213 



93-305 
108-556 
1 10-625 
118- 1012 
132- 1203 
137- 1263 
140- 1530 
1 43- 1570 
1 47- 1 654 
1 43- 1732 
151 - 1775 
1 62-21 12 
1 63-2155 
1 69 -2266 
176-2405 
179-2456 
133-2523 
187-2610 
189-2653 



93-307 
108-560 
1 14-643 
122-1051 
132- 1206 
137- 1264 
140- 1331 
144- 1574 
147- 1655 
149- 1734 
152- 1777 
162-2113 
1 63-2156 
172-2317 
176-2413 
1 79 -2460 
183-2525 
187-261 1 
189-2655 



93-311 
108-563 
1 15-705 
122- 1052 
132-12 10 
137- 1273 
140- 1533 
145-1610 
147- 1656 
149- 1736 
152-2O0O 
162-2116 
1 63-2160 
172-2322 
176-2420 
179-2461 
183-2531 
138-2622 
19 1 -2720 



94-317 
108-565 
1 15-707 
122- 1057 
132-1212 
138- 1276 
140- 1535 
145-1614 
147- 1657 
ISO- 1737 
154-2010 
1 62-2120 
1 63-2163 
172-2325 
176-2421 
180-2467 
183-2532 
188-2623 
191 -2725 



98-354 
108-570 
1 1 6-727 
122- 1064 
133- 1215 
139- 1320 
142- 1537 
145-1 622 
147-1 660 
1 50- 1740 
154-201 1 
162-2122 
164-2166 
172-2326 
177-2426 
1 80- 2471 
183-2533 
188-2631 
191 -2727 
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192-2732 
193-301 1 
194-304 1 
195-3 106 
197-31 65 
200-3233 
201 -3275 
202-3331 
204-3375 
210-3523 
21 1 -3555 
212-3624 
2 14-366 1 
218-3720 
225-4016 
226-4052 
227-41 10 
229-4147 
231 -4226 
233-4312 
234-4366 
236-4445 
238-4525 
239-4571 
241 -4640 
243-4701 
245-4743 
243-5021 
249-5045 
250-5101 
251-5132 
251-5180 
255-5224 
257-5247 
258-5314 
239-5361 
262-541 6 
268-5466 
290-5707 
291 -6002 
293-6063 
299- 6232 
302-6322 
307-6450 
31 1 -6S25 
313-657 1 
315-6626 
3 18-6701 
319-6756 
322-7O02 
323-7050 
324-71 1 1 
326-7152 
18-0 



192- 
193- 
194 
195 
197 
200 
201 - 
202 
204 
210 
211' 
212 
214 
220- 
225 
226 
227- 
229- 
231 ■ 
233 
235- 
236- 

238 - 

239 - 
241 • 
243- 
245- 
248- 
249- 
250 
251 ■ 
2S2- 
255- 
257- 
259 ■ 
259 ■ 
262- 
270- 
290- 
292- 
293- 
239 ■ 
302- 
307- 
3 11- 
313- 
31 6- 
313- 
3 19- 
322- 
323- 
324- 
327- 



2733 
3012 
3045 
3111 
3173 
3235 
3276 
3332 
3376 
3524 
3560 
3627 
3662 
3734 
4020 
4053 
4112 
4151 
4232 
4314 
4367 
4446 
4526 
4572 
4645 
4703 
4744 
5022 
5047 
5102 
5 135 
51 65 
5225 
5250 
5315 
5364 
5421 
5475 
5714 
6010 
6103 
6233 
6324 
6451 
6330 
6572 
3636 
S702 
6760 
7004 
7053 
7114 
7154 



192- 

193- 

194 

195- 

197- 

200- 

201 • 

202 

204- 

210- 

2 11- 
212- 
214- 
220- 
225- 
226- 
227- 
229 ■ 
231 - 
233- 
235- 
237- 
238 ■ 
240- 
241 - 
243- 
246- 
248- 
249- 
250- 
251 - 
252- 
256- 
257- 
259- 
259 ■ 
263- 
273- 
290- 
292- 
29 4- 
299- 
303- 
307- 

3 11- 
313- 
316- 
318- 
319- 
322- 
323- 
324- 
327- 

81 - 



194 
195 
197 



2740 192 

3013 193 
305 1 
3112 
3175 

3236 200- 

3277 201- 

3337 202- 

3377 208- 

3527 210- 

3S64 211- 

3630 212- 

3863 214- 

3735 221- 

4021 225- 

4056 226- 

4 113 227- 

4 1 54 229 - 

4237 232- 

4320 233- 

4373 235- 

4452 237- 

4527 238- 

4577 240- 

4647 241 - 

4706 244- 

4747 246- 

5023 248- 

5051 249- 

5104 250- 

5136 251 - 

51 66 252- 

5230 257- 

525 1 257 - 

3320 259- 

5365 259- 

3424 263- 

SSOS 273- 

3716 290- 

6015 292- 

6107 295- 

8235 301- 

6335 303- 

6452 308- 

6531 312- 

6573 313- 

6340 316- 

6713 313- 

6761 322- 

7005 322- 

7054 323- 

7120 324- 

7156 327- 
65 81 - 



2753 
30 14 
3052 
3113 
3202 
3237 
3300 
3340 
3440 
3530 
35 65 
3632 
3670 
3752 
4023 
4061 
4 115 
4155 
4243 
4321 
4375 
4453 
4530 
4600 
4652 
4710 
4755 
5024 
5052 
5107 
5140 
S171 
5233 
5252 
5321 
5366 
5425 
5507 
5724 
6017 
6 125 
6243 
6337 
6472 
6533 
6574 
6644 
6722 
67 6 2 
7007 
7055 
7122 
7157 
66 



192- 
193- 
194- 
196- 
197- 
200- 
201 - 
202- 
209- 
210- 
211- 
212- 
214- 
221 - 
225- 
226- 
227- 
223- 
23 2- 
233- 
235- 
237- 
238- 
240- 
241 - 
244- 
246- 
248- 
249 - 
250- 
251 - 
252- 
257- 
257- 
25 9- 
2 59- 
264- 
273- 
290- 
232- 
295- 
301 - 

sos- 
sos - 

312- 
315- 
316- 
313- 
322- 
322- 
323- 
324- 
327- 
92- 



2757 
3020 
3056 
3116 
3204 
3240 
3301 
3342 
3442 
3531 
3573 
3333 
3672 
3754 
4027 
4062 
4116 
4161 
4250 
4323 
4402 
4460 
4533 
4602 
4653 
47 1 3 
4765 
5027 
5063 
5111 
5141 
5173 
S234 
52S3 
5327 
5372 
5430 
55 1 1 
S731 
6025 
6 133 
6245 
63 4 1 
6474 
6534 
6301 
6645 
3 7 24 
6764 
7010 
70S7 
7124 
71 62 
2 67 



192 
193 
194 
196 
198 
200 
201 
202- 
209 - 
2 10- 
21 1 • 
212- 
216- 
221 
225 
226- 
227- 
229- 
232 
233 
235 
237 
233- 
240- 
242- 
2 44- 
243- 
243- 
249 ■ 
250- 
251 • 
253 
257- 
257- 
259- 
259- 
264- 
273- 
290- 
292- 
296- 
301 - 
303- 
309 ■ 
BA- 
SIS' 
317- 
318- 
322- 
322- 
324- 
324- 
333- 
92- 



2760 
3022 
3057 
3125 
3210 
3241 
3302 
3343 
3443 
3534 
3574 
3634 
3675 
3760 
4030 
4063 
4117 
4165 
4255 
4324 
4410 
4465 
4535 
4604 
46S8 
4714 
4767 
5031 
50 64 
5112 
5143 
5175 
5235 
5254 
5330 
5373 
S432 
5517 
5733 
6032 
6147 
6247 
6353 
6477 
6535 
6604 
6 647 
6730 
6765 
7012 
7062 
7127 
7734 
271 



192-2761 
193-3024 
194-3062 
196-3130 
198-3212 
200-3242 
201 -3304 
203-3347 
209-3445 
210-3535 
21 1 -3603 
212-3635 
21 6-3676 
221 -3761 
225-4033 
226-4064 
227-4120 
230-4167 
232-4263 
234-4331 
235-4417 
237-4467 
238-4540 
24O-4305 
242-4661 
244-471 6 
246-4771 
248-5033 
249-5065 
250-S1 15 
251-5146 
253-5 176 
257-5236 
257-5256 
259-5334 
259-5374 
264-543S 
278-5542 
291 -5741 
292-6034 
293- 6156 
301 - 6263 
303-6355 
309-6501 
312-6542 
315-6606 
317-6650 
318-6731 
322- 6766 
322-7016 
324-7063 
325-7 135 
333-7735 
92-272 



192 
193- 
195 
193- 
198- 
200 
201 ■ 
203 
209 - 
210- 
2 11- 
212- 
216- 
223 
225 
226- 
227- 
230- 
232 
234- 
235 
237- 
239 - 
240- 
242- 
244- 
246- 
248- 
249- 
250- 
251 - 
253- 
257- 
257- 
259 - 
259 - 
264- 
279- 
29 1 - 
293- 
236- 
301 - 
304- 
309 • 
312- 
315- 
317- 
318- 
322- 
322- 
324- 
325- 
333- 
92- 



196 
193 



2762 193- 

3025 193 

3066 195- 
3135 
3214 

3247 200 

3312 202- 

3351 203 

3457 209- 

3536 210 

3604 212 

3636 212 

3677 216- 

3773 224- 

4034 225 

4066 226- 

4t22 227 

4171 230- 

4263 232- 

4332 234 

4420 236 

4473 237- 

4547 239 

4614 240- 

4662 242- 

4717 244- 

4773 246- 

5034 248- 

5070 249- 

5116 250- 

5147 251 ■ 

5200 253- 

5237 257- 

S257 257- 

5337 259- 

5375 259- 

5436 264- 

5544 282- 

5746 29 1 - 

6043 293- 

6157 296- 

6273 301 - 

6373 304- 

6507 309- 

3543 312- 

3610 315- 

6651 317- 

6732 313- 

6770 322- 

7020 323- 

7064 324- 

7 136 326- 

7741 333- 

274 93- 



2772 
3027 
3067 
3136 
3215 
3251 
3315 
3353 
3460 
3537 
361 1 
3637 
3700 
3776 
4037 
4070 
4 124 
4 1 75 
4272 
4335 
4427 
450S 
4550 
4315 
4663 
4720 
4774 
5035 
5071 
5117 
5150 
5201 
S240 
5265 
5341 
5376 
5444 
SS70 
57SO 
6044 
8 1 60 
6276 
637 7 
6513 
6546 
65 12 
6660 
6736 
6773 
7022 
7070 
7 1 40 
7742 
304 



193 
193 
195 
197 
198 
201 ■ 
202 
203 
209 
211 
212 
213 
2 17- 
2 24 
225 
226- 
227- 
230 
233 
234- 
236 
237 
239 
240 
242 
244- 
246- 
248- 
249- 
250- 
251 - 
253 
257- 
257- 
259 
259 
2 66- 
239- 
29 1 • 
293 
296- 
302- 
304- 
309- 
312- 
315- 
317- 
319- 
322- 
323- 
324- 
326- 
333- 
93- 



2775 
3032 
3074 
3146 
321 6 
3254 
3320 
3355 
3473 
3542 
3312 
3340 
3703 
4001 
4042 
407 1 
4125 
4201 
4276 
4342 
4431 
4506 
4551 
4323 
4564 
4721 
4776 
5037 
S072 
S121 
5151 
321 1 
5242 
5237 
5343 
5400 
5446 
5636 
5756 
6045 
6161 
6302 
6401 
6514 
6550 
6613 
6634 
6743 
6774 
7023 
7074 
7142 
7743 
310 



193-3000 
193-3033 
195-3075 
197-3153 
199-3223 
201 -3257 
202-3321 
203-3356 
209-3500 
21 1 -3543 
212-3613 
213-3644 
2 1 7-3705 
225-4007 
225-4043 
226-4072 
228-41 37 
230-4203 
233-4300 
234-4345 
236-4432 
238-4514 
239-4553 
240-4324 
242-4665 
244-4727 
247-5004 
248-5040 
249-5073 



251 
251 



5124 
5152 



253-5212 
257-5243 
257-5270 
259-5345 
262-5407 
266-5450 
289-5640 
291 -5783 
293- 6046 
296-6162 
302- 63 1 2 
304-6413 
309 -6515 
312-6555 
315-6615 
317-6872 
319-6746 
322-6775 
323-7033 
324-7101 
326-7 1 44 
334-7750 
93-312 



193- 

194- 

135 

197- 

199- 

201 ■ 

202- 

203- 

210- 

2 11- 

212- 

213- 

217- 

225- 

226- 

226 

228 

230- 

233- 

234- 

236- 

238 ■ 

239- 

240- 

242- 

245- 

248 - 

249 - 
249- 
251 ■ 
25 1 • 
253- 
257- 
253- 
259- 
262- 
267- 
289 - 
29 1 - 
233- 
236- 
302- 
304- 
309 - 
312- 
31S- 
317- 
319- 
322- 
323- 
324- 
326- 



3002 

3034 
3076 
3154 
3226 
3265 
3322 
3370 
3506 
3544 
36 14 
3645 

3 706 
4010 
4044 
4077 

4 140 
4212 
4307 
43S6 
4434 
4515 
4554 
4 6 25 
4666 
473 1 
SO 14 
5042 
507 4 
5125 
5154 
52 13 
5244 
5273 
5351 
5410 
5454 
5642 
5765 
6055 
61 63 
63 1 4 
6415 
651 6 
6556 
6622 
6673 
6747 
6776 
7035 
7103 
7147 



193 

194 

195- 

197 

199- 

20 1 

202- 

203 

210- 

211- 

212 

213 

2 18- 
225- 
225- 
226- 
228< 
23 1 • 
233- 
234 
236- 
238- 
239- 
241 • 
243- 
245- 
248- 
249 - 
243- 
251 - 
251 ■ 
233- 
257- 
258 
259 
262- 
258- 
290- 
29 1 - 
293- 
236- 
302- 
306- 

3 1 1 ■ 
SIS- 
SIS- 
3 18- 
319- 
322- 
323- 
324- 
326- 



30 OS 
3035 
3 100 
3155 
3230 
3266 
3324 
3371 
3512 
3546 

3 6 16 
36S2 
3712 
401 1 
4046 

4 103 
4142 
4222 
4310 
4360 
4440 
4521 
4556 

4 632 
4672 
4732 
SOI 5 
5043 
5075 
5126 

5 156 
521 6 
524S 
5274 
53S4 
541 1 
3462 
5673 
S773 
6056 
61 64 
6316 
6432 
6523 
6562 
6624 
6675 
6753 
7000 
7041 
7105 
7150 



193-3010 
t94-3037 
135-3103 
197-3156 
199-3232 
201 -3267 
202-3330 
204-3372 
210-3522 
2 11 -3554 
212-3622 
214-3657 
218-3714 
22S-4015 
225-4047 
226-4104 
223-4145 
231 -4225 
233-431 1 
234-4365 
236-4444 
238-4522 
239-4570 
241 -4633 
243-4677 
245-4736 
243-5013 
249-5044 



249- 
25 1 ■ 
251 < 
253- 
257- 
258 
259- 



5077 
5127 
5157 
522 1 
5246 
5275 
5360 



262-5414 
268-5465 
290-5700 
29 1-6000 
293-6057 
299-6231 
302- 6320 
306- 6437 
31 1 -6524 
313-6564 
315-6625 
318-6676 
319-6754 
322-7001 
323-7046 
324-7107 
326-715 1 

98-371 
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BCATST 

BCGRP 

BCICSR 

BOCST 

BOSNF 

BECC 

BECER 

3ERDN 

BERMAX 

SFRO 

BFSV 

BFULL 

BGOOO 

BGRUP 

BI .ERR 

BI . EX 

BI . RO 

BI . RLP 

SI STO 



. UDO 
. UOX 

B I . WOW 

BI WR 

BISAO 

BIBER 

BICSR 

BICSRE 

BIOTYP 

8IEA0R 

BIECSR 

BIGPRO 

BIGPR1 

BIGPR2 

BIGPR3 

BI IDES 

BI IMSK 

BI ITST 



108- 
116- 
293 
301 
303- 
308' 
IS' 
1 IS- 
291 
292 
293- 
86- 
64- 



S4I 
732 

6 102 

6272 

6347 

6430 

O 

100S 

S743 

6020 

607 1 

1 62 



108-S43 
1 1 6-734 
29S-61 1 6 
301 -6274 
303-6350 
306-6431 

94-321 
290-5674 
291 -5747 
292-6026 
293- 6072 
107-530 
246-4750 
119-1014 



10S-S5S 108-557 108-564 IOS-571 108-573 113-634 113-635 113-636 114-644 114-660 115 

117-767 117-771 117-773 118-1000 158-2052 158-2056 1 58 - 2060 289 - 5 6 5 4 289-5655 289-5657 293 

295-6121 29S-6124 296-6144 296-614S 296-6146 297-6174 297-8200 299-6221 301-6251 301-6262 301 

301-6277 3O1-63O0 302-6313 302-631S 302-6317 302-6321 302-6323 303-6332 303-6333 303-6334 303 

303-6352 303-6354 304-63S3 304-6372 304-6373 304-6374 304-6376 304-6400 304-6410 304-6412 304 

306-6434 306-6435 306-6436 306-644O 

94-322 108-601 109-604 110-610 110-612 110-614 



1 10-616 1 10-620 1 14-647 



1 15-70S 



1 15 



290-5675 290-5701 290-5702 290-5710 2SO-S711 290-3713 290-5717 290-5725 290-5726 290-S732 291- 



678 1 16-726 

6076 293-6100 

6264 301-6271 

6336 303-6340 

-6414 305-S424T V 

-7 10 118- 1003\ jf 

-5734 291 -5742 Hw^ 



291-6O03 292-6011 292-6012 292-6016 
6067 293-6070 



291-57S1 291-5757 291-5760 291-5784 291-5766 291-5774 291-5775 291-6001 

292-6027 292-6033 292-6036 293-6042 293-6047 293-6050 293-6051 293-6053 293-6054 293-6060 293 

293-6073 293-6074 294-6106 295-6132 296-6155 299-6224 298-6225 

119-1017 



O 234-4334 234-4346 236-4435 247-5006 

O 211-3570 234-4334 234-4344 247-5006 323-7024 

234-4361 235-4370 235-4415 243-4667 247-5006 
247-5006 



248-4751 
87-0 

195-3065 
163-2161 



64- 
84- 
294 
293 
289 
289 
148- 
86- 
299 
290- 
292 
304 
293 
290- 
291 
304 
289 
13 
41 
41 
43- 
4 t - 
41 ■ 
4 1 - 
41 - 
41 ■ 



6105 

6075 

5635 

5643 

1 701 

155 

6241 

5676 

6030 

641 6 

6066 

5672 

5771 

6363 

5634 



201 -3306 

195-3070 19S-3073 223-3772 224-3775 225-4050 237-4471 237-4476 237-4477 238-4532 238-4534 241- 

163-2164 211-3563 213-3651 223-3771 229-4152 231-4233 232-4257 234-4340 237-4500 247-5013 

229-4156 229-4162 231-4231 231-4238 234-4333 237 - 4455 237 - 445 6 237-4457 237-4464 241-4643 246-5003 327 

247-5006 

230-42O4 246-4753 246-S001 247-SOOS 2S1-5134 323-702S 

295-6127 296-6154 299-6210 302-6311 303-6328 303-8344 303-63S7 304-6366 304-6402 306-6444 

294-6112 295-6141 299-6231 303-6327 303-6360 306-6446 



4634 241-4641 
7155 



295-6140 

289-5643 299-6212 299-6235 301-6250 
93-311 94-315 107-531 108-551 117-754 



117-772 118-1000 119-1022 133-1223 1S6-2034 158-2057 299-6221 299-6237 



290-5703 290-5712 290-5720 290-5727 291-5735 291-5744 291-5752 291-S761 291-5767 291-5776 291-6004 292-6013 292-6021 

292-6036 293-6061 293-6065 294-6104 295-6126 296-6153 298-6201 298-6207 302-6301 303-6325 303-6341 303-6356 304-6401 

306-6443 

302-6303 

290-5677 290-5705 290-5706 290-5713 290-5722 290-5723 290-5730 291-5737 291-5740 291-5745 291-5754 291-5755 291-5762 

291-5772 291-5777 292-6008 292-6007 292-6014 292-6023 292-6024 292-6031 292-6040 293-6062 293-6065 

304-6407 305-8424 

301 -6242 



97-352 115-7 14 
86-163 87-206 

119-1016 
87- 1 77 87-205 

1 20- 1042 



1 18-744 
87-2IO 



299-8217 
91 -2S3 



120- 1032 



1 17-765 
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BIMEM 
BIPE 
BIPSDE 
BIPSFC 
BIPSRC 
SIR. 1W 
B I R . 2W 
B I R . 3W 
B I R . 4W 
B I R . 5W 
B I R . 6W 
BIR. CM 
BIR . EV 
BIR. EX 
BIR. L2 



BIR. LP 
BIR . LW 
BIR.NI 
BIR. NO 
BIR. 00 
BIR. OK 
BIR . SO 
BIR. X2 
8IRD00 
BIRD01 
BIRD02 
BIRD03 
BIR004 
3IRD05 
BIR006 
BIR007 
BIRDOS 
BIR0O9 
BIR010 
BIRD1 1 
BIRD 12 
BIR0I3 
BIRD14 
BIRD15 
BIROBR 
BIRDCM 
BIREOK 
BIRTRV 
BISAOR 
BITOO 



BIT02 
BIT03 
BIT04 



86- 175 
86- 1 66 
41-0 
4 1 -O 
4 1 -O 
290-S733 
291 -57SO 
291 -5764 
29 1 -5747 
290-5732 
290-5674 
293-6046 
293- 604 1 
293-6064 
290-5673 
292-6025 
293-6041 
289-5670 
293- 6042 
289 -5647 
293 - 6042 
293-6060 
2S9-S6SO 
293-6076 
290-5703 
290-5720 
2 9 1-5735 
29 1 -5752 
29 1 -5767 
29 1 -6004 
292-6021 
292-6036 
290-SS7S 
230-5712 
290-S727 
291 -S744 
291 -5761 
29 1-5776 
292-6013 
292-6030 
289-5665 

40-0 
289 -5645 

51 -0 

4 1-0 

18-0 

59-0 
107-535 
176-2406 

18-0 

70-0 

18-0 

18-0 

18-0 



120- 
1 12- 



232- 

29 1 • 

29 1 - 

29 I - 

292- 

290- 

293- 

293- 

293- 

290- 

292- 

293- 

289- 

293- 

295- 

293 

293 

295- 

29S- 

329- 

329 

329 

329- 

329 

329 

329 

329' 

329 

329 

329 

329 

329 

329 

329 

329 

329 - 



1026 120-1026 
630 



290 
293 



6016 293 
8001 293 
5765 293 
6002 293 

6017 293 
5701 
6051 
6083 

607S 296 
5700 290 
8032 293 
6063 

5671 293 
6047 293 

6 1 13 
60S2 
6062 
6114 
6113 
7404 
7405 
7406 
7407 
7410 
741 1 
7412 
74 13 
74 14 
7415 
7416 
7417 
7420 
7421 

7 4 22 
7423 
7 404 

314 95 



6047 293-6057 293-6074 296-6156 296-6157 296-6160 296-6161 296-6162 296-6163 296-6164 

6043 293-6044 293-6045 293-6O50 293-6055 293-6056 293-6073 

6072 

6071 

6070 

5710 290-5715 290-5725 291-5742 291-5757 291-5774 292-6011 29 2 - 6026 29 2 - 6034 293-6067 

6060 

61 67 

5707 290-5714 290-5724 290-5731 291-5741 291-5746 291-5756 291-5763 291-5773 29 1 - 6000 292-6010 292-601S 

6052 

6061 
6053 



-334 114-697 115-675 118-777 239-5657 293-6101 295-6123 293-6142 299-6220 
294-8112 301-6252 



59 
108 
188 



1037 

24-0 25-0 30-0 36-0 39-0 45-0 53-0 58-0 38-0 

59-0 60-0 61-0 63-0 84-0 65-0 69-0 69-0 91-260 

534 108-574 114-645 114-653 132-1211 132-1213 163-2164 164-2171 164-2171 184-2171 

2623 202-3326 202-3328 202-3328 202-3326 209-3474 230-4204 231-4224 233 - 43 1 6 239 - S362 

O 25-0 39-0 45-0 S3-0 58-0 SS-0 59-0 59-0 6O-0 

-656 114-665 115-674 115-711 116-722 118-741 

O 39-0 58-0 SS-O 39-0 60-0 83-0 64-0 69-0 

30-0 39-0 43-0 59-0 61-0 62-0 64-0 69-0 

O 24-0 25-0 30-0 39-0 49-0 58-0 58-0 59-0 60-O 



58-0 


58-0 


58-0 8 


91 -261 


99 -374 


107-5341 


164-2171 


175-2367 


175-2371 
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BIT09 
BIT IO 

BIT1 1 

B I T 1 2 

BIT13 
BIT 1 4 
BIT1S 



B I T 1 6 

BIT17 

SIT18 

BIT19 

8IT20 

BIT21 

BIT22 

BIT23 

BIT24 

BIT2S 

BIT26 

SIT27 

BIT2S 

BIT29 

BIT30 

8IT31 

BIUCSR 

BIW.5R 

BIW. EX 

BIW. LP 

BIW. LO 

BIW. LS 

BIW. NO 

BIW. OK 

BIW. SO 

BIW.TS 

BIWRCM 

BIWSTA 

BLAST 



70-0 
18-0 
70-0 
18-0 
82-0 
18-0 
63-0 
18-0 
73-0 
18-0 
18-0 
137- 1270 
18-0 
64-0 
18-0 
64-0 
18-0 
62-0 
18-0 



99-373 
184-2544 
258-5273 

39-0 

39-0 

39-0 

39-0 

39-0 

39-0 

39-0 

39-0 

39-0 

39-0 

39-0 

39-0 

39-0 

39 -O 

39-0 

39-0 

41 -O 
301 -6271 
301 -6276 
301 -6274 
301 -62SO 
303-6330 
301 -6254 
301 -6300 
301 -6255 
303-6326 

40-0 

4 1 -O 

64 -O 



22-0 

73-0 

21 -O 

73-0 

22-0 

63-0 

21 -0 
102-456 

19-0 

21 -O 
268-5471 

19-0 

19-0 
139- 1325 

19-0 

63-0 

19-0 

62-0 

19-0 

59-0 

99-407 
192-2745 
259-5323 

42-0 

42-0 

42-0 

42-0 

42-0 

42-0 

42-0 

42 -O 

42-0 

42-0 

42-0 

42-0 

42-0 

42-0 

42-0 

43-0 
156-2030 
301 -6277 
303-632S 
302-6302 
304-6371 
305-6417 
305-6417 
302-6302 
304- 6361 
305-6426 

81-63 

87-211 
226-4065 



24-0 24-0 25-0 30-0 39-0 58-0 
229-4147 

22-0 24-0 24-0 25-0 25-0 30-0 

268-5470 268-5471 

24-0 30-0 35-0 35-0 39-0 43-0 

69-0 73-0 131-1200 258-5276 

22-0 39-0 43-0 46-0 50-0 58-0 

183-2527 196-3145 239-4552 239-4555 239-4557 

39-0 50-0 58-0 59-0 62-0 B2-0 

22-0 39-0 42-0 58-0 59-0 60-0 
323-7042 

21-0 22-0 35-0 39-0 42-0 45-0 



22-0 
161 -2107 

22-0 

64-0 

22-0 

64-0 

22-0 

60-0 

99-417 
1 94-3047 
259-5324 

43-0 

43-0 

42-0 

42-0 

42-0 

42-0 

42-0 

42-0 

42-0 

42-0 

42-0 

42-0 

42-0 

42-0 

43-0 

44-0 
156-2033 
302-6312 



35-0 39-0 42-0 
329-7400 333-7445 
35-0 39-0 43-0 



56-0 
56-0 



58-0 
58-0 
43-0 



59-0 
39-0 

50-0 

59-0 

64-0 
62-0 

58-0 

59-0 

58-0 

53-0 



59 -O 

49-0 

SS-0 

62-0 

73-0 
62-0 

59 -O 

60-0 

59-0 



60-0 
58-0 
58-0 
62-0 

73-0 

63-0 

60-0 
61 -O 
59-0 
59-0 



61 -O 
58-0 
S9-0 
64-0 

64-0 
62-0 
62-0 
60-O 

59-0 



62-0 


64-0 


59-0 


61 -0 


61 -0 


62-0 


73-0 


73-0 


80-51 


137- 1266 


62-0 


62-0 


62-0 


63-0 


61 -0 


62-0 



35-0 35-0 39-0 42-0 43-0 53-0 58-0 59-0 59-0 60-0 61-0 

64-0 106-521 116-724 129-1152 

25-0 35-0 35-0 39-0 42-0 43-0 45-0 4S-0 45-0 S3-0 58-0 

61-0 61-0 61-0 61-0 62-0 62-0 63-0 64-0 64-0 73-0 98-363 

106-521 116-724 139-1325 146-1630 147-1662 148-1704 149-1723 16 1-2102 162-2114 162-2132 183-2524 

194-3047 203-3361 211-3575 224-4005 226-4072 236-4447 243-4700 246-4745 246-4777 247-5005 248-5023 

259-5350 269-5472 281-5566 323-7022 326-7146 327-7162 329-7400 333-7445 

43-0 43-0 



43-0 
43-0 
43-0 



43-0 
43-0 



43-0 

44-0 

44-0 
156-2037 
306-6435 



44 -O 
44-0 



304- 6406 
305-6423 306-6447 

305-6422 
305-6427 

93-303 95-331 98-372 112-633 116-725 117-766 158-2051 301-6264 303-6331 304-6371 306-6433 

88-220 126-1122 126-1125 129-1147 130-1160 130-1163 
229-4157 229-4163 231-4231 231-4240 236-4447 236-4451 237-4455 237-4457 237-4463 237-4470 246-4777 246-5002 
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SLOCK 
SLRWR 
3LSTB 
JMAPDN 
3NXC0P 
S0ARD2 
!P 

3R00LP 
JROOLX 
SR01LP 
JR01LX 
R02LP 
R02LX 
R03LP 
R03LX 
R04LP 
R04LX 
ROSLP 
R05LX 
R06LP 
R06LX 
R07LP 
R07LX 
R08LP 
R09LP 
R10LP 
R1 1LP 
R12LP 
R13LP 
R14LP 
R15LP 
RARS 
RCTS 
REG 



BRGADR 

BRLV4 

BRL V4R 

BRLV4S 

BRLV5 

BRLV5R 

BRLVSS 

BRLV6 

BRLV6R 

BRLV6S 

BRLV7 

3RLV7R 

BRLV7S 

BROKE 

BRTRY 

BTCNT 



327-71 62 
19-0 



306-6450 
290-5672 
290-5673 
290-57O6 
290-5707 
290-5723 
290-5724 
291 -5740 
291 -5741 
291 -5755 
291 -5756 
291 -5772 
291 -5773 
292-6007 
292-6010 
292-6024 
292-6025 
290-5675 
290-57 1 1 
290-5726 
291 -5743 
291 -5760 
291-5775 
292-6012 
292-6027 

64-0 

64-0 

18-0 
t08-S52 
126-1120 
299-8212 

92-265 

43-0 

43-0 

43-0 

43-0 

43-0 

43-0 

43-0 

43-0 

43-0 

43-0 

43-0 

43-0 

42-0 

64 -O 

51 -0 



234 
236 
248 
323 

80 
315 
290 
290 
290 
290 
29 1 
29 1 
29 I 
29 1 
29 1 
29 1 
29 1 
29 I 
292 
292 
292 
292 
290 
290 
290 
29 1 
291 
29 1 
292 
292 
236 
234 

76 
108 
129 
299 



4334 

44SO 

5025 

7026 

47 

66 10 

5702 

5704 

5717 

572 1 

5734 

5736 

S75 1 

5753 

5766 

5770 

6003 

6005 

6020 

6022 

6035 

6037 

5677 

5713 

5730 

5745 

5762 

5777 

60 14 

603 1 

4436 

4341 

1 

553 

1 153 

621 3 

302 



234-4350 236-4435 247-5006 

246-4777 

248-5030 

323-7027 

315-6614 



234-4352 236-4436 324-7121 327-7160 

76-3 80-55 80-56 61-73 

113-642 114-666 115-712 115-713 

130-1162 133-1221 133-1223 133-1224 

299-6237 299-6240 301-6250 334-7771 33S-7772 

94-313 112-632 114-656 115-674 116-723 



36-155 
1 16-742 
139- 1323 



86-156 
1 I 6-743 
148- 1701 



86-171 
1 1 7-754 
1 48- 1 702 



95-335 

1 17-755 



98-365 96-366 107-531 107-532 
119-1022 119-1023 122-1070 122-1071 



156-2035 156-2036 160-2072 160-2075 289-5643 



117-765 118-776 158-2050 299-6217 



156-2032 
156-2040 



87-207 
236-4447 246-4775 247-5005 
51-0 229-4147 230-4167 234-433S 236-4444 
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BTROTH 
BUF 



BUF.56 
BUF . BC 
BUF .BP 

BUF OL 

BUF EC 
BUF . ED 
BUF . CP 
BUF . HH 
BUF . HL 
BUF . LL 

BUF . NL 

BUF .SO 
BUF .ST 

8UF . TA 
BUF . U 1 
8UF . U2 
BUF . UA 
BUF . US 
BUFBEG 
BUFEND 
BUFLMT 



98- 
108- 
1 16- 
131 - 
140- 
151 - 
170- 
166- 

1 98- 
209- 

2 18- 
228- 
232- 
234- 
239- 
246- 
250- 
259- 
273- 
282- 
283- 
290- 
291 - 
293- 
301 - 
303- 

3 12- 
319- 
324- 

65- 
65- 
64- 
65- 
65- 
65- 



360 

601 

734 

120 1 

1513 

1766 

2302 

2574 

321 1 

3503 

3713 

4144 

4264 

4381 

4582 

47S3 

5122 

531 6 

5515 

5602 

5626 

5717 

5775 

SOS 1 

6244 

6354 

6532 

6745 

7123 



220- 
18- 

104 

109 

117 

132 

140- 

1 51 

1 72- 

186 

198 

210 

218 

229 

232 

235 

239 

246 

250 

259 

273 

282 

283 

290 

291 

293 

301 

304 

312 

322 

324 
65- 
65- 



3731 



504 

604 

7 60 

1204 

1521 

1776 

23 14 

2600 

3213 

3515 

3715 

4 150 

4265 

441 1 

4555 

4766 

5123 

5377 

5520 

S603 

5627 

5725 

600 1 

6053 

6246 

6378 

6547 

7013 

7125 



106- 

1 10- 

1 17- 

132- 

1 40- 

153- 

172- 

188- 

199- 

210- 

224- 

230 

232' 

235 

239 

246' 

251 

259 ■ 

276' 

282 

284- 

290 

29 1 ■ 

293 

301 

304 

312 

322 

326 



513 

610 

771 

1207 

1532 

2003 

2321 

2624 

3222 

3532 

3774 

4170 

4270 

4423 

4561 

5003 

5131 

5401 

5S37 

5604 

5630 

5726 

6003 

6054 

6271 

6400 

655 1 

702 1 

7143 



84-133 
108-514 
1 10-612 
1 17-773 
132- 121 1 
140- 1534 
156-2026 
173-2332 
192-2763 
199 -3228 
210-3540 
224-3777 
230-4176 
233-4306 
235-4424 
240-4612 
247-5007 
251 -5133 
263-5423 
279 -5543 
282-8606 
284-5631 
290-5732 
292-601 1 
293-6060 
301 -6272 
304-6414 
3 12-6557 
323-7027 
326-7146 



106 
1 10 
1 18 
132 
1 40 
158 
1 73 
192 
199 
21 1 
225 
230 
233 
236 
240 
248 
251 
264 
281 
282 
284 
29 1 
292 
293 
301 
306 
3 1 2 
323 
331 



16 1 9 1- 

516 108- 

-614 110- 

1003 118- 

1213 134- 

1536 142- 

2054 158 

2335 174- 

•2764 193 

■3227 201- 

■3557 111- 

-4041 225 

4202 230' 

-4316 233 

'4433 238 

-4621 240 

'5030 248 

•5137 2S1 

•5427 264 

■5560 282 

'5610 283 

-5632 289 

-5734 29 1 - 

-6012 292 

•6067 293' 

-6274 301 ' 

•6435 306 

'8561 313 

-7037 323 

•7440 333 



254 

54 1 

61 6 

1005 

1 230 

1545 

2056 

2363 

3023 

3256 

3561 

4045 

4213 

4322 

4451 

4622 

504 1 

5144 

5431 

5567 

S613 

5637 

5742 

601 6 

6070 

6277 

6436 

6566 

7052 

7725 



108 
1 10 
1 1 8 
1 36 
1 42 
1 58 
174 
194 
201 
21 1 
226 
231 
233 
237 
241 
249 
251 
264 
282 
283 
289 
29 1 
292 
293 
301 
306 
315 
323 
335 



266 
-543 
'620 
■ 1007 
' 1236 

1550 

2060 
'2364 
'3061 
'3260 
'3562 

4060 
'4223 
'4325 
-4454 
■4636 
■5055 
-5155 
■5434 
•5572 
•5614 
•5641 
■5743 
- 6020 
■6071 
■6300 
■6440 
'6614 
•7056 
•7775 



1 18 
136 
143 
1 61 
175 
195 
201 
21 1 
226 
231 
234 
237 
24 1 
249 
251 
268 
282 
283 
290 
29 1 
292 
293 
302 
308 
315 
324 
335 



271 

555 
622 
1011 
1246 
157 1 
2 lOO 
■2376 
3077 
3264 
3577 
4067 
■4224 
'4338 
■4457 
4637 
-5067 
51 63 
-5463 
■5573 
-5616 
■5674 
■5747 
■6026 
■6072 
-6313 
■6457 
■8616 
•7060 
•7775 



93-308 
108-557 
1 10-624 
122- 1053 
136- 1250 
144-1 575 
161-2106 
176-2423 
195-3101 
201 -3270 
212-3615 
226-4073 
231 -4230 
234-4343 
237-4462 
24 1 -4644 
249 -5076 
251 -SI 64 
268-5464 
282-5574 
283-5620 
290-5675 
291 -5751 
292-6027 
293-6073 
302-6315 
308-6462 
316-6642 
324-7071 



93- 
108- 
1 14- 
122- 
139 ■ 
145- 
1 62- 
177- 
1 95- 
202- 
212- 
227- 
231 ■ 
234' 
237 
243 
249 
252 
268 
282 
283 
290 
29 1 
292 
293 
302 
308 
317 
324 



310 

561 

647 

1063 

1317 

1625 

2121 

2427 

3 107 

3333 

3620 

4114 

4231 

4344 

4466 

4674 

5100 

5172 

5467 

5575 

5621 

5701 

5757 

6033 

6074 

6317 

6464 

6661 

7075 



93-312 
108-564 
1 15-706 
122- 1065 
140- 1502 
147- 1650 
1 66-2234 
181 -2501 
196-3127 
203-3360 
213-3650 
227-4121 
231 -4235 
234-4347 
237-4470 
243-4675 
250-5103 
253-5215 
273-5506 
282-5576 
283-5522 
290-5702 
291 -5760 
292-6035 
294-6106 
302-6321 
308-6476 
317-6663 
324-71 04 



94- 
108- 
115- 
124- 
140- 
148- 
166- 
183- 
196- 
203- 
213- 
227- 
231 ' 
234- 
238- 
243- 
250- 
253- 
273- 
282- 
283- 
290 
251 • 
293- 
295' 
302- 
309 
317- 
324 ■ 



321 

5 66 

710 

1074 

1504 

1 677 

2240 

2535 

3144 

3365 

3651 

4123 

4236 

4351 

451 6 

4700 

5106 

5220 

55 10 

5577 

6623 

5710 

5764 

6042 

6132 

6323 

6500 

6671 

7 1 06 



94- 
108- 
116- 
124- 
140- 
149 - 
168- 
184- 
196- 
203- 
214- 
228- 
231 ■ 
234' 
238 
244 
250- 
255 
273 
282 
283 
290 
29 1 
293 
298 
303 
309 
318 
324' 



322 
571 
730 

1 too 

1507 
1707 
2260 
2543 
31 45 
3366 
3671 
4141 
4240 
4363 
4536 
4722 
5113 
5226 
5512 
5600 
5624 
571 1 
5766 
6047 
6155 
8336 
6502 
6735 
71 10 



98-355 

108-573 

1 16-732 

126- 1 13 

140- 151 

149-173 

170-230 

184-2546 

197-3174 

209-3446 

2 15-3674 

228-4143 

232-4260 

234-4357 

238-4541 

245-4737 

250-5120 

257-5241 

273-5514 

282-5601 

283-5625 

290-5715 

291 -5774 

293-6050 

299-6236 

303-6340 

309-6510 

318-6737 

324-7121 



o 



65-0 212-3611 243-4701 244-4713 249-5052 249-5070 250-5102 250-5111 251-5154 253-5176 

212-3616 212-3622 230-4201 236-4431 244-4716 249-5073 273-5507 307-6461 318-6676 322-7010 323-7033 324-7063 

65-0 140-1525 307-6454 

212-3614 230-4212 235-4410 243-4706 246-4771 249-5065 249-5077 251-5127 253-5201 

233-4311 233-4311 240-4600 240-4600 250-5121 322-6776 323-7054 323-7054 326-7150 

233-4311 24O-4600 250-5117 322-6775 323-7054 326-7150 326-7150 

65-0 65-0 225-4042 226-4061 

224-3776 226-4052 226-4066 229-4154 229-4161 231-4226 234-4331 236-4446 237-4452 237-4465 246-4776 273-5506 



327-7156 



251-5140 323- 



65- 
65- 
65 

65 
65 
65 

225 



65- 
65- 
65- 
45- 



O 196-3134 

O 211 -3S65 

7023 324-7120 

O 251-5151 

O 212-3612 

O 65-0 

O 202-3342 

O 65-0 

276-5532 

O 

4031 225-4032 



22S-4043 232-4250 235-4417 236-4427 239-4547 239-4S71 243-4677 244-4727 253-5175 318-6731 

230-4203 234-4342 234-4360 235-4367 236-4434 236-4445 240-4624 246-4747 247-5004 248-5024 248-5027 

327-7157 

322-7002 322-7005 326-7152 

237-4SOS 249-5063 

212-3613 237-4506 248-5021 

248-5033 249-S071 251-5143 

202-3343 248-5034 249-5072 251-5136 

276-5533 



248-S023 249-5064 249-5075 
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BUFPOS 
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49 
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49 
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49 





49 





SUFP1 1 


49 





49 





BUFP12 


49 


o 


49 





BUFP 1 3 


49 





49 





BUFP14 


49 





49 





BUFP15 


SO 


o 


50 





BUFP16 


SO 





50 





BUFP17 


50 





50 





BUFP18 


SO 





50 





BUFP19 


50 





50 





BUFP20 


50 





50 
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50 





50 





BUFP22 


50 





50 





BUFP23 


50 





50 





BUFP24 


50 





50 
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50 





SO 
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50 





50 





BUFP27 


50 





50 





BUFP28 


51 





51 


-0 


BUFP29 


51 


-0 


51 


-0 


BUFP30 


51 


•0 


51 


-0 


BUFP31 


51 


-0 


51 


-0 


BUFP32 


SI 





5 1 


-0 


BUFP33 


51 


-0 


51 


-0 


BUFP34 


51 


-0 


51 


-0 


BUFP35 


5 1 


-0 


51 


-0 


8UFP36 


SI 


-0 


51 


-0 


BUFP37 


51 


-0 


51 


-0 
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5 1 


-0 


51 


-0 
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51 


-0 


51 


-0 
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51 


-0 


51 


-0 
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5 1 


-o 
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-0 
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51 


-0 


51 


-0 
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SI 


-0 


51 


-0 
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51 


-0 


51 


-0 
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51 


-0 
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51 


-0 


51 


-0 
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SI 


-o 


51 


-0 


BUFP49 


5 1 


-0 


51 


-0 


BUFPSO 


51 


-0 


51 


-0 


8UFP5 1 


5 1 


-0 


5 1 


- 


BUFP52 


51 


-0 


52 


-0 


BUFPTR 


49 


-0 


49 


-0 



140-1515 240-4627 
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230-4173 



KDBUP DIGITAL EQUIPMENT CORP. 

CROSS REFERENCE TABLE ( CREF V01-08 ) 



2901 ASSEMBLER VERSION 32 PAGE S- 






o 



8UFR 1 . 


65 


-0 


65 


-0 


65 


-0 


275 


-5530 


275 


-5S31 






































BUFR2 . 


65 


-0 


125 


- 1 106 


12S 


- 1 107 














































BW. SOI 


304 


-6362 


304 


- 6367 


















































CSTYPE 


1 


-0 


1 


-0 


8 


-0 


3 


-0 


S 


-0 


1 2 


-0 


12 


-O 


12 


-0 


13 


-O 


13 





1 3 


-0 


14 


-0 


1 4 


-O 


1 5 


- 




1 5 


-0 


1 5 


-0 


15 


-0 


15 


-0 


1 5 


-0 


1 3 


-0 


1 8 


-O 


1 8 





20 





21 





22 





22 





22 


O 


25 


- 




27 


-0 


29 


-0 


30 


-0 


30 


-0 


38 


-0 


45 





45 


-0 


45 





46 





46 





46 





51 


o 


5 1 





5 1 


-o 




5 1 


-0 


59 


-0 


S3 


-0 


64 


-o 


E5 


-0 


65 





65 


-0 


65 





65 





67 





67 





70 





7 1 





7 1 


-0 




73 


-0 


74 


-0 


74 


-0 


74 


-0 


74 


-0 


75 


o 


76 


O 


76 





76 





76 


3 


76 


3 


76 


3 


76 


3 


77 


- 1 1 




77 


- 1 1 


77 


- 1 1 


77 


- 15 


77 


- 15 


77 


1 5 


77 


16 


79 


-26 


79 


27 


79 


31 


30 


37 


80 


45 


SO 


54 


80 


55 


80 


55 




80 


-55 


82 


-75 


82 


75 


82 


-75 


32 


-75 


S3 


10S 


S3 


1 1 1 


S3 


1 1 2 


84 


1 1 4 


84 


1 1 6 


S4 


122 


84 


1 25 


84 


1 30 


85 


-142 




85 


-147 


8S 


- 153 


35 


- 1S3 


85 


- 153 


9 1 


-252 


9 1 


253 


102 


456 


102 


456 


102 


456 


102 


456 


102 


456 


102 


460 


102 


466 


1 03 


475 




104 


-soo 


106 


-530 


1 22 


- 1072 


124 


- 1075 


1 24 


1077 


124 


1 104 


126 


1110 


1 26 


1115 


126 


111S 


126 


1115 


1 28 


1 137 


1 28 


1 137 


128 


1 137 


1 28 


1145 




1 28 


- 1 146 


1 29 


-1147 


1 29 


- 1 147 


129 


-1147 


1 32 


1210 


133 


1215 


133 


1216 


133 


1220 


133 


1222 


1 33 


1222 


133 


1222 


134 


1 233 


1 34 


1234 


1 38 


1 300 




1 33 


- 1 300 


1 39 


-1315 


139 


1321 


1 39 


- 1322 


1 39 


1325 


140 


1514 


140 


1515 


142 


1541 


142 


1541 


143 


1572 


145 


1 604 


145 


1624 


1 48 


1 70 1 


1 48 


1 704 




t 48 


- 1 706 


152 


-2002 


153 


2004 


155 


2014 


155 


2023 


155 


2023 


1 60 


2072 


1 60 


2072 


1 60 


2072 


176 


2424 


19 1 


2725 


191 


2730 


193 


30O7 


1 9 6 


3 136 




20 1 


-3305 


202 


-3344 


203 


3355 


206 


34 10 


207 


3414 


212 


3612 


212 


361 4 


220 


372S 


220 


37 2 5 


220 


3725 


221 


3741 


221 


3743 


222 


3763 


226 


4070 




230 


-4206 


230 


-4211 


230 


4212 


232 


424 1 


232 


4247 


232 


4254 


235 


4404 


235 


4407 


235 


4410 


237 


4S03 


237 


4510 


233 


451 2 


240 


4627 


243 


4704 




243 


-4706 


246 


-4771 


248 


5014 


243 


501 6 


248 


5022 


243 


5034 


249 


5057 


249 


5055 


249 


5075 


249 


5075 


249 


S075 


251 


51 27 


25 1 


5 136 


253 


5 1 77 




2S3 


-520 1 


256 


-5232 


259 


5333 


259 


5342 


259 


5352 


263 


5466 


263 


5466 


278 


5536 


278 


5541 


278 


5542 


278 


5542 


278 


5542 


282 


5567 


285 


5 633 




286 


-5633 


287 


•5634 


287 


5634 


288 


5634 


288 


5634 


238 


5634 


239 


5634 


296 


8170 


297 


6201 


297 


620 1 


300 


6242 


300 


6242 


300 


6242 


301 


6242 


CCLASS 


306 
45 


-6450 



329 
334 


7400 
77S7 


329 


7404 


329 


7404 


330 


7426 


330 


7426 


331 


7440 


332 


7445 


333 


7445 


333 


7734 


334 


7750 


334 


77SO 


334 


77SO 


334 


7760 


CCSRWO 


48 





48 





















































CCSRW1 


4 8 





48 





48 





48 





149 


1712 


149 


1722 


































CDONE 


12 





95 


337 


96 


340 


108 


552 


1 15 


701 


1 16 


73 6 


159 


2062 


290 


5675 


290 


5702 


290 


571 1 


290 


5717 


290 


5726 


29 1 


5734 


29 1 


5743 




29 1 


575 1 


29 1 


5760 


291 


5766 


29 1 


5775 


29 1 


6003 


292 


6012 


292 


6020 


292 


6027 


292 


6035 


293 


6060 


298 


6201 


298 


6202 


298 


6203 


298 


6204 




298 


6205 


298 


6206 


301 


6300 














































CF . ATN 


50 





50 





200 


3244 














































CF .MSC 


49 





SO 





















































CF . THS 


49 


O 


50 





232 


4275 


233 


4277 










































CFLAGS 


50 





214 


367 1 


















































CHGFLG 


69 

























































CHGMOO 


69 


O 






















































CHKBOR 


289 


5651 


297 


6 1 70 


297 


6 1 70 


301 


6256 










































CHKPAR 


98 


353 


1 12 


630 


1 14 


654 


1 15 


672 


1 1 6 


720 






































CKWREA 


227 


4122 


227 


4124 


















































CKWRER 


194 


3037 


227 


4123 


322 


7007 














































CKWROM 


227 


4121 


229 


4155 


253 


5212 














































CLIMIT 


4 9 





49 





140 


1510 


147 


1664 










































CLRERR 


90 


25 1 






















































CLRTST 


79 


31 


80 


34 


82 


75 


32 


75 


82 


75 






































CMDCOF 


47 





47 





142 


1554 


142 


1556 


148 


1705 


1 50- 


1743 


1 96 


3134 






























CMOLEN 


47 





47 





48- 


O 


48- 





1 3 1 


117 1 


1 48 - 


1703 


































CMOLIM 


45 





52 





140- 


1511 














































CMOO 


48 





149 


1723 


















































CMDPOF 


47 





48 





150- 


1743 














































CMDPTR 


47 





47 





















































CMODEL 


45 





45- 





45- 





268- 


5471 


271 - 


5477 






































CMPBUF 


51 





51 





140- 


1526 


243- 


4703 


244 


47 1 7 






































CN . ERR 


19 





142- 


1541 


















































CNT . LN 


52 


o 


201 - 


3313 


















































CNTFLG 


49 


o 


50- 





50- 





200- 


3236 


214- 


3672 


233- 


4300 


































CNVTV1 


48- 





48- 





179- 


2442 


179- 


2443 


192- 


2762 


192- 


2762 


192- 


2762 


210- 


3537 


210- 


3537 


2 10- 


3537 


266 - 


5447 














CNVTV2 


43- 





48- 





179- 


2431 


179- 


2432 
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CNVTV3 

CNVTV4 

COOVER 

COMPLT 

CON . ER 

CON .ST 

CONT 

CONTCD 

C0PY4 

CPE 

CR 

CRDV 

CRI 



CSERR 

CSR 

CTMOUT 

CYCLE 

CYLSTR 

D . E . C . 

D.STPA 

DATEND 

DATT 

DBAR 

DCERR 

OCLASS 

DCLK 

DCMASK 

DCN .ST 

DCN .TT 

DCRD 

DCRS 

ODC 

DOD 

DER 

OERR 

DEVCL 

DFAIL 



DI 



48-0 

48-0 

46-0 

69 -O 
334-7766 

50-O 

24-0 

69-0 
1 -O 

12-0 

18-0 

24-0 

17-0 

85-143 
I 14-656 

13-0 
219-3723 
295-6 136 

69-0 

14-0 

46-0 

36-0 

45-0 
1 -O 
333-7445 

65-0 

59 -O 

17-0 

69-0 

45-0 

14-0 

62-0 

69 -O 

69-0 

18-0 

18-0 

22-0 

22-0 

17-0 

S9-0 

45-0 

21 -O 

73-0 



179-2430 179-2452 289-5640 289 - 564 1 29 9 - 6 23 1 301-6245 301-6246 
179-2456 192-2762 210-3537 289-5641 299-6232 301-6246 
46-0 87-202 138-1274 138-1275 202-3335 214-3666 268-5470 268-5471 



335-7774 335-3000 

126-1132 132-1210 134-1231 



140- 1530 



12-0 
18-0 



18-0 



76-4 
89-240 
1 14-665 
99-401 



80-37 80-45 SO-50 

89-241 95-327 96-343 

1 15-674 115-711 1 16-722 

147-1667 162-2135 162-2141 



8 1-72 
104-500 



83 - 1 05 

107-534 



S3- 1 13 
107-535 



84-115 
108-554 



84-124 
108-574 



84-126 
1 14-645 



84- 130 
1 14-653 



80-57 SO-SO 

100-444 103-473 

1 16-741 334-7760 

179-2445 179-2464 191-2724 192-2736 192-2753 192-27SS 197-3160 197-3163 210-3S26 

225-4014 249-5054 250-5106 250-5121 251-5163 257-5263 259-5332 259-5371 262-5415 264-5434 268-5472 270-5475 280-5SS5 
303-6343 304-6355 3O4-6403 306-6442 322-6772 



214-3685 

192-2763 

333-7725 

65 -O 
142-1546 



18-0 
18-0 



66-0 
163-2157 196-3131 



1 8 -0 
18-0 



80-54 85-144 88-215 89-234 
196-3126 211-3550 211-3562 211-3601 213-3651 232-4267 245-4734 24S-4741 247-5013 



2 1 -O 
87-213 



84-126 102-464 334-7761 



DIAG 


73 



















DI INTR 


126 


1 1 20 


127 


1 134 












DISCON 


69 



















DISM 


43 





312 


6532 


312 


6532 


3 12- 6550 


3 13 


6S72 


DISN 


48 





312 


6332 


312 


6542 


312-6546 


313 


6571 


DIV512 


224 


4005 


227 


4127 


257 


5255 








01 VA 


230 


555 1 


280 


5556 












DI VS 


280 


5547 


280 


5552 


230 


5554 








D I VC 


280 


5553 


2SO 


5555 












DI VD 


179 


2441 


280 


5547 












DIVOO 


179 


2450 


179 


2455 


280 


5546 
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OIVX 280-5550 2SO-S55S 

DIVXIT 2S0-SBS0 230-5557 
DM. BEG 65-0 65-0 65-0 

289-5653 296-6142 

296-6144 296-6166 

301-6260 306-6430 306-6445 

136- 1234 136- 1246 

19-0 220-3730 221-3762 



DM. RO 

OM. RLP 

DM.WR 

DMATST 

OMBEG 

DMBPC 

DMODE 

DMODT 

DMOVH 

DMOVL 

DMREGO 

DMREG1 

DMREG2 

0MREG3 

0MREG4 

DMReGB 

DMREG6 

0MREG7 

DMSTR 

DMTEMP 

DOT 

00T1 

00T.2 

OPF 

DPROC 

DRAVL 

DRDUP 

DRDY 

DRINIT 

ORV. AT 

DRV .AV 

DRV.C1 

DRV .C2 

DRV . C3 

DRV. C4 

ORV. OB 

DRV . OD 

DRV . DE 

DRV . DF 

DRV. DR 

DRV . EL 

ORV.FO 

DRV OA 



262-5412 262-S413 267-S4S6 266-5462 277-5534 277-5535 333-7745 333-7746 



222-3763 333-7732 333-7736 



o 



4S-0 
19-0 
45-0 
45-0 
45-0 
47-0 
47-0 
47-0 
47-0 
47-0 
47-0 



142- 1542 
204-3373 



145-1606 156-2045 164-2175 177-2424 196-3137 207-3415 221-3737 230-4172 267-5461 289-5652 301-6257 



262-5407 262 
262-5410 264 



140- 1512 
262-541 1 



. PE 
. PS 
. RE 



DRV . 

DRV . 

DRV . 

DRV . 

ORV . 
DRV SI 
DRV.S2 
DRV S3 



47- 
47- 
45' 
49- 

306 

306' 

306- 
14-0 
12-0 
59-0 
59-0 
25-0 
21 -0 
63-0 
62-0 
62-0 
62-0 
62-0 
62-0 
62-0 
62-0 
62-0 
62-0 
6 1 -0 
61-0 
62-0 
61 -O 
62-0 



47-0 

47-0 

47-0 

47-0 

47-0 

47-0 

47-0 
4 7-0 
O 262-5412 
O 49-0 
6450 312-6540 316 
6450 319-6752 319 
6450 319-6751 319-6753 



'5421 263-5425 264-5436 266-5446 267-5454 333-7741 
'5430 266-5450 



262-5416 264-5435 307-6452 



6634 319-6751 
6757 



124- 
124- 



1074 

1 074 



142- 1552 

163-2157 

126-1114 
201 -32SS 
136-2642 



176-2407 209-3474 



1 63-2157 
1 76-2404 



174-2357 
176-2414 



175-2371 176-2404 
16 1 -2500 165-2563 



131-2500 165-2554 166-2576 209-3444 213-3650 
186-2576 209-3444 213-3650 



145-1617 145-1620 145-1621 146-1634 148-1676 

201 -3256 

193-2773 209-3471 



S2-0 

175-2367 
62-0 
62-0 
62-0 



-2406 209-3474 



V... 



KDBUP DIGITAL EOUIPMENT CORP. 

CROSS REFERENCE TABLE (CREF V01-O8 ) 



2901 ASSEMBLER VERSION 32 PAGE S-13 



2 

n 
O 

LL 

</> 

o 



ORV . S4 
DRV .S7 
DRV . SN 
DRV.SR 
ORV SU 
0RV.U1 
ORV U2 
DRV . U3 
DRV . U4 
DRV .UM 
DRV W1 
DRV W2 
DRV ,W3 
DRV W4 
DRV .WE 
DRVCLR 
DRVOL 
DSER 
DSK. LN 
DSLEDS 
DSR 
DSTSH 
DSTSL 
DTEMP1 
DTMP 
DUP. LN 
DUPVC 
DXFC 
. RPE2 
.WPE2 
E31 1 
E335 
E345 
E350 
E900 
E9 10 
E915 
E9 17 
E920 
ECC 
ECCOA 
ECCI 
ECC1A 
ECC1B 
ECC2 
ECC2A 
ECC9 . I 
ECC9 .2 
ECC9 .3 
ECCC 
ECCCA 
ECCCB 
ECCMSK 
ECHOCD 



62-0 

62-0 

6 1 -O 

61 -O 

61 -O 

61-0 

61 -O 

61 -O 

63-0 

62-0 

62-0 

62-0 

62-0 

62-0 

69-0 

59-0 

14-0 

52-0 

34-130 

14-0 

45-0 

45-0 

50-0 

17-0 

52-0 

45-0 

19-0 
334-7764 
334-7760 
306-6450 
306-6450 
306-6450 
306-6450 
306-6450 
306-6450 
306-6450 
306- 6450 
306-6450 

18-0 
306-6450 
306-6450 
306-6450 
306-6450 
306-6450 
306-6450 

48-0 

48-0 

48-0 
21 1 -3571 
306-6450 
306- 64SO 

73-0 
69-0 



63-0 202-3323 

61-0 186-2572 

61-0 227-4107 

61 -0 227-4107 

61-0 227-4107 

186-2601 187-2612 187-2613 



183-2626 200-3250 201-3260 



62-0 

124-1074 142-1552 163-2157 131-2500 185-2554 136-2576 209-3444 213-3650 

203-3357 
89-236 

220-3735 288-5465 

220-3734 221-3755 263-5462 268-5465 333-7746 
50-0 

20O-3246 

165-2224 
143- 1564 
334-7771 
335-7772 
312-6535 
312-6555 
313-6566 
312-6541 
309-6517 
318-6702 
318-6715 
318-6714 
318-6715 



207-3415 207-3415 221-3737 221-3740 262-5422 266-5453 267-5461 333-7736 



313-6600 

312-6561 

3 13- 6575 

313-6577 

317-6665 318-6675 

318-6727 

318-671 6 

31 8- 671 6 

318-6717 



308-6 
309-6 
309-6 
309-6 
309-6 
31 1 
48-0 
48-0 



234 
30S 
308-6 



471 308-6476 

477 

506 309-6512 

505 309-6512 

500 309-6502 309-6510 309-6511 311-6620 

523 311-6527 

48-0 

48-0 

355 263-5423 306-6450 307-6450 323-7031 
457 308-6465 
457 308-646? 
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ECM0V9 

ECMOVE 
ECMOVX 
ECOUNT 
ECSUMH 
I SCSUML 
' EOSEED 
EF .BBR 
EF . BBU 
EF. LOG 
ELEV 
ELOC 
ELPM 
ELPN 
ELPO 
ELPP 
ENCACH 
ENOCD 






306' 

266 
306' 



6 1 

46 

46 

46 

46 

48 

65 

69 

I 3 

1 47 

1 64 

139 

194 

197 

212 

224 

236 

268 

324 



64SO 3 13- 

5447 306- 
6450 317- 



122- 
239 
239- 
202' 
161 ■ 
309- 



1662 148 
2173 175 
2652 



6570 313-6576 317-6670 

6450 317-6666 317-6670 317-8672 

6671 317-6674 

235-437S 263-5424 309-6514 312- 



6534 31S-6622 316-6644 318-6701 



-3034 

-3175 



189 
194 

198 



ER.BCA 
ER.BP1 
ER. CIO 
ER. OMX 
ER. HTO 
ER. INT 
ER. IWR 
ER. LOG 
ER.MER 
ER.MRR 
ER.MST 
ER . NIM 
ER.PRO 
ER. PWR 
ER. RAP 
ER . ROP 
ER. RP2 
ER. RRD 
ER. RTO 
E R . RWR 
ER SAP 
ER . SOP 
ER.SRN 
ER.SRP 
6R.STP 



67- 
67- 
67- 
67- 
202- 
67- 
67- 



-3632 212 

-4006 225 

-4447 240 

-5465 269 

-7072 324 
-O 

-0 114 

-3313 202 

-O 262 

-O 145 

-O 156 

-O 155' 

-3244 201 
-O SO 

-0 196' 

-O 289 

-O 165- 
-O 

-O 147- 

-O 101 ■ 

-0 103 

-O 114- 

-0 149- 
67- 

O 15 1- 

O 101 • 

O 335- 

3326 202- 
67- 

299- 



1054 
4560 
4560 
3333 
2 100 
6513 



1 704 
2367 
2657 
3035 
3210 
3633 
401 1 
4 6O0 
5472 
7072 



122-1060 136-1237 136-1243 

240-4611 240-462O 240-4622 
240-4612 240-4621 
239-4560 
1 62-2132 

315-6624 317-6650 318-6677 

311-6523 312-6554 313-6570 

303-6471 308-6472 311-6521 

48-0 311-6524 312-6541 

48-0 48-0 48-0 



48-0 
149- 171 1 
175-2371 
191 -2720 
194-3035 
202-3326 202- 
212-3634 212- 
225-4023 226- 
240-46O2 240- 
273-5506 289- 



1 49 • 
176- 
191 - 
194- 



O 59-0 

1723 1 50- 1 743 

2377 176-2404 

2730 192-2757 

3042 194-3042 

3326 202-3335 

3635 214-3666 

4054 226-4072 

4623 246-474S 
289-5657 



324-7073 326-7147 326-7150 



137-1257 230-4210 235-4406 243-4671 289-5635 301-6242 323-7034 



311-6523 311-6524 312-6540 313-6567 313-6575 315-6610 317-6665 
312-6580 313-6576 
48-0 315-6607 315-6625 316-6632 317-6666 



• 1274 139 - 1500 

2 166 1 64 -21 7 1 

-2645 189-2646 

3000 193-3002 

-3144 197-3 156 

3474 21 1 -3542 

3707 217-3710 

■4272 233-431 1 

5157 2S7-5232 

6773 322-7001 



65 


O 


67 





77 


5 


101 


450 


101 


454 


137 


150 


1 743 


154 


2005 


1 62 


2114 


162 


2132 


1 63 


2 1 64 


1 63 


176 


2406 


180 


2473 


182 


2502 


184 


2544 


188 


2623 


189 


192 


2760 


192 


2767 


192 


2767 


192 


2767 


192 


2767 


1 93 


194 


3047 


196 


3122 


1 96 


3122 


196 


3144 


196 


3144 


1 96 


205 


3401 


205 


3401 


205 


3401 


205 


3401 


209 


3472 


209 


21 6 


3676 


216 


3677 


217 


3703 


21 7 


3705 


217 


3706 


217 


226 


4074 


226 


4105 


227 


4126 


230 


4204 


231 


4224 


232 


246 


4777 


247 


5005 


248 


5017 


243 


5023 


251 


5153 


25 1 


301 


6246 


312 


6532 


312 


6532 


317 


6665 


322 


6765 


322 


327 


7162 


333 


7725 


333 


7747 


333 


7747 


333 


7747 





142-1545 146-1630 
164-2171 164-2173 



189-2847 
193-3005 



189-2650 
193-3010 



197-3165 197-3173 

21 1 -3575 212-3630 

223-3774 224-3776 

233-4312 233-4316 

257-5255 258-5273 

323-70S4 324-7062 



650 

3327 202-3334 

5415 267-5455 

1616 

2026 

2021 

3262 

40 

3142 226-4102 259-5356 

5637 301 - 6244 

2222 

1653 

446 101 -452 104-476 

472 

662 

17 14 150- 1 752 
67-0 

1770 

445 101-45 1 335-7776 

7777 

3345 

O 334-7762 334-7763 334-7764 33S- 

6236 
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ER.TMO 

ER.UID 

ER . VCI 

E R . WP 2 

ERECOV 

ERET 

ERR 

ERROO 

ERR01 

ERR02 

ERR03 

ERR04 

ERR05 

ERR06 

ERR07 

ERRB1 

ERRB1A 

ERRS1B 



S7-0 
201 -3303 

67-0 
67-0 
69-0 
306- 6450 
35-0 
38-0 
38-0 
38-0 
38-0 
38-0 



38 -O 

33-0 

38-0 

79-30 

79-26 

99-414 

30-41 

116-741 
79-27 

103-470 



o 



ERRB1 L 


80 


-34 


ERRBIM 


80 


-37 


ERRB1 


79 


-31 


ERRB10 


SO 


-36 


ERRB1 T 


SO 


-42 


ERRB1Z 


79 


-27 


ERRB2E 


SO 


-46 


ERRBIT 


73 


-0 


ERREG 


37 


-0 


ERRINI 


60 





ERRINP 


60 





ERRIP 


59 





ERRRR 


306 


6450 


ERRRTC 


4 5 





ERRSET 


80 


45 


ERRVEC 


60 





ETST1 


12 





EVAL 


48 





F 


306 


6450 


FAILUR 


48 





FAIRCT 


61 


O 


FCT.MD 


45 





FCT. VI 


45 


o 


FCT. V2 


45 


o 


FOCLK 


22 





FDIAG 


61 





FLAG 


35 





FLOAT 


18 


o 


FM.BAD 


58 





FM. CNT 


58 


o 


FM.DSK 


58 





FM.SDI 


58 






201-3314 203-3357 
164-2 176 
1 13-637 

318-6730 318-6734 
38-0 

77- lO 77-12 
79-27 
30-46 



80-34 

79-31 

80-36 

38-0 

78-33 

99-373 

99-415 

80-42 
1 16-746 

79-27 
103-473 
129-1152 

95-323 
I2S-1 142 



80-43 

80-35 80-36 

99-374 99-375 

99-417 99 -420 

80-43 108-552 

118-1012 119- 1021 

83-106 83 - 1 lO 



80-44 

99-376 

100-442 

108-554 



80-45 

99-377 

100-444 

1 10-625 



88-217 
99-400 



119-1024 120-1034 122-1055 122-1061 122-1066 



114- 653 1 14-664 



83-111 



33-112 



101-447 101-450 101-453 



96-346 159-2061 159-2064 
128-1145 133-1222 134-1225 136-1240 136-1244 136-1251 137-1260 



86-165 95-330 96-345 115-703 116-740 

173-2330 233-4517 238-4524 

104-477 105-514 106-517 

80-51 81-61 160-2073 

246-4745 246-4746 

124-1074 173-2336 211-3602 247-5011 

315-6602 315-6603 315-6606 316-6632 316-6635 316-6640 316-6642 318-6705 313-6734 
246-4757 
80-50 80-5 1 



309-6516 316-664S 318-6700 
317-6653 317-6663 

48-0 48-0 48-0 
195-3077 
212-3624 

45-0 212-3627 
212-3630 



189-2651 202-3316 

151 - 1786 151-1771 

201-3272 232-4246 232-4251 

140-1534 201-3271 

201-3273 236-4441 239-4565 239-4575 



104-502 106-511 140-1531 142-1540 155-2022 160-2071 20 1 - 3304 289-5636 299-6235 301-6243 
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FORCE 

FORICD 

FORSCO 

FPE 

FRERR 

FRMCD 

FSEEK 

FSTST 

FTEST 

GETID 

GETRES 

GETSTA 

GO 

GORO 



GOWR 

GPRO 

GPR1 

GPR2 

GPR3 

GRNGLN 

GSEL 

GTCCHR 

GTCRSP 

GTE 

GTUCHR 

GTURSP 

HI 1C00 

H1 1 XOR 

HAOD 

HANG 
HDCOO 

HOLMT 

HDRTMO 

HEAOER 

HES 

HI .OFF 

HIBYT 



HINIB 
HIPAR 
HOSTF 
HOSTMO 
HSTOUe 
HU . T3 
HU . T4 
HU . T5 
HU . T6 
HU . T7 
HU. T9 
IOENT 



43-0 

69-0 



85- 144 

12-0 

86- no 
306-6450 

69-0 

36-0 

15-0 
290-5730 
292-6024 

15-0 

43-0 

43-0 

43-0 

43-0 
131 - 1 170 

59-0 

69-0 

69-0 

13-0 

69-0 

69-0 

46-0 

46-0 

15-0 
303-6335 

17-0 

45-0 

49-0 

45-0 

47-0 

42-0 
101 -447 

45-0 
219-3724 
277-5535 

45-0 
101 -447 



50-0 
50-0 

84-136 
84-136 
84- 136 
84-136 
85-142 
85- 152 
40-0 



161-2106 174-2364 194-3060 194-3061 

86-153 
1 17-752 

91 -253 122- 1070 

308-6455 308-6461 308-6464 319-6760 

84-316 95-336 114-661 115-677 118-1001 289-5660 290-5672 290-5677 290-5704 290-5706 290-5713 290-5721 290-S723 

291-5736 291-5740 291-5745 291-5753 291-5755 291-5762 291-5770 291-5772 291-5777 291-6005 292-6007 292-6014 292-6022 

292-6031 292-6037 293-6103 295-6125 296-6147 299-6222 

95-333 108-550 303-6355 304-6415 



o 



87-212 



88-221 



126- 1 123 130- 1161 



131-1172 131-1176 
195-3071 



225-4026 315-6603 315-6606 317-6663 



46-0 46-0 

46-0 46-0 46-0 

92-271 92-274 98-371 108-557 

303-6352 304-6375 304-6412 306-6432 

77-5 77-5 77-16 80-53 

191-2721 240-4601 240-4603 322-6777 

49-0 



108-573 110-610 110-616 289-5656 283-6100 295-6122 286-6145 297-6200 301-6263 



47-0 



47-0 



47-0 



101-447 101-450 

46-0 87-200 87-204 125-1107 138-1275 142-1544 142-1557 144-1573 154-2O06 184-2541 1 94 - 305 3 2 1 2 - 3623 215-3673 

224-4000 235-4374 249-5066 252-5172 262-5413 267-5456 268-5462 268-5471 274-5523 274-6525 274-5527 275-5531 276-5533 

322-7003 324-7067 
246-4756 

323-7403 335-7774 335-8000 



50-0 
50-O 

331 -7431 
331 -7432 
331 -7433 
85- 141 
85- 145 
331 -7437 



140-1503 145-1622 214-3662 

143-1562 146-1636 147-1655 202-3340 



331 -7434 
331 -7435 



> 



A 
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IOX 

IE 

INCRTN 

INDIAG 

INI 

INIT1 

INITM1 

INPLEN 

INPUT 

INSEEK 

INSTR 

INTI 

INTR 

INTVEC 

INVAL 

INVPOP 

IOACC 

IOCLK 

IOCNT 

I OMSK 

IORTV 

IORWR 

IOSEK 

IPINTR 

IPREG 

IRCI 

IUAR 



25-0 
35-0 

83-113 



127- 1 134 



38 


1303 






















84 


131 


84- 1 32 


85 


1 47 


lOI 


455 


102-464 


103-474 


104-500 


106 


505 


80 


BO 


83- 105 


84 


130 


95 


327 


96-343 


10O-444 


103-473 


138 


1304 



106-525 

160-2067 334-7765 



132- 1203 



140-1500 227-4116 284-5631 
174-2365 236-4444 284-5632 

47-0 

47-0 

69-0 

36-0 36-0 

35-0 

40-0 

49-0 

40-0 
258-53 1 1 

44-0 

60-0 

60-0 

45-0 

60-0 

60-0 

60-0 

40-0 

41 -0 

40-0 

17 



309-6514 315-6625 
31 1 -6531 



258-531 1 
86-161 



119-1020 156-2047 



120-1044 120-1047 120-1050 146-1632 148-1706 152-2002 153-2004 221-3743 249-5054 249-5062 249-5067 259-5333 2S9-5 

278-5836 278-5536 282-5600 283-5624 289-5647 289-5650 289-S651 289-5654 289-5662 289-5667 293-6076 294-6111 295-6113 295-6 

295-6127 295-6135 296-6144 296-6150 297-6173 301-6254 301-6255 301-6256 301-6261 301-6266 302-6307 303-6333 303-6342 303-6 

303-6356 304-6361 304-6364 304-6367 304-6373 304-6402 304-6407 305 - 64 1 7 305 - 6422 305-6425 3O6-6430 306-6441 

77-5 

77- 15 



342 
1 1 6 
350 



JMPTST 


76-2 


76 


3 


76 


3 


JUMP 


77-7 


77 


15 


77 


15 


L 


BAOO 


57-0 


57 





202 


3341 


L 


8AD1 


57-0 










L 


CHVR 


57-0 










L 


CNTO 


57-0 


57 





202 


3334 


L 


CNT1 


57-0 


57 









L 


CNT2 


57-0 


57 









L 


CNT3 


57-0 


202 


3335 






L 


CRFO 


57-0 


57 


O 


202 


3327 


L 


CRF1 


57-0 










L 


CSVR 


57-0 


57 


o 


202 


3335 


L 


EVNT 


57-0 


20O 


3240 






L 


FLGS 


57-0 










L 


FMT 


57-0 


20O 


3242 


203 


3351 


L 


HORO 


57-0 


57 





203 


3 354 


L 


HDRI 


57-0 










L 


MLUN 


57-0 


20 1 


-3312 


202 


3325 


L 


RTRV 


57-0 


202 


-3346 






L 


SDIO 


57-0 


57 


-O 


201 


-3274 


L 


SOI 1 


57-0 


57 


-0 






L 


SD I 2 


57-0 


57 


-0 






L 


SDI3 


57-0 


57 


-0 






L 


SDI4 


57-0 


58 


-0 
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. SDI5 
.SEO 
. UHVR 
.UNIT 
. UNTO 
. UNTI 
. UNT2 
. UNT3 
. USVR 
. VSEO 
. VSE1 

LAB 

LADO 

LATE 

LBNMSK 

LBNSTR 

LBWR 

LCOM 

LDR2R1 

LE01 
LED2 
LE04 
LEOS 
LEDS 
LESS 
LF .CON 
LF .SNR 
LF SUC 
LFAIL 
LG. BAD 
LG. CNT 
LG . DSK 
LG SDI 
LGADR 
LGCKSV 
LM 



58- 
57- 



57- 
57- 



201 -33 1 4 



304-6410 



293 
19 1- 
322- 



6 102 
2720 
700 1 



LN 

LNERR 
LNPAG 
LO. OFF 
LOBVT 



53 

58 

50- 

201 - 

201 - 

201 - 

201 - 

65- 

51 - 

48- 

51 - 



-0 

-O 

-3273 

-3272 

-3274 

-3275 



202-3324 

S7-0 
57-0 
57-0 

57-0 

57 -O 



92-267 
306-6430 

180-2473 
194-3035 

81-66 

81-64 
295-6 124 
192-2757 
323-7054 

22-0 

22-0 

22-0 

22-0 

84- 130 
1 62-2137 
201 -3263 
201 -3264 
201 -3263 
139-1317 
202-3341 
201 -3304 
202-3346 



137-1264 236-4515 

SI -O 137- 1273 

312-6533 313-6562 

51-0 311 -6530 



92-272 98-370 106-555 110-607 289-5654 293-6076 295-6117 296-6144 301-6261 303-6333 303-635O 304-6373 
189-2645 192-2760 225-4011 225-4023 251-5157 322-6773 



93-312 
93-304 

296-6146 
193-30O0 
324-7062 

80-50 

80-45 

80-45 
126-1110 
100-444 

239-4566 

203-3350 
140- 1527 



113-636 116-734 117-773 156-2060 301-6274 303-6340 304-6400 306-6440 

94-315 108-564 110-612 113-634 114-560 115-676 116-726 117-767 118-1000 158-2052 289-5657 

299-6221 301-6286 303-6332 303-6347 304-6363 304-6372 305-6424 306-6434 

193-300S 194-3034 197-3156 197-3165 197-3173 198-3211 233-4311 240-4600 240-4602 242-4656 322-6765 
326-7147 

89-236 126-1110 126-1114 129-1154 145-1607 299-6241 

126-1114 129-1154 

80-50 126-1110 126-1112 129-1154 

126-1112 126-1114 

103-473 138-1301 



236-4442 



238-4522 282-5570 315- 



12 316-6636 316-6640 317-6651 318-6736 319-6746 319-6754 



156- 
230- 
274- 



LOG . LN 

LOGCOO 

LOGENO 

LOGLEN 

LOGPKT 

LONIB 

LOPAR 



-453 

-0 
2044 
4214 
5526 




108-571 
101 -4S3 

45-0 
179-2434 

235-4412 243-4707 
275-S530 276-5532 



313-6573 

312-6535 313-6564 315-6601 313-6604 315-6626 317-6647 317-6664 

114-644 114-646 297-6175 297-6176 



1 lO- 6 1 4 

101 -454 

45-0 46-0 6O-0 87-203 125-1106 138-1274 142-1543 142-1560 144-1572 149-1730 154-2005 1SS-2024 

179-2440 180-2473 184-2540 189-264S 192-2760 203-3362 203-3367 212-3610 212-3615 219-3723 225-4011 225-4023 

246-4762 246-4772 248-5100 251-5130 251-5157 253-5202 261-5402 262-5412 268-5470 274-5522 274-5S24 

277-SS34 281-5561 282-5605 282-5607 283-5617 322-6773 323-7056 324-7106 324-7123 333-7745 333-7746 



200-3234 



S2-0 



49-0 147-1646 

52-0 147-1 644 

147-1672 149-1733 

329-7403 



202-3337 

154-2010 164-2174 166-2221 

164-2172 164-2173 176-2422 



200-3233 

189-2656 211-3575 212-3606 322-6763 
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< 

D 

a 

ii 

i 

cc 
o 

LL. 

V) 

o 






LRGAOR 
LSB 

LT400 

LV1SV1 

LV 1SV2 

LV2CNT 

LW 

M 

M. ABRT 

M. ACCH 

M. ACCL 

M. AVAH 

M. AVAL 

M. CCDH 

M. CCDL 

M. CMPH 

M.CMPL 

M. DAP 

M.ERSH 

M.ERSL 

M.FLUH 

M.FLUL 

M.GCST 

M.GUSH 

M.GUSL 

M.ONLH 

M.ONLL 

M.RDH 

M.RDL 

M.RPLH 

M.RPLL 

M.SCCL 

M.SUCH 

M.SUCL 

M.WRH 

M.WRL 

MAP.CH 

MAP MO 

MAP .Ml 

MAP. NO 

MAP . NX 

MAP. OF 

MAP . RD 

MAP . S 1 

MAP . ST 

MAP . UR 

MAP 

MAP 

MAP . V2 

MAP . V3 

MAPENB 

MAPFLG 

MAPMSC 



. VO 
. VI 



81-62 

12-0 
230-4 1 70 

73-0 

50-0 

50-0 

60-0 

44-0 

48-0 
170-2274 
190-2670 
190-2670 
1 74 -2344 
174-2344 
170-2270 
170-2270 
190-2662 
190-2662 
174-2346 
191 -2672 
191-2672 
170-2272 
170-2272 
183-2S15 
188-2617 
168-2617 
208-3424 
208-3424 
190-2664 
190-2664 
191 -2674 
191 -2674 
214-3653 
208-3422 
208-3422 
190-2666 
190-2666 

63-0 

63-0 

63-0 

64-0 

63-0 

64-0 

64-0 

54-0 

64-0 

64-0 

64-0 

64-0 

64-0 

64-0 



92-272 
98-361 



1 1 4-655 116-72 1 



230-4204 231-4224 233-4316 259-5324 281-5566 293-6052 

50-0 
50-0 



126-1132 134-1232 138-1311 175-2371 192-2745 193-3001 193-3006 



86-16 
31 1 -65 
170-2276 
190-2671 
18O-2670 
1 74-2345 
174-2344 
170-2271 
170-2270 
190-2663 
190-2662 
1 74-2346 
191 -2573 
191 -2672 
170-2273 
170-2272 
183-2517 
188-2620 
188-2617 
208-3424 
208-3425 
190-2665 
190-2664 
19 1 -2675 
1 9 1 -2674 
214-3653 
208-3422 
208-3423 
190-2667 
190-2666 

63-0 

63-0 

64-0 

64-0 

63-0 

64-0 

64-0 

64-0 

64-0 

64-0 

64-0 

64-0 

64-0 

64-0 



91-264 92-273 303-6334 303-6351 
312-6532 312-6543 313-6574 



304-6374 304-6411 



144-1574 259-5354 2S9-5374 

249-5043 2S7-5234 258-5314 259-5341 

249-5045 257-5235 259-5315 259-5343 

249-5047 258-5273 2S9-S375 

248-5031 257-5240 257-5257 257-5267 

248-5035 257-5236 259-5364 

249-5051 2S7-5270 

196-3136 197-3153 226-4077 257-5233 

248-5037 257-5256 257-5265 2S9-S345 259-5361 

249-5042 257-5242 259-5320 239-5334 259-5365 259-5372 

249-5044 2S7-5244 259-5321 259-5337 259-5366 2S9-S373 

257-5246 259-5327 



51-0 



257-5250 259-5330 
248-5O40 259-5376 
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MAPMSH 
MAPMSK 
MAPSAV 
MAPVAL 
MAXSTC 
MCP . 10 
MCP. LN 

MCP.RO 
MD .ALL 
MO . CMP 
MD . CSE 
MD . ERR 
MD . EXC 
MD . EXP 
MD . FEU 
MD .FKC 
MD. IMF 
MD.NOV 
MO . NXU 
MD . PRI 
MO . RIP 
MD . SAV 
MO .SCH 
MD .SCL 
MD . SEC 
MO . SEO 
MO . SER 
MD SHD 
MD . SPD 
MO .SSH 
MD . SWP 
MD . VOL 
MD .WBN 
MD.WBV 
M0S12 
MEMS 2 
MERR 



45-0 
45-0 
51 -0 
45-0 
219-3722 



52' 
52 



52-0 
52-0 



58-0 
58-0 
58-0 
59-0 
S8-0 
58-0 
59-0 
59-0 
58-0 
58-0 



2S9-532S 

51 -0 
226-4072 
333-7737 
147- 1843 

52-0 

52-0 
149-1713 
174-2344 
190-2864 
170-2270 
190-2866 
174-2344 
162-2114 



244-4710 244-4714 2S9-5351 259-5380 
248-5023 258-5273 



52-0 
52-0 



52-0 
52-0 



52-0 
52-0 



52-0 
52-0 



52-0 
52-0 



52-0 52-0 52-0 52-0 52-0 
146-1835 154-2011 184-2542 198-3206 



o 



190-2666 196-3121 

170-2272 174-2344 188-2617 190-2662 190-2654 190-26 

191-2672 230-4220 

208-3422 208-3424 

170-2270 170-2272 190-2662 190-2664 190-2668 190-2670 191-2672 191-2674 



1 90-2670 1 9 1 - 2672 191-2674 208-3422 208-3424 



MINUTE 

MLN20 

MLN40 

MLN44 

MLNTST 

MODNUM 

MP 

MROUE 

MSB 

MSCPLN 
MUL2RA 
MUL8R2 
MULBVT 



58-0 

58-0 

58-0 

58-0 

58-0 

58-0 

58-0 

58-0 

58 -O 

58-0 

58-0 

58-0 

58-0 

58-0 

45-0 

45-0 

12-0 
291 -5762 
304-6366 

45-0 
1 68-2254 
I 68-2255 
168-2256 
1 68-2254 

46-0 

73-0 

49-0 
13-0 
247-5005 

51 -0 
319-6743 
306-6450 
225-4020 



214-3653 

208-3424 211-3666 

238-4541 

188-2617 188-2623 

191 -2674 

208-3424 209-3476 

170-2270 190-2662 190-2664 190-2670 

170-2270 190-2662 190-2664 190-2670 

170-2270 170-2272 190-2662 190-2664 190-2666 190-2670 234-4354 

190-2886 191-2672 

170-2270 170-2272 190-2662 190-2654 190-2S6S 190-2670 191-2672 234-4362 

209-3466 

174-2344 175-2371 211-3561 

170-227O 170-2272 190-2662 190-2664 190-2666 190-2670 191-2672 



208-3422 208-3424 210-3507 



190-2666 
190-2666 
212-3610 

65-0 

95-323 
291 -5772 
304- 6402 
140- 1504 
170-2274 
170-2306 
208-3432 
1 68-2255 

46-0 

87-2 14 

49-0 

91 -260 
303-6331 

51 -O 



19 1 -2672 
191 -2672 
212-3623 

144-1576 259-5346 259-5347 

96-346 159-2061 159-2064 290-5672 290-5677 290-5706 290-5713 290-5723 290-5730 291-5740 291-S745 291-5755 

291-5777 292-6007 292-6014 292-6024 292-6031 293-6062 294-6105 295-6127 296-6154 303-6326 303-6344 303-6357 
306- 6444 

183-2515 

191 -271 1 214-3655 

168-2256 168-2257 168-2257 

46-0 138-1274 138-1275 

264-5440 333-7735 333-7742 

99-420 102-464 147-1662 149-1723 162-2114 184-2544 21 

305-6422 324-7073 

149-1716 168-2257 209-3443 209-3457 



-3575 230-4174 234-4333 236-4430 246-4745 246-4777 



312-6555 318-6735 319-6756 
225-4023 281-5560 



f 
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MULR2 

MULR2X 

MULT 

MULTA 

MULTB 

MW9UE 

NACLO 

NBCB 

NBIBAD 

NBUFR 

NCDONE 

NCPE 
NCRY 

NCSR 

NDCLK 

NDPF 

NOSER 

NOSR 

NEG 



306-6450 
306-6450 
179-2434 
281 -5563 
281 -5562 

49-0 

12-0 

65-0 

12-0 

65-0 65-0 65-0 140-1520 230-4173 240-4627 

13-0 95-324 9S-32S 108-5S4 159-2063 290-5676 290-5703 290-5712 290-5720 290-5727 291-5735 291-5744 291-5752 291-5761 
291-5767 291-5776 291-6004 292-6013 292-6021 292-6030 292-6036 293-6061 302-6301 

13-0 13-0 13-0 83-111 84-122 

99-403 128-1141 128-1142 162-2126 179-2454 192-2751 193-3017 197-3170 211-3553 225-4032 231-4230 231-4235 235-4377 



315-6612 318-6737 319-6746 

316-6643 317-6654 319-6741 

179-2440 281-5562 
281 -5566 
281 -5564 

49-0 333-7734 333-7743 

12-0 13-0 

65-0 65-0 225-4036 



NENOCD 

NEO 

NETST1 

NFTEST 

NLATE 

NLSB 

NMERR 
NMSB 

NNEG 

NOOEID 

NOPREG 

NOVER 

NPKTS 

NPOLL 

NPRDY 

NRPE 

NRPOK 

NRRDV 

NSCAN 

NSCB 

NSDI 

NSECTR 

NSEEKS 

NSTOP 

NTEST 

NUPF 

NWRC 

NZRO 



251 -5145 

14-0 

14-0 

14-0 

14-0 

1 4-0 

13-0 
295-6120 
319-6741 

69-0 

12-0 

13-0 



2S9-5347 268-5464 278-5540 280-5552 289-5663 289-5670 293-6063 296-6151 297-6174 301-6267 302-6310 305-6426 



85-143 89-237 99-374 99-401 100-444 104-502 106-513 106-524 137-1262 149-1720 168-2261 286-5633 289-5651 
301-6256 304-6367 305-6417 306-6450 306-6450 308-6467 309-6504 309-6506 312-6553 313-6566 317-6657 317-6671 318-6715 
319-6742 319-6745 319-6752 324-7076 

308-6476 

13-0 85-142 

99-415 115-673 163-2164 175-2367 176-2406 188-2623 209-3474 228 - 4 1 40 230- 4 1 76 234-4336 



13-0 
14-0 

13-0 99-373 99-402 99-414 

245-4737 273-5517 293-6041 303-6346 

13-0 115-711 116-741 156-2035 290-5704 290-5721 291-5736 291-5753 291-5770 291-6O05 292-6022 292-6037 302-6302 

12-0 99-417 146-t630 148-1704 162-2132 179-2465 186-2606 191-2726 194-3050 197-3164 221-3746 226-4072 236-4447 238-4534 

248-5023 258-5276 261-5404 297-6172 303-6345 324-7077 327-7162 

O 99-400 99-404 99-405 106-525 129-1152 133-1217 201-3306 201-3307 318-6705 322-7006 

91 -255 



12' 
42' 
1 8' 



52-0 
12-0 
14-0 
14-0 
12-0 
14-0 
12-0 
65-0 
65-0 
14-0 
49-0 
13-0 
13-0 
12-0 
14-0 
12-0 



1 19- 1021 133- 1222 



13-0 
14-0 
13-0 

65-0 

49-0 



13-0 13-0 
124- 1072 145-1 603 
195-3103 240-4625 



( 



115-667 115-671 120-1026 120-1030 145-1525 
192-2737 193-3000 232-4254 239-4546 323-7031 



78-20 
87-210 



78-24 
87-213 



81-71 
88-216 



82-76 
88-217 



83- lOO 
88-222 



83- 103 
88-225 



83-107 
90-244 



84-120 
90-247 



84-127 
95-326 



84-134 
95-327 



85- 140 
95-330 



85- 150 
95-332 



86-153 
95-335 



o 






o 
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00 

ODOP 
ODTAF 
ODTCA 
ODTCY 
OFFMSK 
OFFSET 
OFFTRK 
ONLINE 
ONLREC 
OP .ABO 
OP .ACC 
OP .ACP 
OP .ATT 
OP . AVA 
OP . AVL 
OP .CCO 



OP . DAP 
OP . DUP 

OP . END 
OP .ERS 

OP FLU 
OP .GCS 
OP .GST 
OP.GUS 

OP MRO 

OP . MWR 
OP . ONL 
OP. RO 

OP . RPL 



98-34 1 
106-523 
1 17-753 
142- 1543 
149- 1726 
164-2173 
172-2326 
1S3-2S20 
191-2712 
198-3122 
207-341 6 
21 1 -3S67 
223-3767 
227-4106 
232-4253 
236-4451 
243-4670 
248-5020 
273-5512 
31 1 -6527 
327-71 61 

73-0 



107 
1 1 8 
142 
149 
1 64 
174 
1S3 
19 1 
196 
207 
21 1 
223 
227 
232 
237 
243 
248 
280 
3 12 



342 

534 
1012 
1551 
1731 
2176 
2350 
2530 
■2714 
3127 
3420 
3571 
3770 
4107 
4262 
4456 
4676 
5026 
5556 
6561 



98-363 
108-545 
120- 1047 
142-1561 
ISO- 1741 
165-2224 
174-2352 
184-2545 
191 -2722 
196-3140 
208-3427 
21 1 -3601 
223-3771 
227-41 1 1 
232-4275 
237-4474 
243-4705 
248-5036 
289 -5850 
313-8600 



1 43 
1 51 
I 66 
1 74 
I 85 
19 1 
196 
208 
212 
223 
227 
233 
237 
244 
250 
289 
31 5 



■376 
'603 
' 1055 
' 1563 
■ 1770 
2235 
2356 
2560 
■2731 
3142 
'3431 
3821 
3772 
'4113 
4304 
4477 
471 I 
■5 110 
5653 
6612 



99 
109 
122 
143- 
155' 
166 
174' 
185- 
193- 
197- 
208- 
212 
224- 
227- 
233- 
238- 
244- 
251 ' 
294- 
315- 



4 10 

606 

1061 

1566 

2021 

2236 

2357 

2564 

2774 

3150 

3433 

3625 

3775 

4122 

430S 

4517 

4712 

5134 

6111 

6617 



1 00- 
1 10- 
122- 
1 44 - 
156- 
167- 
174- 
185- 
193- 
199- 
208- 
214- 
224- 
228- 
234- 
238- 
244- 
252- 
295- 
315- 



442 

625 

1066 

1601 

2046 

2243 

2360 

2570 

2777 

3225 

3435 

3654 

4000 

4142 

4347 

4S20 

4723 

5171 

6135 

6621 



1 OO - 4 4 3 
1 13-640 
131 - 1200 
145-1 607 
1 60-2070 
1 67-2246 
174-2362 
188-262 1 
193-3O04 
200-3234 
208-3437 
214-3656 
224-4003 
229-4165 
234-4351 
238-4524 
244-4724 
259-5315 
295- 6140 
3 18-6727 



101 

113 

136 

1 45 

16 1' 

1 67 

175- 

1 88 ' 

194 

201 • 

209 

214 

224 

230 

234 

239 

245' 

259 

296 

319- 



450 101 

642 114 

1240 136 

1612 145 

2077 161 

2251 no 

2372 176 

2637 188 

3043 194 

3253 201- 

3463 209 

3680 2 19 

4006 225- 

4177 230- 

4353 234 

4543 240- 

4734 245 

5317 259- 

6186 301 - 

6746 319- 



454 

651 

1244 

16 15 

21 10 

2275 

2402 

2643 

306 1 

3264 

3467 

3721 

4042 

4212 

4364 

4602 

4735 

5356 

6255 

6756 



102-463 
1 14-653 
136-1251 
147- t643 
162-21 tS 
170-2277 
176-2410 
191 -2677 
194-3064 
201 -331 1 
209-3477 
220-3731 
225-4045 
230-4215 
235-4410 
240-461 2 
245-4740 
262 -5420 
301 -6260 
323-7032 



103 ■ 
114- 
137- 
147- 
162- 
170- 
176- 
19 1- 
195- 
202- 
209- 
221 • 
226- 
230- 
235 - 
240- 
245 - 
264 ■ 
304- 
323- 



176 
191 



473 104 

663 1 14 

1260 138 

1645 147 

2120 162 

2305 170 
2412 
2701 

3065 195 

3327 206 

3502 210 

3737 221 

4061 226 

4216 230 

4413 235 

4620 240 

4742 246 

5440 264 

6405 306 

7043 324 



■477 106 

■665 115 

■1306 140- 

' 1653 148- 

■2140 163- 

2307 171 

•2415 177- 

2703 19 1- 

-3105 196- 

3407 206 

■3504 210- 

3740 221- 

4075 226- 

4221 231 - 

4414 236- 

4621 241 - 

4753 246- 

5441 267- 

6445 309- 

7070 324- 



5 14 

702 

1525 

1700 

2161 

231 1 

2425 

2706 

3 120 
341 1 
3510 
3747 

4 1 00 
4226 
4436 
4647 
4762 
5455 
651 1 
7074 



106 
116 
142 
149 
1 64- 
172- 
183- 
19 1- 



S 1 7 
737 
1542 
1714 
2 172 
2313 
25 1 6 
2710 



196-3121 
207- 34 1 3 
21 1 -3557 
221 -3751 
228-4102 
232-4245 
236-4437 
242-4660 
246-5001 
273-5510 
309-65 12 
324-7 1 17 



22-0 



69-0 

45-0 

53-0 

53-0 

58-0 

53-0 

58-0 

53-0 

53-0 

53-0 
251-5 153 

53-0 

58-0 

SS-O 

S3-0 

S3-0 

53-0 

S3-0 

53-0 

S3-0 

53-0 

53-0 

53-0 
241 -4650 

53 -O 



221 -3754 

257-5241 
221 -3743 
1 61 -2104 

21 1 -3575 
165-2215 



221 -3745 

161 -2105 246-4766 

21 1 -3577 

193-3003 226-4054 226-4074 226-4105 227-4126 235-4405 248-5017 251-5153 



I 42- 
200- 



1551 
3252 



1 65-2210 
1 65-2207 
162-2117 164-2201 196-3114 196-3127 196-3143 196-3144 226-4054 226-4074 226-4105 227-4126 235-4404 241-4650 248-5017 

165-2213 174-2356 



147- 1645 
1 64-2203 
1 65-2206 
165-2216 
172-2313 
165-2217 
165-2226 
1 65-2227 
I 65-221 I 
1 62-21 17 
248-S017 
I 65-2204 



177-2427 182-2506 

193-3003 226-4054 226-4074 226-410S 227-4126 248-5017 251-5153 



226-4054 226-4074 226-4075 226-4105 227-4126 234-4327 248-5017 243-5020 251-5153 

164-2177 196-3117 196-3122 196-3122 196-3122 196-3122 198-3144 226-4054 226-4074 226-4105 227-4106 227-4126 

251-5153 

193-3003 226-4054 226-4074 226-4105 227-4126 248-5017 251-5153 
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OP. sec 


53 


-0 


1 65 


OP .sue 


53 





1 65 


OP -WR 


S3 


■o 


1 62 




241 


4650 


248 


OPCOD 


46 







OPCODE 


49 





49 


OPM 


22 







OVER 


1 4 







OVLPER 


172 


2327 


173 


DW 


44 





283 


OWN 


35 





146 



-2220 

■2212 209-3470 210-3514 211-3547 

■2117 164-2200 196-3120 196-3122 196-3122 

•5017 251-5153 



196-3 122 1 9 8 



3122 196-3144 228-4054 226-4074 226-4105 227-4128 230-4206 
225-4034 226-4053 226-4072 226-4104 227-4125 248-5016 249-5074 251-5152 



1 74 
209 



. BCN1 
.BUFO 
.BUF1 
. BUF2 
. BUF3 
. BUF4 
. BUF5 
. BUFH 
. BUFL 
. CMSO 
. CMS1 
. CNTO 
. CNT1 
. CNT2 
. CNT3 
. CNTF 
.CONS 
.CRFO 
. CRF1 
. CSV R 
. CTMO 
. CVL 
. CYLS 
. ELGO 
. ELG1 



-0 55 

•O 55 

•O 57 

-2352 183' 

'3467 214' 

54- 

5432 333 

■O 182- 



54- 

54' 

54' 

193- 

193- 



■2330 
■5655 
> I630 



2520 

3654 



293-6077 
147-1 662 

52-0 

S2-0 

S4-0 

54-0 

55-0 

57-0 

57-0 
184-2542 
214-3660 
182-2503 



295-6121 296-6143 296-6166 29 7 - 6 1 77 30 1 - 62 62 306-6431 
148-1704 149-1723 151-1765 151-1774 



57-0 
57-0 
188-2621 



52-0 

54-0 

54-0 

55-0 

57-0 
147- 1 652 
191 -2701 



52-0 

54-0 
54-0 
55-0 

57-0 
149- 1726 



52-0 

52-0 
54-0 
54-0 
55-0 
57-0 
149- 1731 



19 1 



2710 19 1 -2722 



52-0 

52-0 

54-0 

54-0 

55-0 

57-0 
154-201 1 
191 -2731 



165-2232 
192-2742 



52-0 
53-0 



1 67-2243 
192-2755 



52-0 

53-0 

54-0 

55-0 

55-0 

57-0 
167-2246 
193-3017 



54-0 
54-0 
55-0 



54- 
54- 
55- 

55- 
57- 



57-0 57-0 
167-2251 170-2277 170-2305 
198-3206 200-3234 208-3431 



7731 
2504 



182-2511 188-2632 191-2731 192-2732 192-2755 193-3000 197-3165 198-3210 198-3210 204-3377 257-5253 



3005 
3005 



55- 
55- 

55- 
55- 
55- 

54- 
54- 



55- 
55- 

54- 
54- 



183-2531 



182-2512 138-2633 191-2727 192-2733 193-3000 193-3000 197-3165 197-3165 198-3210 257-5254 

54-0 167-2247 167-2251 197-3177 197-3200 257-5237 

54-0 191-2725 226-4071 248-5022 257-5243 
221-3752 257-S245 
257-5247 

54-0 
197-3200 

193-3005 204-3376 
204-3375 
183-2533 

214-3667 



214-3670 

53-0 62-0 184-2544 202-3330 257-5251 

62-0 184-2545 202-3331 257-5252 

214-3666 

2 14-3664 214-3666 

169-2647 189-2650 



P , FBBO 


55-0 


55-0 


197 


3175 


1 97-3175 


P . FBB1 


55-0 


197-3175 








P .FLGS 


SS-O 


202-3332 


240 


4605 


240-4615 


P . GRP 


55-0 


189-2646 


189 


2647 




P . HSTO 


54-0 


54-0 








P .HST1 


54-0 










P .HTMO 


54-0 


214-3661 
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P . LBNO 

P . LBN 1 
P . LCKA 
P . LINK 
P. LOCK 
P .ME0 1 
P . MED2 
P . MLUN 

P .MOD 

P . OPCD 



RBNO 

R8N1 

RSNS 

RCTC 

RCTS 

RFNO 

RFN1 

RGIO 

RGI 1 

RGOO 

RG01 

RS03 

RS06 

RSOS 

RSI 6 

RSI7 

RS19 

SHST 

SHUN 

P.STS 

P . TRCK 

P . UNFL 

P . UNIT 

P . UNSO 

P . UNS1 

P . UNTO 

P . UNT1 

P . UNT2 

P . UNT3 

P . USVR 

P . VCID 

P . VRSN 

P . VSEO 

P . VSE1 

PABRT 

PACTV 

PAGESZ 

PAR 

PARTST 
PKIP 
PKTOOI 
PKT0O2 



54-0 

54-0 
269-5472 

S3-0 
138- 1312 

SS-0 

55-0 

S5-0 

54-0 
208-3431 

54-0 
199-3125 

54-0 

54-0 

55-0 

55-0 

55-0 

54-0 

54-0 

54-0 

54-0 

54-0 

54-0 

54-0 

54-0 

54-0 

54-0 

54-0 

55-0 

55-0 

54-0 

55-0 

S5-0 

54-0 

54-0 

55-0 

55-0 

55-0 

55-0 

55-0 

55-0 

55-0 

53-0 

54-0 

55-0 

55-0 

53-0 

53-0 

49-0 

18-0 

101 -445 

S9-0 

52-0 

52-0 



S4-0 
191 -2720 
299-5473 

53-0 
145-1 905 

55-0 
217-3709 
217-3702 

82-0 
209-3487 

92-0 
225-4033 

54-0 



191-2720 191-2722 192-2757 193-3017 194-3034 197-3156 210-3523 210-3S27 221-3780 

191-2720 192-2757 192-2757 194-3034 194-3034 197-3156 197-3156 210-3524 2 1 0- 3630 22 1 - 37 6 1 

209-3441 232-4260 237-4465 269-5473 

217-3705 217-3706 

2 17-3707 

217-3703 

162-2113 169-2294 170-2277 170-2305 174-2352 175-2370 183-2520 188-2821 188-2622 191-2701 131-2710 195-3112 

211-3560 214-3554 227-4115 233-4321 238-4540 

142-1547 146-1641 1 49 - 1727 1 49 - 1 73 1 162-2112 164-2168 1 65 - 223 1 1 65 - 2232 173-2342 177-2426 182-2507 195-3113 

227-4124 239-4556 241-4647 

192-2742 



o 



189-2657 212-3637 

189-2652 189-2657 212-3636 

64-0 184-2536 
184-2537 

54-0 165-2225 



54-0 



62-0 
167-2241 



204-3372 

149-1725 149-1726 183-2525 195-3111 199-3130 197-3202 233-4278 239-4551 239-4554 
167-2243 197-3201 198-3206 211-3574 211-3604 



167-2244 167-2246 188-2634 
188-2935 



21 2-3632 
217-3707 
1 79-2420 
1 89 -2944 
2 10- 3506 

82-0 

5S-0 
212-3633 

55-0 

55-0 

55-0 
217-3705 
1 89-2950 
147- 1971 
214-3657 

55-0 
212-3635 
I 63-2164 
173-2332 
257-5232 



21 7-3710 
217-3710 

1 89 -2949 

2 1 7-3703 

185-2551 187-2610 188-2623 188-2631 200-3251 201-3257 

212-3632 212-3633 

212-3634 

216-3676 217-3704 

216-3676 216-3677 

2 1 6-3677 

189-2652 

149-1732 163-2163 164-2170 176-2421 184-2547 201-3267 211-3555 

214-3660 

212-3634 212-3635 

170-2302 

174-2347 191-2676 191-2705 199-3231 208-3426 241-4646 

257-5255 257-5255 257-5261 

18-0 101-447 101-453 139-1314 219-3724 228-4146 2SS-5311 261-5406 289-5665 



142-1555 163-2162 196-3132 197-3205 
52-0 
52-0 



f 
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PKT0O3 


52 





52 





















































PKT004 


52 





52 





















































PKT005 


52 


o 


52 


o 


















































PKT006 


52 





52 





















































PKT007 


52 





52 





















































PKTOOS 


52 





52 





















































PKT0O9 


52 





52 





















































PKT010 


52 





52 





















































PKT01 1 


52 





52 





















































PKT012 


52 





52 





















































PKT013 


52 





52 





















































PKT014 


52 





52 





















































PKT015 


52 


o 


5! 


o 


















































PKT01 6 


52 





52 





















































PKT017 


52 





52 





















































PKT018 


52 





52 





















































PKT0 19 


52 





52 





















































PKT02O 


52 


o 


52 





164 


2171 


202 


3326 










































PKTBUF 


52 





52 





154 


2007 


184 


25SO 










































PKTEND 


52 





65 





154 


2005 


154 


2005 


154 


2006 


184- 


2540 


184- 


2541 






























PLOCK 


19 





138 


1304 


138 


1305 


138 


1311 


138 


1313 


140 


1516 


145 


1613 


173 


23 4 1 


230 


4172 


233 


4305 


269 


5472 


269 


5474 










POLL 


12 





12 





1 3 





1 19 


1024 


134 


1225 


142 


1537 


































POLTST 


86 


173 


1 19 


1014 


















































POLV 


306 


6450 


308 


6473 


316 


6630 


319 


6744 










































POLYP 


306 


6450 


319 


6745 


319 


6750 














































POLVX 


319 


6744 


319 


6746 


















































PONER 


S3 





21 1 


3556 


21 1 


3557 














































P0P1 


329 


7424 






















































P0P2 


258 


531 1 


329 


7425 


















































PRDY 


14 

























































PSTACK 


78 


25 


32 


76 


















































PSTAT 


53 





1 49 


■ 1707 


154 


2012 


172 


2321 


173 


2332 


173 


2335 


1 84 


2544 


199 


3227 


199 


3231 


241 


4849 


















PTELEN 


46 





249 


•5050 





















































17 





9 1 


-254 


91 


260 


91 


264 


99 


375 


99 


400 


99 


401 


99 


402 


99 


403 


99 


404 


99 


405 


99 


406 


99 


414 


99 


417 




99 


420 


100 


-442 


126 


1115 


126 


1 127 


126 


1131 


126 


1 133 


128 


1 137 


128 


1141 


128 


1 143 


129 


1151 


1 29 


1 152 


130 


1 165 


131 


1 170 


131 


1 172 




131 


1 174 


131 


•1175 


1 31 


•1 177 


132 


1211 


132 


1213 


133 


1214 


138 


1274 


138 


1275 


138 


1300 


138 


1307 


136 


1310 


139 


1314 


139 


1315 


139 


1316 




1 40 


1513 


140 


- 1523 


142 


1557 


142 


1660 


145 


1604 


145 


1 605 


145 


1 607 


145 


1617 


145 


1620 


145 


1621 


148 


1637 


147 


1662 


148 


1701 


148 


1702 




149 


1710 


149 


• 1723 


153 


2004 


161 


2101 


161 


2111 


162 


2144 


1 62 


2147 


1 62 


2150 


163 


2152 


1 66 


2235 


167 


2245 


197 


2250 


1 87 


2253 


1 68 


2254 




1 68 


2255 


1 68 


-2256 


168 


2260 


1 68 


2261 


1 68 


2262 


169 


2263 


1 69 


2265 


1 69 


2287 


170 


2270 


170 


2271 


170 


2272 


170 


2273 


170 


2276 


174 


2344 




174 


2345 


174 


•2346 


1 78 


2404 


178 


241 1 


176 


2412 


179 


2435 


179 


2462 


179 


2464 


179 


2465 


180 


2466 


181 


2SOO 


181 


2501 


183 


2517 


185 


2554 




1 85 


'2563 


185 


-2571 


186 


2S76 


186 


2600 


187 


26 12 


187 


2513 


188 


2617 


188 


2620 


188 


2642 


139 


2644 


190 


2662 


1 90 


2663 


1 90 


2664 


190 


2665 




1 90 


'2666 


190 


-2667 


190 


2670 


190 


2671 


191 


2672 


19 1 


2973 


191 


2674 


191 


2675 


191 


2720 


191 


2730 


192 


2734 


192 


2735 


192 


2745 


192 


2750 




192 


2752 


192 


-2757 


193 


2773 


193 


3000 


193 


3002 


193 


3005 


193 


3010 


194 


3034 


194 


303S 


194 


3036 


194 


3040 


194 


304 7 


195 


3101 


197 


3156 




1 97 


'31 68 


197 


■3173 


197 


3175 


193 


3210 


198 


3212 


198 


3214 


200 


3244 


201 


3274 


201 


3314 


202 


3317 


202 


3325 


202 


3327 


202 


3334 


202 


3341 




202 


'3346 


203 


-3354 


203 


3370 


204 


3373 


204 


3374 


208 


3422 


208 


3423 


208 


3424 


208 


3425 


209 


3444 


209 


3446 


209 


3471 


2 10 


351 6 


210 


352fi 




210 


•3541 


21 1 


-3576 


212 


3610 


212 


■3623 


212 


3626 


214 


3653 


214 


3864 


214 


3567 


217 


3702 


217 


3704 


221 


3741 


221 


3755 


223 


3773 


226 


4059 




227 


-4127 


227 


-4135 


230 


4172 


230 


■4173 


232 


4272 


233 


431 1 


233 


4312 


234 


4347 


234 


4351 


234 


4353 


234 


4357 


235 


4400 


235 


4403 


235 


44261 




236 


-4435 


238 


-4436 


237 


4454 


237 


4455 


240 


4600 


240 


4602 


240 


461 6 


240 


4617 


240 


4623 


240 


4827 


241 


4630 


241 


4646 


241 


4650 


242 


4656 




243 


■4676 


243 


-4700 


244 


•4722 


245 


•4737 


246 


4745 


246 


4748 


246 


4754 


246 


4762 


246 


4763 


246 


4764 


246 


4770 


245 


4775 


246 


4777 


246 


500 1 




247 


•5005 


247 


-5007 


249 


5066 


249 


■6067 


250 


5 103 


250 


5 105 


250 


5110 


251 


5130 


251 


■5131 


251 


5137 


251 


5145 


251 


5161 


251 


51 62 


251 


5163 




251 


-5164 


252 


-5167 


252 


-5170 


252 


-5172 


257 


5261 


257 


5262 


257 


5271 


256 


5305 


258 


-5307 


259 


5324 


259 


5326 


259 


•5331 


259 


5336 


259 


5344 




259 


■5352 


262 


-5420 


264 


-5437 


272 


-5501 


272 


5503 


272 


S504 


273 


5507 


273 


551 1 


273 


•55 12 


280 


5547 


280 


5555 


231 


-5560 


281 


5561 


281 


■5565 




282 


•5572 


283 


-5613 


289 


■5663 


289 


-5665 


293 


6078 


293 


6077 


293 


6 100 


294 


8112 


295 


■6123 


295 


6124 


295 


6141 


299 


6230 


299 


6234 


303 


6327 




303 


■6351 


303 


-6352 


303 


-6360 


304 


-6407 


304 


64 10 


304 


64 1 1 


304 


6412 


305 


6423 


305 


•6424 


306 


6446 


308 


6460 


303 


■6463 


308 


6470 


309 


■6504 
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€ I 



3B . RO 

OB . WR 

OOADM 

OREVB 

OUESAV 

OW 

RO 



309-6506 

3 18-6725 

325-7131 

46-0 

73-0 

289 -5634 

301 -6242 

1 -0 

1 -O 



312-S553 315-6605 317-6656 317-6657 318-6707 318-6710 318-6711 3 1 8 - 67 1 2 3 1 8 - 87 1 4 318-6717 318-6720 318-6721 

319-6741 319-6742 322-6765 322-7001 322-7003 323-7054 324-7062 324-7066 324-7067 324-7070 324-7074 324-7126 

325-7132 325-7134 326-7147 326-7150 331-7441 331-7442 331-7443 333-7731 

162-2146 172-2320 173-2327 199-3224 218-3716 

289-5635 
301 -6242 



318-6723 
325-7130 



81-62 
86- 1 S3 
92-266 
98-370 
100-441 
I 13-63 6 
I 15-675 
1 17-756 
1 20- 1042 
130- 1 1 60 
140- 1521 
149- 1733 
151 - 1774 
161 -2105 
164-2201 
165-2226 
176-2412 
183-2527 
187-2513 
192-2741 
195-3107 
197-3174 
201 -3305 
203-3365 
207-3420 
210-3533 
217-3710 
221 -3751 
226-406 1 
230-4213 
233-4277 
235-4370 
237-4462 
239-4545 
244-47! 1 
246-5002 
249-5060 
253-5207 
258-5274 
259-5322 
262-5412 
276-5533 
282-5610 



49-0 

81-63 
87- 177 
92-267 
98-372 
100-443 
1 13-640 
1 15-676 
1 17-765 
1 20- 1043 
130- 1 163 
140- 1523 
150- 1741 
151 - 1776 
161-2106 
164-2202 
165-2227 
176-2415 
185-2555 
187-2614 
192-2746 
195-3110 
197-3200 
201 -3306 
203-3366 
207-3421 
211 -3562 
219-3721 
221 -3756 
226-4073 
230-4214 
233-4303 
235-4376 
237-4476 
239-4546 
244-471 1 
246-5003 
249 -5060 
253-52 10 
258-5275 
259-5325 
262-5413 
279-5545 
283-5614 



147-165 1 147-1 684 



81 
87 
92 
99 
106- 
114 
115 
117 
122 
132 
1 40 
150 
152 
161 
1 64 
170 
176 
185 
187 
193 
196 
198 
201 
203 
208 
211 
219 
22 1 
226 
230 
233 
235 
237 
239 
244 
247 
249 
253 
258 
259 
262 
2SO 
283 



92- 
99- 
106- 
114- 
115- 
117- 



64 

205 

272 

373 

507 

644 

700 

766 

1055 122 

1205 132 

152S 140 

1743 150 

2002 154 

2 107 161 
2203 165 
2303 173 
2417 176 
2557 185 
2616 188 
2770 193 

3 114 196 
3206 200 
3310 201 
3367 204 
3437 209 
3567 211 
3722 219 
3757 222 
4074 226 
4215 230 
4304 233 
4377 235 
4500 237 
4562 239 
4715 244 
5006 247 
5061 249 
5217 253 
5276 258 
5331 259 
5414 264 
5546 280 
5615 283 



70 
206 
273 
374 
51 3 
644 
7 00 
767 



92 
99 
106 
1 14 
I 15 
1 18 

1057 122 

1207 136 

1527 142 

1745 150 

2012 155 

21 lO 162 

2204 165 

2337 173 

2422 176 

2564 185 

2637 188 

2771 193 

3117 196 

3234 200 

331 I 202 

3400 205 

3451 209 

3570 212 

3723 219 

3754 224 

407S 227 

4215 231 

4306 233 

4407 235 

4S03 237 

4563 239 

4723 244 

S007 247 

S061 249 

5222 254 

5277 258 

5333 259 

5441 264 

5550 280 

5616 289 



70 
210 

274 

■376 
522 
651 
701 
776 
1061 
1240 
1550 

■ 1750 
201 6 
2 114 
2206 

'2340 
2423 
2565 
2 6 4 1 
2774 
3120 
3243 
3316 
3401 
3455 
3606 
3724 
4O00 
4107 
42 2 4 
431 6 
44 1! 
4503 
4576 
4726 
5012 
5062 
5223 
5277 
5342 

■5442 
5550 
5644 



81-71 
87-211 
93-303 
99-377 
107-537 
1 14-654 
115-714 
1 18-777 
122- 1064 
136- 1242 
144-1 600 
150- 1753 
155-2017 
16 2-2117 
165-2207 
174-2350 
179-2450 
185-2567 
189-2651 
193-2776 
196-3122 
200-3252 
202-3323 
205-3402 
209-3465 
212-3623 
220-3725 
224-4002 
227-41 1 1 
231 -4230 
234-4334 
235-4412 
237-4510 
240-4606 
245-4733 
247-5013 
249-5100 
254-5223 
258-5300 
259 -5346 
267 - 5456 
280-5551 
289-5660 



93 
99 
108 
1 I 4 
I 16 
1 18 
125 
136 
145 
ISO 
156 
I 62 
165 
174 
179 
IS5 
189 
193 
196 
201 
202 
205 
209 
213 
220 
224 
227 
231 
234 
235 
237 
240 
245 
248 
253 
255 
258 
259 
268 
280 
293 



■220 
'304 
-406 
•576 
655 
720 
• 1000 
' I 104 
1244 
'1615 
1753 
2030 
'2125 
2210 
2360 
2453 
2570 
'2654 
300 1 
3123 
3255 
3333 
3402 
■3472 
3650 
'3726 
-4004 
'4131 
4231 
4341 
'4413 
'4510 
•4607 
'4734 
5017 
5202 
5227 
■ 5300 
■5347 
5462 
5552 
6064 



94 
99 
1 10 
1 1 4 
1 1 6 
1 18 



136 
146 
150 
156 
162 
165 
175 
179 
1 86 
189 
193 
1 96 
201 
202 
20S 
209 
213 
220 
225 
227 
232 
234 
235 
237 
240 
245 
248 
253 
267 
253 
259 
268 
280 
293 



243 

314 

407 

623 

657 

721 

1006 

1 122 

1247 

1635 

1754 

2033 

2133 

221 1 

2367 

2455 

2574 

2657 

3006 

3143 

3256 

3335 

3403 

3477 

3651 

3727 

401 7 

4135 

4244 

4343 

4413 

45 1 1 

4610 

4741 

5020 

5203 

5232 

5301 

5350 

5465 

5556 

6066 



S3- 
90 
94- 
99 • 
1 12- 
1 14- 

1 16- 
118- 
126- 
137- 
147- 
151 ■ 
156- 
162- 
165' 
175- 
179- 
186- 
189 - 
193- 
197- 
20 1 • 
202 
205 
209- 

2 14- 
220- 
225 
229 
232 
234- 
235- 
237- 
241 - 
245- 
248 
253 
257- 
258- 
259- 
271 ■ 
280- 
294- 



102 
244 
315 
4 1 1 
630 
660 
725 



S3- 

90- 

95- 

99- 

112- 

114- 

116- 



10 10 119 

1 1 25 126 

1254 137 

1643 147 

17 5 7 15 1 

2037 156 

2134 162 

2212 165 

2372 175 

2457 179 

2575 186 

2660 191 

3015 194 

3147 197 

3260 201 

3344 203 

3403 205 

3502 209 

3 6 65 2 14 

3731 220 

4037 225 

4156 229: 

4256 232 

4344 234 

4415 235 

451 1 238 

4634 243 

4742 246 

S030 248 

5203 253 

5260 257 

5301 258 

5363 259 

5477 274 

5556 280 

6110 294 



106 

246 

331 

41 3 

631 

6S1 

726 

1014 

1126 

1256 

1550 

1760 

204 1 

21 40 

2213 

2374 

2462 

2 601 

27 1 7 

3042 

3157 

3263 

3350 

3404 

3503 

3666 

3732 

4042 

4157 

4260 

4346 

4425 

45 13 

4667 

4 745 

5032 

5204 

5262 

5302 

5370 

5524 

5557 

6 110 



83- 
90- 
95- 

99- 
1 12- 
114- 
116- 
119- 
128- 
137- 
147- 
151 - 
156 
162 
165 
175 
180 
186 

19 1 
194 
197 

20 1 
203 
205 
210 
214 
220 
225 
229 
232 
234 
238 
238 
243 
246 
249 
253 
257 
258 
259 
274 
282 
29 5 



107 84 

247 9 1 

334 97 

415 99 

633 113 

661 114 

735 116 

1017 119 

1 145 129 

1260 137 

1652 149 

1751 151 

2047 158 

2143 163 

22 15 165 

2376 176 

2476 182 

2603 186 

2723 191 

3043 194 

3162 197 

3264 201 

3360 203 

3405 206 

3504 210 

3671 215 

3736 221 

4043 225 

4162 229 

4261 232 

4350 234 

4430 236 

4514 238 

4670 243 

4752 246 

5053 249 

5204 253 

5263 257 

5302 258 

5377 261 

5525 275 

5573 282 

6117 295 



•114 
253 
352 
416 

'634 

'663 
735 
1020 

■1147 
1263 

■1713 
1763 
2051 
2165 
2216 
2377 
2505 
2604 
2724 
3050 
3162 
3271 
3361 
3407 
3511 
3674 

■3745 

■4045 
4163 
4267 
4 3 5 2 
4443 
451 6 
4 6 7 3 
4754 

■5056 

'5205 
5264 
5303 
5402 
5530 
5603 

■6120 



84-116 
91 -256 
98-356 
10O-42 1 
1 13-635 
1 15-672 
1 16-736 
120- 1032 
1 29 - 1 1 50 
137-1271 
149-1717 
151 - 1767 
158-2052 
164-2177 
165-2217 
176-2400 
182-2506 
186-2606 
192-2735 
195-3077 
197-3167 
201 -3272 
203-3362 
206-3412 
2 1 O - 3 5 1 5 
2 1 6-3701 
221 -3746 
225-4051 
230-4 1 66 
232-4270 
234-4351 
237-4461 
2 3 8-4517 
243-4702 
246-4761 
249-5057 
253-5205 
257-5266 
258-5303 
261 -5405 
275-5531 
282-5604 
295-6130 



84-120 
9 1 -262 
98-367 
100-422 
1 13-636 
1 15-673 
1 16-744 
120- 1037 
129-1155 
1 37- 1 272 
1 49 - 1 730 
151 - 1773 
1 61 -2104 
1 64-2200 
1 65-2220 
176-240 1 
182-2514 
186-2607 
192-2737 
195-3101 
197-3170 
201 -3273 
203-3363 
207-3413 
210-3525 
217-3707 
221 -3747 
226-4055 
230-421 1 
232- 4275 
234-4363 
237-446 1 
239-4544 
243-4707 
246-4766 
249-5057 
253-5205 
257-5271 
258-5307 
261 -5406 
276-5532 
282-5605 
295-6137 
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Q 
< 

O 

il 

2 
a 
O 

u. 

W 

o 



%J' 



296- 
303- 
309 - 
315- 
323- 
327- 
81 - 
95- 
99- 
106- 
13 1- 
1 37- 
142- 
149- 
162- 
169 
175- 
183 
19 1- 
197- 
206- 
211- 
221 
226 
227- 
234- 
238- 
246- 
255' 
259 
280 
290 
29 I - 
293- 
299- 
303- 
309 - 
318- 
325 ■ 
1 7- 
118- 
147- 
162- 
155- 
176- 
188 
192- 
195- 
19 3- 
202- 
210 
214- 
225- 
239 



5151 

6326 

6503 

6617 

7036 

7155 

65 

323 

4 to 

526 

1 176 

1270 

1555 

1726 

2135 

2263 

2371 

2520 

2731 

3 177 
3431 
3556 
3750 

4 105 
4134 
4354 
4523 
475 1 
5227 
5344 
5553 
57 1 5 
5774 
6050 
6215 
6340 
6505 
6702 
7131 
O 

1013 
1 644 
2113 
2231 
2421 
2551 
2733 
3111 
3225 
3325 
3523 
3657 
4010 
4554 



296-6167 
303-6330 
309 -6504 
315-6617 
323-7040 
327-7161 
8 1-67 
95-325 
99-412 
1 15-706 
131 - 1 177 
138- 1306 
144- 1572 
149-1731 
1 62-2136 
1 69-2265 
176-2407 
184-2545 
192-2742 
197-3201 
208-3433 
21 1 -3557 
223-3766 
227-4106 
227-4136 
234-4362 
238-4531 
246-4753 
257-5241 
259-5371 
280-5553 
290-S717 
29 1 -5775 
293-6051 
299-6226 
303-6354 
309-651 1 
319-6747 
325-7132 

17-0 
122-1055 
147-1 647 
1 62-2122 
1 66-2233 
177-2426 
187-2610 
192-2757 
195-3112 
199-3226 
202-3327 
210-3524 
214-3661 
225-401 6 
239-4556 



297 
303 
309 
315 
323 
331 
34 
95 
100 
1 1 6 
131 
138 
1 44 
1 50 
I 62 
170 
176 
187 
192 
197 
209 
21 1 
223 
227 
227 
235 
238 
246 
257 
264 
280 
290 
291 
293 
301 
304 
31 1 
319 
325 
lOO 
122 
147 
1 62 
1 67 
179 
183 
192 
195 
199 
202 
210 
214 
225 
240 



-6171 299- 

-6344 303 

-E504 309- 

-6627 316 

-7051 323- 

-7444 333 

-133 86- 

-332 96- 

-422 100- 

-723 116- 

-1200 131- 

-1310 139- 

- 1573 144' 
-1741 150' 
-2142 165- 
-2275 170- 
-2414 177- 

- 2 6 1 4 18 8 
-2752 192- 
-3205 193 
-3466 209 
-3566 2 11 
-3767 223 
-4121 227 
-4136 223 
-4374 235 
-4532 238 
-4772 246- 
-5260 257 
-5431 264- 
-5554 230 
-5725 290 
-6O01 291 ■ 
-6053 293- 
-6242 301 
-6376 304 
-6520 31 1 ■ 
-6747 322 
-7134 326' 
- 4 3 1 100- 
-1081 122 

- 1 671 149 ■ 
-2127 162- 
-2242 167- 
-2436 179- 
-2622 183- 
-2765 192 
-3113 19 6 
-3232 200 
-3334 202 
-3527 210 
-3664 214 
-4021 225 
-4605 240 



52 1 4 299 - 
6345 SOS- 
SB^ 312 
6633 316' 
7052 324 
7733 333 
164 37' 



340 
423 
730 



96 
102 
119 



1201 133 

1315 139 

1575 144 

1743 151 

2232 166 

2277 170 

2427 179 

2621 189 

2755 193 

3207 198 

3467 209 

3575 2 1 1 

3770 223 

4 123 227 

4143 223 

4376 235 

4534 233 

5000 248 

5266 258 

5433 264 

5554 282 

5726 290 

5003 292 

6054 293 

6271 301 

6400 304 

6526 312 

6763 322 

7143 326 

432 106 

1067 124 

1711 149 

214S 162 

2252 169 

2446 182 

2523 188 

2767 193 

3125 196 

3233 200 

3341 202 

3530 21 1 

3687 214 

403 3 22 6 

4 6 15 2 4 2 



6217 

6357 

6536 

9634 

7061 

7745 

203 

342 

456 

1015 

1220 

1321 

1576 

1 757 

2233 

2305 

2444 

2656 

2777 

3213 

3476 

3577 

3771 

4124 

4144 

4377 

4541 

5025 

530 4 

5 434 

5574 

5732 

601 1 

6060 

6272 

64 1 4 

6536 

6771 

7145 

510 

1 103 

171 5 

2146 

2264 

2503 

2631 

3000 

3130 

3235 

3346 

3543 

3670 

4066 

4663 



299- 
304- 
312- 
317- 
324- 
333- 
87- 
97- 
102- 
119- 
136- 
139- 
146- 
152- 
166- 
170- 
179- 
189- 
193- 
198- 
209 - 
212- 
223- 
227- 
223- 
235- 
239 • 

24 8- 

25 8- 
264- 
283 

29 1 - 
232- 
293- 

30 1 ■ 
306- 
312- 
322- 
326- 
106- 
125- 
149 - 
163- 
163- 
182- 
188- 
193- 
197- 
200- 
203- 
211- 
217- 
226- 
242 



8220 

6405 

3537 

6646 

7066 

7746 

204 

351 

457 

101 6 

1237 

1322 

1533 

200 1 

2236 

2307 

2450 

2657 

30 17 

3220 

3501 

3615 

3772 

4126 

4146 

4401 

4560 

5032 

5304 

5 4 43 

56 17 

5734 

60 12 

6067 

6274 

6435 

6544 

70 1 3 

7 146 

525 

1 104 

1 7 25 

2151 

2266 

2504 

2632 

3005 

3154 

3240 

3351 

3544 

3702 

4067 

4664 



2 9 9-6221 
304-6413 
312-6544 

3 17- 6660 
324-7076 
334-7751 

87-207 
98-355 
102-462 
120- 1031 
136- 1243 
140- 1506 
146- 1 634 
153-2003 
166-2237 
172-2320 
179-2451 
191 -2676 
193-3030 
199-3222 
209-3502 
2 12-3625 
224-4005 
227-4127 
228-4146 
235-4406 
239-4561 
249-5050 
258-5305 
254-5445 
283-5620 
29 1-6742 
292-601 6 
293-5070 
301 -5277 
306-543 6 
313-6577 
322-7017 
327-71 60 
1 O 6 - S 2 7 
131-1165 
149-1 727 
163-21 63 
172-2315 
182-2507 
183-2633 
193-3010 
19 7-3155 
2O0-3242 
203-3354 
21 1 -3555 
217-3704 
226-4071 
248-5022 



299- 
305- 
312- 
317- 
324- 
334- 
87- 
98- 
102- 
120- 
137- 
1 40- 
147- 
155- 
167- 
172- 
179- 
19 1 - 
194- 

1 99 - 
210- 
214- 
224- 
227- 
230- 
235- 
241 - 
249 - 
258- 

2 67- 
289- 
2 9 1 - 
292- 
293- 
301 - 
306- 
313- 
322- 
331 - 
103- 
131 - 

1 49 - 
164- 
172- 
182- 
188- 
193- 
197- 
200- 
204- 
211- 

2 18- 
232- 
2 50- 



6223 

642 1 

6545 

6660 

7077 

7752 

213 

356 

463 

1033 

1255 

1507 

1656 

20 13 
224 1 
2326 
2454 
2701 
3055 
3223 
3507 
3654 
4006 
4130 
4170 
4422 
4636 
5053 
5306 
5457 
5 63 5 
5743 
6020 
807 1 
6300 
6440 
6600 
702 1 
7440 
542 
1201 
1732 

21 66 
23 1 6 
251 1 
2634 
301 1 
3156 
3251 
3372 
3560 
3713 
4272 
5115 



299- 
306- 
313- 
3 18- 
324 ■ 
334- 
87- 
98- 
102- 
120- 
137- 
140- 
147- 
156- 
167- 
173- 
179- 
19 1- 
194- 
199 
2 10- 
214- 
225 
227- 
230- 
236- 
242- 
249 
253 
272- 
290 
291 - 
292- 
293- 
302- 
308 
315- 
323 
331 • 
108- 
132- 
154- 
164- 
172- 
182- 
188- 
193- 

19 7- 

20 1 • 
204- 
211- 
2 18' 
233 
250 



6224 

6445 

6563 

6676 

7 100 

7753 

21 4 

360 

464 

1036 

1257 

1515 

1666 

2031 

2242 

2327 

2455 

2705 

3063 

3224 

3513 

3656 

40 13 

4131 

42 10 

4447 

4657 

5055 

5310 

5 5 00 

5 67 4 

5747 

602 6 

6072 

6313 

6457 

6625 

7042 

7444 

544 

1205 

2005 

21 67 

2321 

2512 

2635 

3012 

31 65 

3257 

3375 

3574 

3714 

4276 

5116 



299- 
SOT- 
318- 
324- 
334- 
9 1 - 
93 - 
102- 
120- 
137- 
1 40 
147 
158 
167 
173 
182- 
191 
195 



6225 301- 

6453 308- 

6565 313- 

6722 319- 

7115 324- 

7754 334- 

255 91 - 



362 

465 
1041 
12 61 



199 

210 

214 

225 

227 

230 

235 

242 

249 

258 

278 

290 

29 1 

292 

293 

302 

308 

316 

323 

333 

108 

135 

154- 

164 

173 

1 S3 

189 

193 

197 

201 

204 

211 

218 

233 

251 



93- 
106- 
122- 
137- 

1517 140- 

16 67 147- 

2054 160- 

2243 167- 

2331 174- 
2502 182- 
2710 191 ■ 
3 105 197- 
3225 200- 
3515 210- 
36SO 2 15- 
4014 225- 
4132 227- 
4217 230- 
4450 237- 
4657 244- 
5056 253- 
5310 259- 
5537 278- 
5675 290- 
575 1 29 1- 
6027 292- 
6073 293- 
6315 302- 
646 1 308- 
6 83 1 3 16- 
7044 324- 
7725 

577 108- 

1240 136- 

2006 154- 

2170 164- 

2332 173- 
2525 183- 
2844 191 - 
3026 194- 
3175 197- 
3267 201- 
3376 204- 
3604 212- 
371 6 218- 
4321 233- 
5124 251 - 



6 25 1 301- 

6451 308 

6 5 6 6 315 

67SO 319 

7116 324 

7755 334- 

257 9 1 

363 93 

5 14 106- 

1054 122- 

1284 137 

1522 142- 

1670 147- 

2074 1 62- 

2244 167' 

2347 174' 

2505 182 

27 12 19 1' 

3157 197- 

3235 200 

3517 210 

3673 215- 

4025 225 

4 132 227 
4220 233 
4504 237- 
4715 244- 
5177 253 
5316 259 
5540 273 
5701 290 
5757 29 1 
6033 292 
6074 294 
6317 302- 
6462 308 
6640 316 
7075 324 

602 110- 

1244 138 

2007 154- 

217 1 164 

2333 173 

2531 183 

2720 191- 

3034 194 

3176 197 

3274 201- 

3377 209 

3636 212 

3717 221- 

4326 237 

5 125 25 1 



6260 

6464 

66 10 

6756 

7117 

7756 

261 

376 

516 

1060 

1265 

1545 

1 672 

2126 

2246 

2352 

25 13 

2713 

31 67 

3250 

3520 

3674 

4026 

41 33 

4322 

4507 

4720 

5206 

5332 

554 1 

5702 

5760 

6035 

6 1 06 

6321 

6464 

664 1 

7102 

621 

1252 

2010 

2174 

2334 

2533 

2725 

3035 

3202 

3312 

3447 

3637 

3752 

445 6 

5126 



301 • 
308- 
3 15- 
319- 
324- 
334- 
93- 
99- 
106- 
126- 
137- 
142- 
147- 
162- 
167- 
174- 
182- 
19 1 • 
197- 
201 ■ 
210- 
22 1- 
225- 
227- 
234- 
233- 
244- 
253- 
259 - 
279 ■ 
290- 
29 1 ■ 
29 3- 
295- 
302- 
308- 
318- 
324- 

1 10- 

137- 

1 54- 

165- 

175- 

184- 

19 1- 

135- 

198- 

201 • 

209- 

213- 

221 

233 

251 ■ 



6267 

6473 

6613 

6756 

7121 

7757 

306 

377 

522 

1117 

1266 

1546 

1673 

2130 

2247 

2355 

25 1 4 

27 1 6 

3170 

3262 

3525 

3742 

4035 

4133 

4327 

45 15 

4720 

5210 

5335 

5544 

5710 

5764 

6042 

6132 

6323 

6466 

6 6 7 7 

7125 

626 

1256 

201 1 

2221 

2370 

2536 

2727 

3067 

3207 

33 14 

3450 

3641 

3760 

4540 

5135 



302-63OS 
309 - 6500 
315-6613 
323-7032 
325-7137 

94-321 
99-402 
106-523 
129-1156 
137- 1267 
142- 1552 
1 49 - 1720 
162-2132 
1 67-2251 
174-2357 
183-251 6 
191 -2722 
197-3 176 
203-3426 
21 1 -3553 
221 - 3744 
226- 4060 
227-4134 
234-4336 
238-4522 
246-4750 
255-5226 
259-5336 
279-5544 
290-571 1 
291 -5766 
293-6047 
296- 6155 
303-6336 
303-6471 
318-6702 
324-7125 

1 17-763 

146- 1641 

1 62-2 1 12 

165-2225 

176-2420 

184-2537 

192-2732 

195-3 100 

198-3210 

202-3324 

210-3506 

2 13-36 4 2 

221 -3761 

239-4551 

25 1 -5141 



KDBUP DIGITAL EQUIPMENT CORP. 

CROSS REFERENCE TABLE ( CREF VOl-oa ) 



2901 ASSEMBLER VERSION 32 RAGE S-2S 



Rl 1 

R12 
R13 
R14 
R15 
Rl 6 
Rl 7 
R2 



2S1 • 
257- 
295' 

3 15' 
SIS- 
274- 
17- 



5146 
5253 

6113 

6607 

6710 



5526 



251 - 
257- 
295- 
315- 
318- 
100- 
274 
17 
78- 

loo- 



17- 
37- 
87- 
97- 
106- 
1 16- 
126- 
1 47- 
1 56- 
1 74 
1 83 
191 
19S 
209 
225 
237 
243 
253 
280 
290 
292 
304 
312 
322 
17 
1 38 

1 70 

2 1 1 
230 
234 
241 
258 
29S 
306 
315 
324 



200 

350 

521 

745 

1 127 

1 642 

2043 

2363 

2532 

2721 

3121 

3447 

4040 

4452 

4672 

5221 

5552 

S730 

8024 

6404 

6553 

6772 



17 
3 12 
3 17 
319 



- 1302 

-2302 

-3551 

-4202 

-4333 

-4643 

-5312 

-6166 

-6431 

-6627 

-7070 

-O 

-0 

-6552 

-6653 

-6744 



87 

98 
108 
1 17 
128 
147 
156 
174 
184- 
192 
197 
209 
225 
237 
244 
253 
282 
29 1 
292 
306 
315 
322 

77 
143 
179 
21 1 
230 
235 
243 
263 
297 
306 
31 6 
324 

1 7 
100 
312 
317 
319 

86 
108 



5 147 

5254 

6114 

6615 

671 6 

432 

5527 

O 

24 

435 



202 

353 

540 

757 

1 140 

1 645 

2044 

2364 

2540 

2753 

3 160 

34SO 

4041 

4457 

4721 

5221 

5575 

5736 

6031 

6444 

6602 

6777 

5 

1566 

2433 

3S52 

4205 

4422 

4671 

5426 

6175 

6442 

6634 

7074 

O 

426 

6557 

6654 

6745 

154 

552 



251 
264 
295 
315 
31 9 
1O0 
282 
1 00 
78 
100 
100 
100 
76 
87 
98 
108 
1 17 
128 
I 48 
1 56 
176 
1 34 
192 
197 
209 
230 
237 
244 
2S7 
283 
291 
292 
308 
3 15 
323 
1 00 
143 
179 
21 I 
230 
235 
243 
266 
297 
307 
3 17 
324 
100 
100 
312 
317 
31 9 
86 
108 



5150 

5427 

6115 

6615 

6751 

433 

5612 

433 

25 

436 

436 

440 

2 

212 

361 

S46 

760 

1 144 

1675 

2046 

2403 

2541 

2754 

31 66 

3462 

4206 

4463 

4721 

5255 

5621 

5740 

6037 

6455 

6603 

7024 

424 

1567 

2437 

3553 

4217 

4423 

4674 

5451 

6176 

6453 

6662 

7126 

425 

427 

6561 

6661 

6746 

155 

5S3 



25 1 
264 
295 
315 
319 
1 22 
283 
100 
lOO 

100 

78 
88 
98 
108 
1 1 7 
1 29 
1 48 
1 61 
176 
184 
192 
197 
209 
230 
237 
246 
258 
289 
29 1 
293 
308 
315 
323 
100 
1 43 
1 79 
21 1 
230 
235 
243 
282 
301 
307 
31 7 
325 
100 
127 
313 
317 
319 
86 
1 1 3 



5156 251-5160 252-5166 

5432 264-5443 264-5445 

6117 295-6120 295-6130 

6623 315-6624 316-6636 

6752 322-7001 324-706O 

1070 160-2066 261-5403 

5627 289-5634 289-5634 

434 120-1045 120-1047 

434 100-435 



252-5171 252-5173 257-5237 257-5243 257-5245 257-5247 2S7-5251 257-5252 

282-5567 282-5570 282-5571 282-5602 283-5626 289-5641 289-5641 289-5650 

295-6134 299-6215 299-6226 301-6246 301-6246 312-6554 312-6555 3I2-65S5 

316-6637 316-6645 317-6650 317-6671 318-6705 318-6705 318-6706 318-6707 

324-7060 324-7071 324-7072 324-7073 324-7110 324-7110 333-7731 

261-5404 261-5405 262-5417 262-5420 263-5426 268-5467 268-5470 268-547 

333-7737 333-7740 



o 



437 

17 

221 

364 

561 

781 

1 151 
1676 

2 100 
2406 
2542 
2764 
3171 
3474 
4207 
4464 
4756 
5313 
5644 
5745 

60s: 

6467 

6S0S 

7025 

42S 

1571 

2461 

3572 

4221 

4424 

4675 

5576 

6262 

6454 

6670 

7134 

426 

1 134 

6565 

6663 

6752 

156 

642 



78- 
89 - 
98- 
108- 
118- 
129- 
148- 
1 62- 
176- 
184- 
193- 
193- 
210- 
230- 
237- 
246- 
259- 
289- 
291 - 
296- 
308- 
315- 
323- 
124- 
1 47- 
180- 
212- 
230- 
236- 
250- 
283- 
301 - 
309- 
3 17- 
331 - 



20 

236 

371 

562 

1007 

1 156 

1S77 

2121 

2410 

2544 

2773 

321 1 

3505 

421 6 

4466 

4757 

5362 

5645 

5753 

6165 

6474 

SS06 

7026 

1072 

1 665 

2470 

3607 

4221 

4443 

5105 

5S22 

6270 

6477 

6674 

7441 



78-21 
89-240 
100-423 
108-566 
118-1011 
130- 1161 
148- 1700 
162-2125 
176-241 1 
184-2545 
193-3007 
198-3217 
210-3510 
231 -4222 
240-4601 
246-4760 
259-5363 
289 -5646 
291 -5755 
299-62 1 6 
308-6475 
315-6621 
323-7027 
124- 1076 
147- 1S66 
180-2473 
212-3617 
231 -4223 
237-4504 
250-5106 
289-5655 
302-8310 
309-6501 
318-6726 
331 -7443 



131 - 1 173 132- 1202 

315-6611 315-6612 

318-6717 318-6723 

319-6754 319-6755 

SS- 170 86- 171 

114-666 115-712 



78 
39 
1 OO 
103 
120 
134 
148 
1 62 
179 
184 
193 
199 
210 
232 
240 
246 
259 
289 
29 1 
299 
308 
317 
323 
126 
147 
1 80 
212 
232 
237 
250 
289 
303 
309 
318 
333 

132 
315 
313 

88 
1 15 



22 

241 

424 

567 

1035 

1230 

1700 

2 130 

2441 

2547 

3016 

3231 

351 1 

4257 

4603 

4760 

5367 

5657 

57S2 

6227 

6476 

66SS 

7031 

1111 

1 667 

2474 

3620 

4247 

4507 

5 1 10 

5664 

6334 

6507 

6727 

7744 



78-23 
39-242 
102-460 
108-57S 
120- 1040 
136- 124S 
150- 1754 
164-2172 
179-2446 
184-2550 
193-3031 
200-3246 
210-3513 
232-4262 
240-4626 
246-4761 
259-5367 
290-5672 
291 -5770 
301 -6251 
31 1 -6521 
318-6700 
323-703S 
126- 1113 
147- 1670 
184-2543 
212-3621 
232-4247 
239-4592 
250-5120 
289-5671 
303-6343 
309-6507 
318-6733 



102 
109 
122 
136 
155 
1 64 
1 79 

1 86 
194 
201 

2 10 
232 
240 
246 
259 
290 
29 1 
301 

3 I 1 
318 
324 
1 26 
147 
186 
212 
232 
239 
250 
293 
303 
3 1 2 
3 1 3 



76 

322 

461 

605 

1063 

1250 

2023 

2173 

2453 

2603 

3046 

3261 

3533 

4270 

4626 

5000 

5370 

■5677 

5772 

6252 

SS23 

6713 

-7065 

1116 

1 673 

2575 

-3624 

-4252 

■4576 

■51 20 

•6077 

■6351 

6541 

•6734 



83 

95 
102 
1 1 
I 22 
140 
1 55 
1 65 
1 79 
1 38 
194 
201 
210 
233 
24 I 
253 
264 
290 
291 

30 1 

31 1 
318 
324 
1 26 
1 61 

1 86 

2 12 
232 
240 
251 
295 
304 
31 2 

3 I 9 



1 10 

324 

462 

622 

1065 

1520 

2024 

2224 

2465 

2S24 

3046 

3303 

3541 

4326 

4631 

5200 

5433 

5704 

5777 

6253 

6524 

6713 

7073 

1121 

2111 

2602 

3627 

4252 

461 1 

5131 

6121 

636S 

SS4S 

6757 



84- 
95- 
104- 
1 10- 
124- 
140 
155 
1 65- 
180 
183 
194 
201 
211- 
235 
241 
253 
264 
290 
291 
301 
311 
318 
325 
126 
I 62 
1 37 
212 
232 
240 
251 
295 
304 
312 
319 



1 23 

326 

S03 

624 

1077 

1524 

2025 

2230 

2465 

262S 

3050 

3313 

3SS0 

4404 

4S46 

521 1 

5434 

5706 

6005 

6275 

6525 

6740 

7132 

I 130 

2144 

2615 

3630 

4253 

4612 

5133 

6136 

6374 

65S6 

6760 



100 
95 
104 
1 15 
124 
1 43 
156 
1 72 
1 80 
I 88 
194 
202 
22S 
235 
241 
253 
273 
290 
292 
302 
31 1 
3 19 
325 
128 
1 62 
192 
212 
232 
240 
251 
296 
304 
312 
31 9 



430 
330 
504 
710 
1 100 
■ 1563 
2032 
2323 
2475 
2627 
3053 
3345 
4012 
4405 
4647 
5213 
5514 
5713 
-6007 
6303 
■6S2S 
-6761 
■7133 

- 1 142 
-2145 
•2766 
•3631 
•4254 

4620 
•5144 
•6143 
•6403 
-6556 

- 6760 



100- 
9S- 
106- 
1 IS- 
124- 
145- 
1S6- 
174- 
ISO- 
19 1- 
194- 
203 
225- 
235- 
242- 
253 
273- 
29 0- 
292- 
304' 
312- 
3 19- 



431 

337 96- 

511 IOS- 

715 116- 

1 102 126- 

1603 145- 

2040 156- 

23SO 174- 

2476 183- 

2714 191 • 

3054 194- 

3357 206 

4024 225- 

4416 236 

4660 242 

521 6 253 

5520 280 

5721 290- 

6014 292 

6367 304 

6547 312 

6761 322 



341 

520 

724 

1 123 

1611 

2042 

2356 

2523 

2715 

3064 

3406 

4036 

4451 

4660 

5216 

5551 

5723 

6022 

6370 

6552 

6772 



128- 1 144 138- 1277 

162-2147 170-2301 

196-3133 210-3520 

224-3774 230-4176 

232-4273 232-4274 

240-4621 240-4622 

253-5214 253-5220 

296-6145 296-6152 

304- 641 1 305-6426 

312-6560 313-6563 

323-7034 323-7037 



1204 133-1214 137-1262 137-1272 138-1303 233-5623 308-6476 312-6551 
6614 315-6616 315-6620 316-6630 316-6631 316-6642 316-6643 317-6651 
6735 318-6736 318-6737 318-6740 319-6741 319-6741 319-6742 319-6743 



217 
713 



88-224 
1 16-742 



100-427 
1 1 6-743 



100-430 
1 17-754 



106-505 
1 17-755 



106-S17 106-524 107-531 
119-1022 119-1023 162-2140 



J 
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CROSS REFERENCE TABLE (CREF V01-08 ) 





1 62 


2143 


183 


2157 


1 63 


2161 


1 63 


21 62 


1 63 


2164 


173 


2336 


173 


2343 


175 


2373 


175 


2376 


179 


2434 


179 


2440 


179 


2444 


179 


2451 


179 


2462 




179 


2464 


186 


2572 


186 


2602 


186 


2605 


186 


260S 


188 


2640 


188 


2643 


189 


2660 


193 


301S 


193 


3026 


194 


3054 


1 94 


3060 


194 


3061 


194 


3063 




195 


3065 


195 


3070 


195 


3071 


195 


3073 


1 95 


3104 


1 95 


3107 


196 


3115 


196 


3123 


1 96 


3 131 


1 96 


3132 


1 86 


31 44 


196 


3145 


197 


31 60 


197 


3161 




197 


3163 


197 


31 63 


197 


3164 


197 


3164 


197 


3166 


197 


3171 


193 


3220 


200 


324S 


202 


3326 


202 


3330 


202 


3331 


202 


3332 


202 


3336 


209 


3464 




210 


3540 


21 1 


3563 


21 1 


3601 


21 1 


3602 


213 


3641 


213 


3642 


213 


3647 


224 


3775 


225 


4012 


225 


4013 


22S 


4017 


225 


4022 


225 


4050 


227 


4114 




227 


4115 


229 


4152 


229 


4160 


229 


4164 


230 


4204 


231 


4233 


232 


4241 


232 


424S 


232 


4245 


232 


4246 


232 


4251 


234 


4340 


236 


4441 


236 


4442 




237 


4471 


237 


4472 


237 


4474 


237 


4477 


237 


4S01 


239 


4552 


239 


4555 


239 


45S7 


239 


456 1 


239 


4565 


239 


4S66 


239 


457S 


241 


4641 


241 


4642 




241 


4644 


241 


4645 


247 


5010 


247 


501 1 


250 


5114 


250 


5122 


250 


5123 


250 


5123 


251 


S133 


251 


5134 


251 


5142 


251 


5144 


251 


5153 


251 


5182 




252 


5 170 


252 


5174 


266 


5447 


268 


5463 


268 


S464 


281 


5563 


28 1 


55 63 


28 1 


5564 


281 


S564 


281 


5566 


282 


5606 


282 


5607 


282 


861 1 


308 


8456 




308 


6465 


31 1 


6522 


31 1 


6527 


313 


6570 


313 


6S75 


317 


66S2 


317 


6653 


317 


6655 


317 


66S6 


317 


6 65 6 


317 


6657 


317 


6665 


317 


6673 


317 


6673 




318 


6715 


318 


6716 


318 


6717 


318 


6721 


318 


6721 


318 


672S 


322 


6767 


322 


6771 


323 


7045 


324 


7066 


324 


7104 


324 


7112 


324 


7113 


327 


7153 




334 


7771 


335 


7772 


















































R7 


17 





100 


440 


1O0 


441 


101 


445 


101 


446 


101 


451 


101 


452 


103 


472 


104 


476 


107 


533 


1 13 


637 


1 14 


650 


1 14 


662 


1 17 


752 




1 17 


757 


120 


1046 


124 


1077 


128 


1 133 


130 


1 1 65 


131 


1 173 


131 


1 175 


131 


1 176 


134 


1232 


138 


1234 


139 


1317 


142 


1551 


145 


1616 


146 


1 632 




147 


1 653 


147 


1655 


147 


1657 


148 


1706 


149 


17 14 


ISO 


1752 


151 


1765 


151 


1766 


151 


1770 


1S1 


1771 


15S 


202 1 


1 61 


2102 


162 


2136 


1 62 


2142 




164 


2176 


165 


2222 


172 


2313 


172 


2314 


179 


2435 


179 


2436 


179 


2441 


179 


2445 


179 


2457 


1 79 


2463 


183 


2521 


183 


2S24 


183 


2526 


183 


2530 




1 83 


2535 


192 


2734 


192 


2736 


192 


2744 


192 


2747 


192 


2751 


192 


2754 


192 


2763 


193 


2770 


193 


3003 


193 


3016 


194 


305S 


194 


3064 


195 


3110 




1 96 


3126 


196 


3134 


196 


3142 


198 


3217 


202 


3342 


202 


3343 


209 


3451 


209 


3470 


210 


3514 


21 1 


3547 


21 1 


3S65 


212 


361 1 


212 


3612 


212 


3613 




212 


3614 


212 


3616 


212 


3622 


218 


371 1 


218 


3712 


218 


3720 


225 


4014 


225 


4022 


225 


4024 


225 


4025 


22S 


4026 


225 


4031 


22S 


4032 


225 


4035 




225 


4045 


225 


4051 


226 


40S4 


226 


40S5 


226 


40S7 


226 


4060 


226 


4065 


226 


4067 


228 


4102 


229 


4154 


229 


4161 


230 


4201 


230 


4203 


230 


4212 




231 


4226 


231 


4235 


231 


4236 


231 


4240 


232 


4250 


233 


431 1 


234 


4331 


234 


4342 


234 


4380 


235 


4367 


235 


4410 


235 


44 17 


236 


4427 


236 


4431 




238 


4434 


236 


4445 


236 


4446 


237 


4454 


237 


4465 


237 


4468 


237 


4470 


237 


4505 


237 


4S06 


239 


4547 


239 


4571 


240 


4600 


240 


4624 


243 


4677 




243 


4701 


243 


4706 


244 


4713 


244 


471 6 


244 


4727 


246 


47 4 7 


246 


4771 


246 


4776 


247 


5004 


248 


5021 


243 


5023 


243 


■5024 


243 


5027 


248 


5033 




243 


5034 


249 


5052 


249 


5063 


249 


5064 


249 


5065 


249 


5070 


249 


5071 


249 


S072 


249 


5073 


249 


S07S 


249 


5077 


250 


■5102 


250 


5111 


250 


5117 




2SO 


5121 


251 


5127 


2S1 


5136 


251 


5 140 


251 


5143 


251 


5 1 5 1 


251 


5 154 


253 


5175 


253 


5176 


253 


S201 


2S9 


S323 


259 


■5335 


259 


5353 


259 


5356 




2S9 


5357 


259 


5401 


262 


5415 


2 63 


5423 


264 


5440 


264 


5444 


266 


5452 


267 


5455 


272 


5502 


281 


5562 


28 1 


5565 


282 


■S601 


283 


5625 


289 


S651 




289 


5654 


289 


5656 


289 


5657 


289 


5660 


289 


5 66 1 


289 


5662 


239 


5 666 


289 


5S67 


290 


5673 


290 


5676 


290 


5700 


290 


-S703 


290 


5707 


290 


5712 




290 


57 1 4 


290 


5720 


290 


5724 


290 


5727 


290 


5731 


291 


5735 


29 1 


574 1 


291 


5744 


291 


5746 


29 1 


5752 


291 


5756 


291 


-S781 


291 


5763 


29 1 


5767 




291 


5773 


29 1 


S776 


291 


6000 


29 1 


6004 


292 


6010 


292 


6013 


292 


6015 


292 


602 1 


292 


602S 


292 


6030 


292 


6032 


292 


-6036 


293 


6041 


293 


6052 




293 


6061 


293 


6063 


293 


6101 


29 3 


6102 


295 


6126 


295 


6127 


296 


6142 


296 


6146 


297 


6 170 


297 


6171 


297 


6172 


297 


-6173 


297 


6174 


297 


6175 




297 


6176 


297 


6177 


297 


6200 


299 


6214 


299 


6223 


301 


62S5 


301 


6256 


301 


6260 


30 1 


6285 


301 


6266 


302 


6303 


302 


-6304 


302 


6304 


302 


■6305 




302 


S306 


302 


6306 


302 


6307 


303 


633 1 


303 


6332 


303 


6346 


303 


6347 


304 


6362 


304 


■6363 


304 


8371 


304 


■6372 


30S 


-6417 


305 


6420 


305 


■6421 




306 


6433 


306 


6434 


307 


645 1 


309 


6502 


309 


6503 


309 


6506 


309 


6508 


309 


6S10 


309 


S5 12 


312 


6540 


313 


•6567 


313 


-6576 


31S 


661 6 


316 


■6632 




316 


6643 


317 


6654 


317 


6666 


317 


6672 


3 17 


6672 


318 


6703 


318 


6704 


318 


6705 


318 


6707 


313 


•671 1 


318 


-6722 


318 


-6724 


318 


-6724 


318 


•6731 




319 


6753 


319 


6753 


322 


6775 


322 


6776 


322 


7002 


322 


7005 


322 


7010 


323 


7023 


323 


•7033 


323 


7064 


324 


-7063 


324 


-7120 


326 


-7150 


326 


-7152 




327 


7156 


327 


7157 


333 


■7742 


333 


7743 


334 


7760 


334 


7761 


334 


7762 


334 


7763 


334 


■7764 


334 


7766 


334 


-7766 


334 


-7767 


334 


•7767 


334 


■7770 




334 


7770 


335 


7773 


335 


•7774 


335 


7774 


335 


7775 


335 


7776 


33S 


7777 






























RAMPE 


22 

























































RAMTST 


35 


146 


106 


SOS 


















































RAM2AP 


36 


157 


104 


-SOI 


104 


■504 


106 


506 










































R8CAI 


15 





77 


-7 


286 


■5633 


289 


■5644 


299 


621 1 


30 1 


■6251 


303 


6353 


304 


■6413 


305 


-6417 






















RBN2ND 


46 





46 


-0 


48 


•0 


46 





46 









































RBNCOO 


46 





325 


■7133 


















































RBNMSK 


46 





180 


•2475 


189 


■2654 


192 


■2741 


325 


•7137 






















I 
















RBNPRM 


46 





48 


-0 


46 


-0 














































RBNSTR 


46 


■0 






















































RBNXOR 


46 


-0 


46 


-0 


4 6 


-0 


46 


-0 










































RCC 


1 7 


-0 






















































RCI 


40 


-o 






















































RCLR 


73 


-o 


73 


-0 


8 3 


■112 


84 


-117 


34 


-123 


84 


- 127 


160 


•2070 






























RCMD 


16 


-0 






















































RCSRWO 


47 


-0 


47 


-0 


















































RCSRW1 


47 


-0 


47 


-0 


47 


-0 


47 


-0 


1 32 


- 1206 


134 


- 1226 


146 


• 1640 


1 47 


- 1661 


151 


- 1755 


151 


- I7S6 


15 1 


- 1762 


1 5 1 


- 1772 


15 1 


- 1775 






RCT .EN 


46 


-0 


324 


-7073 



















































KDBUP DIGITAL EOUIPMENT CORP. 
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o 






RCT.MT 

RCT . PR 

RCT .SB 

RCTBLK 

SCTOFF 

SCY 

RO 

RD . DIA 

RDCMD 

ROFST 

RONXT 



324-7072 
324-7065 
324-7072 

51 -0 

51 -0 



324-7072 324-7072 

324-7072 

322-6766 324-7101 324-7111 324-7127 

324-7064 324-7103 



ROPF 

READ 

REAOCO 

RECALB 

RECC 

RECCT 

RELES 

REPSTA 

RETCNT 

REVEND 

REVSTR 

RGDATH 

RGOATL 

RIB 

RLL 



122- 

36- 

129- 
15 - 

291 - 
15- 

291 - 

293 
1 6- 
40- 
69- 
69- 
16- 
1 6 - 
84- 



1060 
1 63 
1 ISO 



5757 
6067 



136- 1243 
67-177 

129-1155 
94-320 

29 1 -5773 



94-313 



115-714 



1 1 6-744 



119-1014 119-1020 120-1032 126-1122 126-1126 



269-5634 289-5640 

87-206 87-211 88-220 91-253 

130-1160 156-2030 156-2037 1S6-2047 

108-600 11S-704 118-1002 290- 5673 290 -5700 290-5707 290-5714 290-5724 290-5731 291-5741 291-5746 291-5756 

291-6000 292-6010 292-6015 292-602S 292-6032 293-6041 294-6105 295-6127 296-6154 299-6223 

94-321 108-601 110-627 115-706 118-1003 290-5674 290-5701 290-5710 290-5715 290-5725 290-5732 291-5742 291-5747 

291-5764 291-5774 291-6001 292-6011 29 2 - 60 1 6 29 2 - 6026 292-6033 293-6042 293-6047 293-6050 293-6051 293-6053 293-6054 

293-6070 293-6071 293-6072 293-6073 293-6074 294-6106 295-6131 295-6132 296-6155 299-6224 

69-0 69-0 194-3036 194-3047 324-7116 



136 
O 



1 64 
230 
267 



2175 
4177 
5461 



RNGBSH 
RNGBSL 
RPC 

RPE 

RPOK 

RROV 

RRM 

RRSGEN 

RS. BER 

RSE 

RSPCOF 

RSPLEN 

RSPO 

RSPPOF 

RSPPTR 

RT1 

RTCS 

RTCS05 

RTCS06 

RTCS13 

RTCS14 



85-145 
51 -0 
246-4754 
49-0 
48-0 
93-311 
93-305 

138-1 304 
173-2341 
230-4200 

269-5473 
49-0 
49-0 



246-4764 
49-0 



1 15-707 
93-307 



116-733 
94-317 



158-2057 
1 15-705 



18-727 116-731 158-2053 158-2055 



12-0 13-0 

14-0 14-0 

16-0 

1 6-0 

97-3SO 107-535 

1 6-0 

47-0 

47-0 

48-0 

47-0 

47-0 

17-0 

18-0 

24-0 

24-0 

24-0 



138- 1305 1 38- 131 1 138-1313 140-1516 1 40 - 1 5 1 7 1 42 - 1 54 1 142-1542 143-1564 145-1606 145-1613 156-2045 160-2067 

177-2424 196-3137 207-3415 207-3416 220-3730 221-3737 221-3740 221-3762 222-3763 230-4172 230-4175 230-4177 

230-4200 231-4227 231-4227 231-4234 231-4234 233-4305 240-4627 245-4736 245-4740 245 - 4740 262 - 5422 266-5453 

269-5473 269-5474 270-5476 270-5476 273-5516 273-5517 273-5521 289-5652 301-6257 333-7732 333-7736 334-7765 

133- 1216 152- 1777 

132-1212 134-1227 152-2000 



115-7 17 1 16-747 



47-0 
47-0 
1 47- 1 662 
47-0 
47-0 



146-1631 150-1743 151-1762 

47-0 47-0 131-1167 142-1537 146-1627 147-1660 149-1734 149 

1 50- 1 743 15 1-1 77S 
15 1-1756 



1736 15 1-1 755 15 1-1 772 



KDBUP DIGITAL EOUIPMENT CORP 

CROSS REFERENCE TABLE (CREF VOI-08 ) 



^■l^ar 



RTDS 


IS 


O 


13 


-0 


18 


O 














RT0SO6 


25 

























RTOEVE 


43 





1 19 


-1016 


















RUNN 


69 

























RUPF 


15 





15 





15 





77 


-5 


1 49 


1735 


1 6 1 


-2111 


RVACTV 


60 





232 


-4260 


232 


4261 


326 


7143 










RVCBNH 


49 





49 





324 


7062 


324 


7062 


326 


7147 


326 


7 1 47 


RVCBNL 


46 





49 





324 


7062 


326 


7147 










RVCBUF 


51 





51 





322 


6770 


322 


700O 


323 


7022 






RVCEBF 


51 





51 





327 


7154 














RVCFLG 


51 





51 





228 


4137 


322 


7020 


326 


7144 






RVCIND 


50 





SO 





















RVCRTY 


50 





SO 


O 


322 


6764 


323 


704 1 


323 


7050 






RVCSAV 


48 





43 





















RVCSDI 


51 





51 





228 


4 140 


232 


4263 










RVCT 


59 





223 


3767 


232 


4256 


232 


4262 


239 


4563 


245 


4733 


RVCTA 


49 





49 





324 


7114 


326 


7151 










RVCVEC 


51 





5 1 





















RVECDP 


51 





51 





323 


7057 


324 


7107 


324 


7124 






RVECUP 


51 





51 





228 


4142 


228 


4145 


322 


701 6 


323 


7055 


RVWRIT 


60 





231 


4224 


231 


4224 


232 


4261 


233 


4316 


233 


4316 


RWM 


1 6 

























RWRDY 


25 

























S . ADRH 


54 





193 


3010 


251 


5135 


III 


5146 


251 


5156 






S . ADRL 


54 





54 





193 


3010 


193 


3010 


2S1 


5141 


25 1 


S 147 


S.AXAB 


152 


2002 


153 


2004 


22 1 


3743 


273 


5540 










S . B I TO 


1 40 


1530 


203 


3351 


227 


4110 


227 


4 112 


230 


4171 


233 


4300 


S . BUFR 


108 
137 


574 
1256 


1 10 


620 


1 1 7 


756 


1 1 7 


784 


1 18 


774 


1 18 


1006 


S .CL 1 1 


266 


5451 


282 


S612 


















S . CLRB 


142 


1540 


1 63 


2154 


1 63 


2155 


163 


2156 


165 


2231 


173 


2342 




1 83 


2635 


192 


2782 


1 92 


2765 


193 


2772 


193 


3024 


193 


302S 




212 


361 1 


212 


3612 


212 


3613 


212 


3636 


212 


3637 


213 


3645 




251 


5156 


257 


5234 


2S7 


5235 


257 


5236 


284 


5630 


31 1 


6530 


S . CYLH 


54 





54 





1 62 


2127 


192 


2767 


192 


2767 


193 


3012 


S . CYLL 


54 





54 





162 


2122 


192 


2765 


192 


2767 


193 


301 1 


S . DECO 


233 


56 15 






















S . DECB 


145 


1610 


21 1 


3604 


231 


4225 


248 


5035 


283 


5614 


315 


6626 


S . FBC1 


1 44 


1577 


185 


2556 


135 


2566 


225 


4036 


276 


5532 






S . FMB1 


1 40 


1520 


275 


5530 


















S . FUNB 


204 


3373 


220 


3733 


221 


3753 


267 


5456 


2 77 


5534 






S . GRUP 


54 





54 


O 


192 


2767 


192 


2767 


195 


3067 


225 


401 6 


S. INC6 


197 


31 60 


197 


3 1 6 3 


263 


5453 


282 


561 1 










S . LBNH 


54 


O 


1 83 


2523 


194 


3035 


197 


3155 


232 


4272 


250 


SI 16 


S . LBNL 


54 





133 


2532 


194 


3035 


194 


3035 


197 


3154 


232 


4272 


S. LD10 


146 


1636 


149 


1724 


1 61 


2101 


1 62 


2 14S 


1 62 


2 150 


130 


2471 




233 


4S25 


239 


4S50 


239 


4553 


240 


4577 


240 


4604 


242 


4662 




317 


6672 


318 


6732 


322 


6774 


323 


7057 


324 


7 107 






S . LOCR 


282 


SSS7 


282 


5567 


309 


6477 


309 


6501 


309 


6507 


312 


6546 


S . LDIU 


125 


1 105 


152 


2000 


204 


3375 


237 


4505 


249 


5071 


262 


5407 


S . LOOO 


1 69 


2254 


179 


2430 


187 


261 1 


191 


2727 


1 92 


2732 


200 


3236 




241 


4647 


243 


4677 


244 


4720 


245 


4744 


249 


5065 


251 


5127 




318 


6724 


322 


7002 


















S . LORO 


134 


1226 


143 


1562 


1 45 


1614 


147 


1 646 


147 


1654 


149 


1715 
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1 62-2 1 50 1 64-2 1 67 IS 



-3133 210-3540 234-4355 258-5313 263-5423 333-7727 



324-7 105 324-7 1 22 
322-7013 



234-4342 240-4624 241-4632 282-5603 

122-1056 122-1062 124-1077 124-1100 1 25 - 1 1 04 1 36- 1 24 1 



136-1245 137-1253 



182-2503 182-2504 182-2511 182-2512 138-2624 133-2632 183-2633 188-2634 

198-3135 197-3153 197-3202 203-3353 203-3371 210-3534 211-3542 211-3603 

213-3652 226-4103 233-4314 236-4440 238-4526 238-4527 240-4625 242-4663 

312-6532 312-6533 312-6534 324-7111 325-713S 

211-3544 322-7001 322-7001 

21 1 -3543 322-7001 



242-4663 242-4664 251-5126 252-5173 

251 -5124 

232-4272 250-5115 251-5125 

218-3714 225-4007 226-4063 22 6 - 406 6 226 -4070 233 - 4320 237 - 4452 237-4473 

248-5014 248-5015 250-5101 256-5230 232-5602 299-6232 315-6622 316-6644 

3 12-6550 

282-S600 

204-3372 209-3442 210-3524 225-4044 234-4365 236-4434 240-4614 241-4633 

251-5135 251 -5150 251 -5160 252-5166 259-5320 273-5505 282-5572 318-6722 

149-1727 149-1732 150-1740 150-1744 150-1746 151-1756 151-1782 154-2010 



KD8UP DIGITAL EQUIPMENT CORP. 

CROSS REFERENCE TABLE (CREF V01-OS ) 



2901 ASSEMBLER VERSION 32 PAGE S-32 



S . LORS 
. LDR6 



LLBO 

LL86 
MLBO 
MLB6 
OPFL 
RELC 
RELD 
RELF 
RLBA 
RRR1 
RRR7 
S0 11 
SOIO 
SDI 1 
SECI 
SECS 
SLB1 
SSOI 
ST10 
ST1 1 
STIU 
ST9Q 



1 54 

192 

201 

221 

235 

248 

259' 

324 

142 

I 69 

198- 

226- 

244- 

257- 

319 

1 04' 

1 94- 

249 

143 

301 

79- 
I 63 
239 
134' 
21 1 
318' 
142 
318 
1 64' 
193' 
201 
252 

54- 
1 95 
273' 
236 
273- 
1 31 
1 31 
274- 
274- 
124 

54- 

54- 
225 
1 24' 
149 
283 
1 22- 
I 28 
252 
1 37' 
I SB 
242 



201 1 

2740 

3304 

3752 

4367 

501 6 

5327 

7120 

1553 

2266 

3212 

4104 

471 6 

5251 

6760 

503 

3052 

5074 

1585 

6247 

32 

21 60 

4551 

1231 

3564 

6730 

1556 

6731 

2166 

3012 

3270 

5 170 



31 10 

5510 

4431 

5506 

1 176 

1 174 

5526 

5524 

1072 



4034 
1072 
1721 
5627 
1051 
1146 
5167 
1264 
3130 
4666 



1 6 1 
193 
202 
224 
235 
248 
259 
325 
145 

1 72 
199' 
227 
248 
257 
322 
146 
195 
259 
19 1 
307 
138 
179 
239 
150- 
226 
322 
232 

ISO- 

2 1 1 
282 
282 

212' 
273 
273 
273 

I 31 



1 62 
199 



2103 1 62- 

2775 193- 

3315 202- 

4001 225- 

4375 235- 

5027 248- 

5341 259- 

7136 326- 

1622 147- 

2317 172- 

3223 200- 

4124 228- 

4747 246 

5252 257 

6782 322- 
1 641 
3112 

5360 284- 

2725 211- 

6451 312- 

1 276 282- 

2433 179- 

4554 250- 

1751 151 • 

4053 226- 

6770 322- 

4250 235- 

2473 192- 

3544 225- 
S60S 
5 607 

3805 312- 
551 6 
5514 
5512 

1200 2 11- 



2112 
3020 
3322 
40 16 
4420 
5031 
5345 
7 140 
1647 
2326 
3237 
4137 
4771 
5283 
7012 
2132 
3230 
5433 
3545 
6535 
5577 
2437 
5 107 
1764 
4056 
7000 
4417 



1 62 

193 

202 

228 

236 

24 9 

259 

326 

1 47 

173 

200- 

229 

248- 

257- 

322 

1 62 

309 

273- 

312< 

313 

308 

I 79 

2SO- 

1 79 

228 

323 

236 



21 23 
3032 
3332 

4064 
4432 
5042 
5381 
7161 
1655 
2331 
3247 
4165 
5023 
5257 
7016 
2127 
3457 
5S07 
3622 
5563 
6472 
2442 
5116 
2443 
4062 
7022 
4427 



1 63- 

194- 

202- 

227- 

237- 

249- 

259 

327- 

147- 

174- 

209- 

234- 

248- 

257- 

322 

162- 

209- 

282- 

230 

317 

313 

193' 

251 ' 

179 

229 



21 63 
3041 
3343 
4115 
4460 
5044 
5365 
7 154 
1684 
2354 
3500 
4332 
5034 
5265 
702O 
2131 
3473 
5575 
4203 
6647 
6564 
3022 
5132 
2456 
4151 



174-2366 
195-3076 
204-3377 
227-41 17 
239-4572 
249-5052 
262-541 6 

147-1671 
176-2405 
210-3512 
235-4373 
248 -5037 
258-5274 
323-7041 
163-2151 
212-3616 
315-6601 
234-4331 
317-6664 
315-6607 
194-3057 
251 -5152 
179-2461 
259-5321 



175-2370 176-2421 179-2432 183-2525 184-2536 188-2622 189-2650 189- 

195-3100 196-3128 196-3138 197-3146 197-3154 200-3233 200-3241 201- 

210-3506 210-3522 211-3585 211-3574 213-3640 214-3657 214-3661 214- 

229-4154 229-4161 231-4232 232-4343 232-4266 233-4276 233-4323 234- 

242-4664 243-4701 243-4706 244-4713 245 - 4732 246 - 4765 246-4776 247- 

249-5070 249-5077 283-5201 255-5224 257-5254 257-5267 258-5273 258- 

263-5424 270-5475 262-5573 307-6452 312-6543 318-6675 313-6676 324- 



150- 
176- 

2 10- 
236- 
249- 
258- 
324- 
1 64- 
225- 

3 17- 
240- 
318- 
319' 
194- 
252- 
192 
266' 



1737 
2413 

3523 211 

4445 238 

5047 249 

5314 259 

7101 324 

2170 165 

4010 233 

6650 319 
4605 
8701 

5743 319 

3062 195 

5173 282 

2733 192 

5446 282 



177 



250 

322 



1755 
2426 
3555 
4514 
505 1 
5330 
7124 
2225 
4324 
6754 
5104 
70 10 
6753 
3111 
5600 
2761 
5601 



152- 1777 
179-2431 
21 1 -3573 
233-4521 
253-5176 
259-5343 
324-7127 
172-2322 
236-4446 
323-7023 
250-51 15 
324-7063 

196-3116 

313-6571 
193-301 1 
299-6231 



162- 
187- 



162-2113 
1 84-2537 

212-3614 214 

238-4522 238 

255-5225 257 

259-5366 259 

326-7142 326 

172-2325 179 

238-4533 241 
323-7033 

251 -5128 251 



2116 162-2124 164-2167 167- 

26IO 189-2655 195-3103 197- 

3672 225-4033 226-4071 226- 

4530 238-4540 239-4556 244 

5237 257-5243 257-5245 257- 

5374 259-5376 267-5454 282- 

7144 327-7157 

-2452 180-2474 135-2651 193-3013 

-4645 244-4717 246-4755 246-4774 

-5141 286-5450 282-5578 289-5642 



2653 
3254 
3 670 
4360 

500^ 
527 
71 1 

2252 

3204 
4077 
4714 
5247 
5574 



197-3155 198-3215 201-3265 210-3536 213- 

318-6713 322-6766 323-70S3 324-7064 

194-3055 193-3216 201-3266 210-3535 211- 

309-6515 315-6604 316-6636 317-6651 318' 



3543 
6702 



239-4547 239-4571 243-4703 244-4727 249-5073 253-5175 259-5354 262-5411 264-5436 282-5577 



2760 193-3014 195-3066 195-3113 216-3700 245-4743 232-5804 322-6773 323-7050 
4011 225-4015 225-4021 251-5157 252-5165 282-5606 



3623 213-3643 237-4503 238-4536 239-4564 273-5505 



139-1316 272- 



3576 235-4400 272-5501 272-5504 308-6456 325-7130 331-7442 
5503 318-6712 



140-1527 144-1573 145-1603 185-2552 185-2561 274-5522 

54-0 

54-0 192- 

227-4125 246- 

130- 1 1 65 267- 

199-3231 213- 



2767 225-4010 251-5160 

4773 283-5617 

5460 

3720 283-5626 312-6542 315-6623 



283-5624 

133- 121 6 1 BO' 

259-5337 283 

140-1526 145- 

200-3246 201- 

244-4710 249- 



2467 209-3443 209-3448 210-3530 234-4366 245-4731 246-4770 248-5034 249-5064 250-5111 251-5146 251- 

5613 318-6723 313-6725 322-7005 

1615 147-1666 149-1716 1SO-17S4 151-1761 161-2111 176-2420 179-2460 182-2507 192-2764 193-3027 193- 

3312 202-3324 203-3370 214-3662 214-3663 221-3754 225-4046 225-4047 226-4052 227-4120 239-4570 242 

5043 249-5045 257-5233 2S7-5271 259-5334 259-5351 289-5363 259-5372 263-5425 283-5616 309-6513 323- 



3033 
4665 

7046 
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S .STR2 

.STR3 

.STR5 

STR6 

.STR7 

.STUB 

.SWB1 

. SXAB 

.SXB1 

. TRAK 

. TST 

. XORO 

. ZBUF 

SAREG 

SAVADR 

SAVBUF 

SAVCNT 

SAVEDC 

SAVR7 

SAVUAR 

SC .AOL 

SC . BAD 

SC . CNT 

SC.DCL 

SC .DOE 

SC DIS 

SC .DSV 

SC .DUP 

SC .EC1 

SC .EC2 

SC.EC3 

SC .EC4 

SC .ECS 

SC .EC6 

SC .EC7 

SC . ECS 

SC .ECC 

SC . EDC 

SC .FER 

SC . HDR 

SC . IMR 

SC . INV 

SC. IOP 

SC . LVO 

sc.ma 

SC .NML 
SC . NOM 

SC . NVL 
SC.ODB 



326- 

91 - 

200- 

257- 

87- 

202- 

232- 

1 33- 

107- 

1 60- 

142- 

182- 

259 - 

204- 

54- 

1 49 - 

151 - 

137- 

41 - 

51 - 

51 - 

51 - 

5 1 - 



7152 

263 

3251 

5266 

201 

3337 

4255 

1215 

530 

2071 

1554 

2502 

5336 

3376 

O 

1725 

1773 

1255 

O 

O 



327- 

137- 

2 lO- 

259- 

93- 

209- 

233- 

137- 

117- 

179- 

225- 

182- 

259 - 

237- 

54- 

1 66- 

184- 

197- 

81 - 

51 - 

51 - 

5 1 ■ 

51 - 

SO- 

51 • 

209- 



7156 327- 

1263 139- 

3527 210- 

5373 259- 

306 108- 

3460 241- 

4307 251- 

1273 233- 

751 233- 

2447 183- 

4043 283' 

2513 235- 

5344 278- 

4506 249- 

132- 

2240 167- 

2544 135' 

3200 193 
62 98- 



O 

3472 



307- 

1 28- 



71 62 

1321 145-1623 147-1651 147-1670 147-1673 155-2015 173-2333 180-2472 192-2763 195-3074 195-3105 200-3240 

3540 211-3554 235-4402 242-4657 248-5033 249-5050 249-5063 257-5242 257-5244 257-5248 257-5250 257-5256 

5375 282-5421 273-5542 233-5620 313-6574 322-6764 322-6775 322-7017 323-7044 324-7102 

562 108-867 116-730 134-1233 158-2054 163-2152 188-2631 194-3045 194-3051 195-3075 198-3214 199-3232 

4653 242-4661 259-5364 264-5435 283-5621 315-6624 322-6776 

8125 283-5622 299-6233 

5623 313-6573 316-6645 

4310 241-46S2 250-5114 251-5124 251-5140 251-8147 282-5174 283-5624 311-6523 311-8524 3 11-6525 313-6872 

2531 183-2533 210-3537 225-4027 225-4030 283-8625 289-5640 301-6245 307-6450 309-6516 

5623 

4374 272-5504 322-6763 

5537 278-5541 278-5542 

5072 262-5410 278-5536 278-5536 

2767 192-2767 195-3100 225-4021 251-5150 252-5166 252-S171 

2242 

3067 212-3624 282-5610 

3207 200-3235 267-5457 279-5544 

367 126-1126 129-1150 129-1155 



6450 318-6675 318-6730 

1146 278-5542 289-5642 299-6233 301-6247 



176-2410 
234-4347 
176-2415 185-2565 



211-3572 234-4357 235-4401 243-4670 323-7032 

212-3621 235-4426 239 - 4544 240 - 46 1 O 243 - 4 676 323-7040 

232-4273 235-4425 236-4430 240-460S 

211-3551 212-3607 234-4353 324-7117 

253-8312 

21 1 -3552 



232-4253 239-4545 

176-2406 

193-3001 



) 



K 
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si 



SC . ODT 
SC . OVR 
SC. PAR 
SC. POS 
SC. RRO 
3 C . RWR 
i C . S C N 
SC SOI 
SC . STO 
SC . UNK 
SC .WPH 
SC .WPS 
SCAN 
SCLR 
SCMO 
SD 

SOI . 1 
SOI . 12 



SDI 
SOI 



SOI . 2T 

SOI . 3 

SOI . 4 
SOI .AT 
SDI . BH 
SDI.BL 
SDI . CH 
SDI . CL 
SOI CP 
SDI . CW 
SD I . DB 
SOI .OL 
SDI .DP 
SDI EO 
SOI El 
SDI .EC 
SDI .ER 
SDI .ES 
SDI .FC 
SOI .GC 
SOI .GO 
SDI .GP 
SOI .H1 
SOI .H2 

SDI . I 1 
SDI . 12 
SDI . 13 
SDI . L 1 
SDI . L2 
SOI . LL 
SDI . LN 
SDI . LT 
SDI .Ml 



56-0 
56-0 
56-0 
56-0 
56-0 
56-0 
56-0 
12-0 
73-0 
1 6-0 
18-0 
ES-O 
63-0 
60-0 
65-0 
62-0 
65-0 
65-0 
62-0 
61-0 
61 -O 
60-0 
60-0 
59-0 
62-0 
60-0 
61 -O 
63-0 
60-0 
60-0 
61-0 
6 1 -0 



63-0 
60-0 
63-0 
63-0 
61 -O 
61 -O 
61 -O 
63-0 
63-0 
63-0 
52-0 
6 1 -O 
63-0 
63-0 



193-3006 
239-4546 

197-3147 234-4351 



176-2404 
194-3042 
194-3042 



12-0 13-0 

76-0 335-7774 

142-1543 142-1544 164-2171 202-3326 205-3401 274-5522 274-5523 274-5524 274-5525 274-5526 274-5527 

160-2473 189-264S 192-2760 225-4011 225-4023 251-5157 322-6773 

140-1533 200-3241 233-4310 

164-2171 202-3326 205-3401 

234-4345 234-4356 234-4365 235-4402 235-4420 236-4432 240-4614 245-4731 

164-2171 202-3326 205-3401 

142-1557 142-1560 164-2171 202-3326 205-3401 

62-0 62-0 62-0 62-0 62-0 62-0 142-1547 164-2171 172-2316 173-2342 202-3326 

197-3173 197-3173 240-4623 

197-3173 240-4623 240-4623 

162-2124 174-2365 194-3056 19S-307S 242-4656 242-4661 

162-2123 194-3062 195-3074 322-7004 



63-0 
60-0 

63-0 
60-0 
60-0 

235-4373 
61 -O 
61 -O 
63-0 
63-0 
63-0 
60-0 
63-0 
63-0 
6 1-0 
61-0 
6 1-0 
63-0 
63-0 

201 -3303 



1 87-26 1 1 20 1 -3254 

225-4047 237-4453 327-7162 



163-2155 196-3135 238-4533 

163-2154 203-3347 203-3353 211-3603 233-4314 236-4440 245-4744 246-4767 



61 -O 
161 -2077 
210-3522 
179-2437 
179-2461 
193-3032 
1 93-3013 
192-2761 
21 6-3675 
2 1 6-3676 
21 6-3677 
198-3215 
198-3216 



245-4743 

161-2103 162-2120 162-2131 174-2362 194-3057 195-3076 233-4323 246-4765 322-7012 326-7142 

189-2647 225-4015 

242-4665 246-4774 

210-3535 266-5451 

193-3014 194-3052 210-3538 



212-3632 322-6765 

212-3633 322-6765 322-6765 



61 -O 
217-3705 
217-3706 
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SDI ,0E 
SDI .OM 

SDI .OP 
SDI . PH 
SDI . PL 
SOI .PO 



SDI . RC 
SOI . RH 
SDI .RL 
SDI . RO 



SDI 
SDI 
SOI 



o 



RT 
RV 
SDI .SI 
SDI .S2 
SDI .S4 
SDI SS 
SDI .56 
SOI .S7 
SOI .SO 
SDI .SL 
SDI .SS 
SDI .ST 

SOI .SV 
SDI .SW 

SOI . TG 
S D I . T I 
SOI .TM 
SOI . TO 
SDI . UB 
SDI . UE 
SOI . UF 
SOI . UG 
SDI . UN 
SDI . VI 
SDI . V2 
SDI . XH 
SDI . XL 
SDI . XR 
SOIB . L 
SOIBEG 
SDIRTV 
SOIS 
SOITMO 
SDITO 
SDPF 
SDTIMO 
SEC 
SECC 



60-0 
60-0 

248 -5014 

62 -O 

63-6 

62-0 

60-0 
227-4 122 
322-6774 

61 -O 

61 -O 

61-0 

60-0 

61 -O 

63-0 

63-0 

6 1-0 

62-0 

62-0 

62-0 

62-0 

62-0 

63-0 

59 -O 

60-0 

59-0 
209-3445 

60-0 

60-0 
232-4255 

63-0 

61-0 



6 1-0 
64-0 
65-0 
69-0 
46-0 
69-0 
46-0 
16-0 
69 -O 
2S-0 
16-0 



253-5212 

63-0 

62-0 

60-0 
233-4320 
322-7007 
189-2655 

61 -O 

61 -O 

60-0 

61 -0 

63-0 

63-0 

62-0 

62-0 
201 -3277 
201 -33O0 
201 -3301 
20 1 -3302 

63-0 

59-0 

60-0 

59-0 
209-3460 

60-0 

60-0 
233-4307 

63-0 

6 1 -0 

60-0 

6 1 -0 

60-0 

61-o 

63-0 

60-0 

61-0 

63-0 

63-0 

60-0 

60-0 

64-0 



226-4103 227-4116 234-4332 238-4526 238-4527 

162-2116 163-2160 172-2325 193-3020 193-3022 213-3644 213-3652 229-4155 233-4324 237-4473 241-4633 241-4652 



161-2101 172-2317 180-2471 192-2756 194-3037 199-3230 201-3265 208-3440 218-3712 225-4O07 226-4070 227-4113 

238-4525 239-4550 239-4553 240-4577 240-4604 241-4640 241-46S3 242-4662 248-5015 25O-5I01 256-5230 318-6732 

211-3573 246-4755 322-6762 

203-33S6 233-4312 240-4602 240-4602 

203-3355 233-4312 233-4312 240-46O2 

1 94 -3045 

189 -2650 202-3315 

180-2474 169-2653 192-2740 325-7136 

189-2652 323-7053 

174-2366 176-2405 201-3275 209-3473 

201 -3276 



194-3051 

225-4030 227-4120 229-4165 231-4225 237-4460 

124-1073 142-1545 142-1553 172-2322 174-2354 176-2413 181-2477 186-2577 193-2775 195-3106 197-3204 209-3442 

224-4001 230-4171 231-4232 232-4243 232-4266 238-4530 241-4632 245-4732 270-5475 

140-1535 163-2156 193-3027 197-3146 200-3237 203-3371 209-3500 211-3542 211-3546 211-3554 213-3640 213-3645 

234-4366 238-4535 239-4570 239-4572 323-7046 325-7135 326-7140 

179-2433 189-2646 225-4020 252-5165 

61 -O 21 6-3700 
14 5-1610 

61-0 61 -O 

201-3266 211-3564 223-3773 225-4046 226-4062 229-4151 231-4237 237-4467 259-540O 273-5505 

194-3041 196-3116 210-3512 217-3703 227-4112 

193-3033 195-3066 242-4666 246-4773 251-5132 

186-2573 2O0-3247 202-3322 227-4110 

202-3320 212-3626 212-3630 212-3634 

202-3321 212-3630 212-3635 

193-3002 193-3025 210-3534 250-5107 255-5224 

193-3002 193-3002 193-3024 210-3531 250-5104 250-5112 255-5225 



65-0 
65-0 



65-0 



65-0 



65-0 



124-1 075 142-156 1 111- 



! 577 1 45- 



1 2 185-2556 185-2566 
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SECCT 


16 


O 










SECOND 


1 40 


1502 


143 


1567 


145 


1624 


SECS2 


46 





65 





1 40 


1513 


SECTR 


14 













SEEK 


59 


o 


195 


3070 


195 


3073 


SEEKL 


E9 













SEKPRV 


48 





48 









SEKSAV 


48 













SEN0S2 


126 


1110 


132 


1207 






SEN0S3 


126 


1112 


133 


1214 






SENDS4 


1 26 


1114 


133 


1277 






SE001 


78 


25 


82 


76 






SEOERR 


76 


3 


76 


3 


76 


3 


SEQTST 


78 


17 










SEOUEN 


46 





1 62 


2114 






SERIAL 


22 


o 










SES 


42 













SETBAR 


306 


6450 


308 


6462 


319 


6761 


SETHVR 


331 


7440 


334 


7750 






SETLIM 


1 28 


1 137 


134 


1230 


1 34 


1232 


SEX2SK 


48 





22S 


4027 


226 


4056 


SF 


73 





138 


1300 






SFERR 


70 













SFT134 


1 35 


1234 


136 


1235 


137 


1253 


SFT20 


100 


421 


too 


443 






SGRPCO 


69 













SHFID 


9 1 


254 


120 


1031 






SHFRES 


306 


6450 


308 


6460 


308 


6463 


SIMTST 


1 





87 


215 


98 


373 


SLAT 


59 





1 24 


1074 


1 96 


3131 


SM 


73 





87 


214 






SPURT 


229 


4147 


229 


4150 






SRM 


16 













SRSGEN 


1 6 













SSE 


1 6 













SSSDIA 


1 24 


107 3 


1 24 


1076 






SST 


42 


O 










ST .ABO 


55 





1 63 


2165 






ST . AVL 


55 





1 74 


2360 


176 


2401 


ST . CMD 


55 


-0 


182 


2502 


182 


2513 


ST . CMP 


55 


-0 


232 


4274 


240 


4607 


ST. CNT 


56 





140 


1536 


212 


3621 


ST DAT 


55 
324 


-0 

-7117 


21 1 


3551 


212 


3607 


ST DRV 


56 


-0 


197 


3147 


234 


4351 


ST .HST 


55 


-0 


193 


3001 


1 93 


300S 


ST .MFE 


55 


-0 


21 1 


3572 


212 


3625 


S T . MS K 


55 


-0 


1 76 


•2377 


21 1 


3552 


ST .OFL 


55 


-0 


1 75 


2367 


1 75 


2374 


ST . SMF 


55 


■o 


1 82 


•2502 






ST .SUB 


55 


-0 


56 





56 


O 




56 


-0 


56 





56 







56 


-0 


57 


•0 


57 





ST .SUC 


55 


-0 


1 70 


•2303 


1 75 


2372 



145- 1624 

191-2723 193-2777 210-3532 224-4005 230-4205 243-4673 250-5103 251-5142 253 - 5 1 77 253 - 5207 323-7036 



195-3104 224-4002 230-4166 237-4471 237-4476 237-4477 237-4501 238-4531 241-4641 241-4642 



139-132S 329-740O 333-7445 



o 



226-4064 227-4117 



308-6466 

114-667 120-1026 120-1043 126-1121 132-1210 133-1215 133-1222 138-1300 139-1324 142-1541 142-1541 

200-324S 202-3336 223-3766 232-42S6 233-4304 233-4306 239-4563 245-4733 247-5012 



188-2843 193-2774 210-3504 

206-3407 207-3413 222-3764 333-7733 

244-4726 

23S-4426 239-4S44 240-4610 243-4676 323-7040 

232-4273 234-4347 234-43S3 234-43S7 235-4401 235-4425 236-4430 240-4606 240-4617 243-4670 323-7032 

207-3420 221-3747 221-3751 232-4253 232-4254 239-4545 239-4546 258-5312 264-5441 

240-46 1 6 

176-2400 176-2412 176-2417 188-2637 188-2641 191-2717 193-2771 203-3437 209-34S5 209-3465 209-3477 



56-0 58-0 56-0 

56-0 5B-0 56-0 

57-0 S7-0 57-0 

176-2377 138-2640 207-3421 



56-0 56-0 S6-0 56-0 
56-0 56-0 56-0 56-0 
57-0 57-0 S7-0 57-0 

209-3472 211-3542 220-3736 264-5442 



56-0 


56-0 


56-0 


56-0 


56-0 


56-0 


56-0 


56-0 


57-0 


57-0 







tr- 
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S T . WP R 
STARSP 
STBBLG 
STBFLG 



STBFLH 

STCACH 

STDALN 

STDTBL 

STEP 

STEP. 1 

STEP . 2 

STEP . 3 

STEP . 4 

STEP . X 

STEP1 

STEP2 

STEP3 

STEP4 

STEST 

STOP 



STOPCM 
STOPEN 
STROLG 

STR1R2 

STRTCO 

STS 

SUPF 

SUSP 

SWM 

SV 

SVO 

SV3 

SVNC 

SVNCH 

SYNCL 

SZSUFA 

TO 

T1 

T2 

TS 

T9 

TEMP 

TEMPI 

TEMP2 

TEMP3 

TEST 

TESTBL 

TMR.BS 

TMR.MC 



55-0 

63-0 
189-2645 
189-2652 
203-3365 
220-3735 
203-3347 

6S-0 

46-0 
219-3723 

77- 1 1 

33-222 
131-1176 
133-1214 
137- 1274 
126-1111 

35-0 

35-0 

35-0 

35-0 

13-0 

12-0 
239-5643 

43-0 

43-0 
139-2651 
220-3726 
193-3002 

69-0 

42-0 

15-0 

59-0 
230-4204 

16-0 

48-0 

48-0 

4 8-0 

50-0 

46-0 

46-0 
279-5543 

83-77 

83-102 

84-132 

85-146 

86- 153 

51 -O 

4S-0 

48-0 

48-0 

12-0 
139-1314 

50-0 

50-0 



194-3043 

189-2646 
201 -3275 
212-3627 
221 -3760 
203-3360 



65-0 
220-3732 
333-7731 

77-11 
129- 1 147 
1 32- 1202 

138-1 274 
126-1113 

38-0 
126- 1111 

79-33 
126- 1 130 

86-155 
299-62 12 

119-1015 
139-2657 
220-3732 

193-3010 

86-164 

15-0 
I 63-21 62 
231 -4233 

48-0 
312-6537 
48-0 
50-0 
140- 1507 
140- 1506 
279-5545 
S3- 10 1 
S3- 104 
84- 135 
85-151 

51 -O 
48-0 

48-0 

48-0 
1 1 5- 670 
33 1 -7426 

50-0 

50-0 



189-2647 203-3366 

201-3276 201-3277 201-3300 2O1-3301 20 1 - 3302 202 - 3320 202-3321 202-3330 202-3331 202-3342 203-3355 203-3356 

212-3630 212-3632 212-3633 212-3634 212-3635 216-3675 216-3676 216-3677 217-3703 217-3705 217-3706 220-3734 
221 -376 1 

144- 1572 144- 1573 



333-7737 

77- 1 1 77- 15 
129- 1 147 129- 1 147 



126-1115 126-1115 126-1115 138-1303 
79-30 80-35 80-44 80-47 87-213 



126-1113 
138- 1277 



93-31 1 94-315 107-531 
299-6221 301-6250 



118-1000 119-1022 133-1223 148-1701 156-2034 158-2057 



197-3174 202-3316 202-3344 203 - 336 1 203 - 3364 203-336S 203-3370 20S-340S 214-3665 216-3701 217-3707 217-3710 

221-3756 221-3757 271-S477 331-7444 334-7752 334-7754 334-77S6 

194-3035 197-3175 193-3210 198-3213 232-4272 233-4312 240-4623 326-71SO 

120-1033 

1S-0 138-1306 162-2144 165-220S 235-4422 299-6210 333-7730 

173-2340 175-2373 195-3065 195-3070 195-3073 196-3132 209-3464 211-3562 224-3775 225-4060 229-4160 229-4164 

232-4267 237-4471 237-4472 237-4474 241-4634 241-4641 245-4734 247-5010 

48-0 308-6474 309-6477 309-6501 309-6515 
316-6633 317-6646 

140- 1S0S 



331 -7426 
331 -7427 
331 -7430 
331 -7436 

224-3776 225-4044 226-4063 

149-1721 149- 1724 

79-32 133-1215 138-1276 

107-530 1 14-643 1 17-751 

120- 1027 142- 1S41 



122-1051 125-1105 134-1233 



140-1501 143-1565 143-1570 
14O-15O0 145-1614 14S-1623 214-3663 
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~1L 



TOPOL 
TOPRSP 

TSBRPe 
TSCRPe 
TSTCNT 



STMOO 

TSTRTH 

U . ABRT 

U . ACC 
U . ALOC 
U . ALOH 
U . ALOL 
U . ALOZ 
U . ATTA 
U .ATTN 
U . AVAL 
U . AVLO 
U . AVL 1 
U . AVLA 
U . AVLB 
U . AVLC 
U . BOSM 

U . BFIL 
U . BFLA 

U . BFLC 

U . BFLF 

U . BFLH 
U .BFLX 

U . BFSV 

U . BLST 
U .BMTA 
U . BMTC 
U . BMTO 
U . BMTE 
U . BMTF 
U . BMTI 
U . BMTJ 
U . BMTK 
U . BMTO 
U . BMTR 
U . BMTS 
U . BMTT 
U .BMTU 
U . BMTV 
U . BMTW 
U . BMTX 
U . BMTY 
U . BMTZ 
U . BSET 
U .BST1 
U . C2ED 
U . C2EP 



36 ■ 
t 69 ■ 

86' 
117- 
1 65- 
1 64 ■ 
223- 
225- 
225- 
226 ■ 
164- 
142- 
IBS' 
174- 
174- 
174- 
174- 
174- 
230- 
229 ■ 
229. 
230- 
230- 
231 ' 
231 ■ 
223- 
230- 
234- 
234- 
235- 
235 ■ 
236- 
236- 
237- 
234- 
239 ■ 
235 
239 
238- 
238 
238 
234- 
234- 
229 ■ 
234 ■ 
230- 
248- 
176- 
170- 



1SB 

22S3 

171 

7SS 

221 S 

2203 

3774 

4040 

404 1 

4072 

2172 

1552 

221 1 

2345 

2350 

23SB 

2357 

23B1 

4170 

4 16 1 

4157 

4205 

4210 

4226 

4232 

3772 

41 66 

4356 

4343 

4406 

4371 

4433 

4447 

446 1 

4347 

4545 

4426 

4553 

4 530 

4532 

4535 

4334 

4331 

4 156 

4336 

4205 

5026 

2377 

2303 



103 

103' 



170 
86 
1 1 9 
170 
190 
224 
225 
22S 
226 
173 
172 
174 
174 
174 
174 
1 74 
175 
234 
231 
229 
322 
230 
231 
231 
227 
236 
235 
235 
235 
235 
23S 
237 
237 
234 
243 
238 
244 
238 
238 
239 
241 
237 
234 
234 
235 
249 
13S 
176 



'47 1 
'467 
■7 

1 67 

2276 1 

174 

1025 1 

2274 

2670 

3774 

4042 2 

4062 

4075 2 

2336 

2313 

2344 

2347 

2354 

2362 

2365 

2371 1 

4337 

4240 

4163 

7014 

4217 

4 23 4 2 

4236 2 

4106 2 

4450 2 

4373 

4372 2 

4415 

4424 2 

4445 

4456 2 

4465 

4351 2 

470S 2 

4512 2 

4730 

4534 

4535 

4542 

4643 

4470 

4327 

4341 

4403 2 

5070 2 

2641 1 

2402 1 



79-26 80-36 80-41 
86-172 86-173 86-174 

70-2304 174-2351 183-2517 
88-227 88-230 89-232 



80-42 80-52 82-75 82-76 83-111 84-121 

86-175 88-227 101-455 126-1121 173-2330 238-4512 

188-2620 191-2700 191-2707 208-3430 214-3653 

91-252 91-253 91-264 101-455 107-536 115-670 



1 1 6-750 1 17-752 



20-1027 120-1030 122-1071 286-5633 



26-4061 

26-4076 226-4100 226-4103 



229-41 65 

231 -423S 
237-4466 
229-4147 
236-4451 237-4471 

235-4377 235-4403 

236-4431 

237-4460 

234-4353 234-4362 

244-4712 

243-4676 



48-5014 

49-5100 

89-2660 191-2717 213-3642 

76-2404 176-2416 176-2420 182-2514 188-2637 206-3407 207-3413 207-3420 207-3421 208-3437 209-3455 220-3736 
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221 

.C2EZ 176 

. CCD 1 65 

-CIN1 144 

.CINT 140 

. CKEA 253 

.CKEB 243 

.CKEO 212 

.CKTC 224 

.CLGA 232 

.CLGB 233 

.CLGC 233 

.CLGO 233 

.CLM1 248 

.CLOG 232 

.CLRM 248 

. CURS 1 63 

229 

.CLSX 173 

. CMDA 149 

191 

.CMDB 182 

. CMOC 182 

.CMDE 1S2 

. CMER 165 

.CMP 196 

. CMPR 164 

. CNVT 179 

.CPGC 230 

. CPME 25 1 

.CPRM 226 

. CRCT 19 1 

.CROS 237 

. CRSA 242 

. CSDI 142 

.CSLA 201 

.CSPT 179 

.CSTA 173 

.CUNK 176 

.DAP 165 

.DATA 222 

.OERC 239 

. DERD 235 

.06RE 239 

-OERF 235 

.OERP 232 

.DIAG 83 

.DONE 163 

.OONX 174 
. END 
. ER 
. ERS 

.EXLP 222 

. EXSP 22 1 



83 

334 

1 65 



-3747 
-2417 
-2210 

- 1574 
-1514 
-5214 
-4673 
-3617 
-3777 
-4275 
-4301 
-4313 
-4304 
-5021 
-4273 
-5020 
-2157 
-4164 
-2340 

- 1735 
-2710 
-2511 
-25 10 
-2502 
-2223 
-3137 
-2202 
-2430 
-4214 
-5154 
-4055 
-2723 
-4501 
-4660 

- 1555 
-3253 
-2482 
-2343 
-2403 
-2214 
-3763 
-4571 
-4425 
-4574 
-4421 
-4251 
-77 
-2165 
-2362 

- 100 
-7763 
-2204 
-37B3 
-3737 



221 ' 

19 1- 

170- 

1 44- 

144- 

253- 

253- 

230- 

237- 

233- 

233- 

233- 

233- 

248 

236- 

249- 

175- 

230- 

175- 

165' 

19 1 ■ 

19 1- 

182- 

193- 

165- 

196- 

190- 

192- 

235- 

251 ■ 

230- 

192- 

241 ■ 

242- 

197- 

202- 

1 80- 

213- 

181 ■ 

174- 

222- 

243- 

236- 

326- 

235 

233- 



3751 

2714 

2270 

160 1 

1572 

5217 

5213 

4217 

447 1 

4300 

4305 

4315 

4306 

5023 2 

4443 2 

5075 2 

2375 1 
4204 

2376 2 
2232 1 
27 12 1 
2722 1 
2513 
3021 2 
2231 2 
3140 1 
2662 
2767 2 
4412 2 
5157 
4202 2 
2754 1 
4642 2 
4662 
3205 2 
3336 
2473 1 
3645 
2477 
2346 
3763 3 
4670 
4430 2 
7143 
4436 2 
4324 2 



222-3764 264-S445 333-7733 



53-5220 253-5222 323-7036 
35-4422 2S3-517S 
41-4637 255-5224 



233-43 14 



49-5075 
39-4566 
49-5075 
96-3131 

31 -4233 
70-2275 
92-2742 
91 -2731 

09-3467 
19-3722 
96-3143 

66-5452 
37-4503 

37-4464 
98-3215 

4 1 -4655 

23-3766 
94-3044 



249 -5076 

200-3245 201-3255 201-3256 202-3336 210-3515 211-3563 211-3602 224-3775 225-4050 229-4152 229-4160 

170-2277 170-2305 170-2307 171-2311 174-2352 182-2506 183-2S16 183-2520 1S8-2621 191-2701 191-2703 

208-3431 208-3433 208-3435 214-3654 214-3656 214-3660 

192-2755 

219-3723 



243 - 4707 
250-510 1 



210-3532 



174-2360 
174-2364 

83-103 
334-7764 
191 -2672 

333-7732 



33-7734 333-7735 

39-4544 239-4555 239-4560 239-4573 

36-4437 239-4570 

38-4537 239-4573 

75-2367 175-2372 175-2374 182-2505 209-3465 213-3641 

97-3203 211-3553 211-3557 213-3640 

84-134 85-140 85-150 85-153 85-153 86-153 

34-7767 335-7773 335-7776 335-7777 335-8000 
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U .FLU 
U .GCSA 
U .GCSB 
U GCSC 
U .GCST 
U . GETP 
U . GLBN 
U . GLBX 
U . GMST 
U . GPKA 
U . GPKB 
U.GPKT 
U.GREF 
U .GRFA 
U . GRFB 
U GSDA 
U GSOB 
U GSDC 
U . GSDD 
U . GSOI 
U . GSDN 
U.GSOW 
U. GSOX 
U.GSDY 
U.GSST 
U .GTAD 
U.GUCP 
U GUS 
U .GUST 
U.HERR 
U . HTMO 
U . HWVR 
U . I0L8 
U. IDLC 
U. IOLD 
U. IDLE 
U. IMEX 
U. INTA 
U . INTI 
U . INTR 
U . INTV 
U . INTX 
U . INVA 
U . INVM 
U . IOCM 
U . IOPO 
U . IOPI 
U . IOPA 
U . IOPB 
U . IOPC 
U . IOPE 
U . IOPF 
U . IOPG 
U . IOPI 



i es- 

183- 
183- 
183- 
165- 

248- 

232- 

197- 

173- 

154- 

154- 

148- 

170- 

184- 

184- 

185- 

185- 

185- 

185- 

185- 

185- 

185- 

186- 

186- 

220- 

150- 

175- 

1 88- 

1 65- 

I 60- 

145- 

202 

142 

1 42- 

143- 

140 

170 

155 

1 47 

127- 

1 55 

1 55 

258 

258 

1 92 

1 90 

19 1 

192 

19 1 

19 1 

1 94 

195 

193 



2207 
2526 
2522 
2523 
2217 
5030 
4271 
3151 
2336 
2007 
2006 
1677 
2300 
2542 
2545 
2553 
2554 
2562 
2563 
25S1 
2552 
2553 
2602 
2601 
3725 
1747 
2373 
2617 
2220 
2067 
1616 
3335 
1545 
1543 
1 564 
1531 
2301 
2023 
1 662 
1 136 
2013 
2023 
5312 
5276 
2757 
2671 
2704 
2737 
2724 
2677 
3061 
3070 
2777 
3 122 



1 70-2272 
183-2531 
183-2533 
133-2532 
183-2515 
249-5062 
236-4441 
240-4602 
175-2375 
154-2012 
154-201 1 
148- 1706 
183-2521 
164-2550 
184-2550 
185-2560 
185-2556 
185-2570 
185-2566 
188-2636 
188-2625 
185-2562 
186-2606 
186-2603 
333-7731 
151- 1766 
187-2610 



183-2535 



258-5273 

239-4574 240-4577 



o 



195-3102 211-3561 2 1 3 - 3 646 233 - 4302 234-4337 237-4475 247-5011 270-5476 



154-2005 
184-2536 



191-2713 208-3436 209-3452 

186-2572 

186-2607 

152-1777 155-2016 

188-2640 191-2715 193-2770 209-3464 210-3521 



188-2617 

334-7770 

145-1622 146-1635 149-1707 229-4153 

214-3666 334-7750 334-7750 334-7750 

142-1561 



143- 1562 

146- 1630 

140- 1533 

170-2303 

1SS-2023 

149- 1723 

155-2023 

155-2015 

155-2023 156-2030 

329-7425 

253-531 1 

196-3133 

19 1 -2673 191 -2676 

19 1 -271 1 



147- 1663 

140- 1534 
171-2312 
156-2030 
155-2013 
156-2026 



142-1537 143-1571 
183-2534 215-3674 



221-3762 333-7736 



192-2744 
192-2735 
1 9 1 -2706 
194-3063 
193-3072 
195-31 10 
196-3125 



192-2746 
192-2743 
1 93-2770 
194-3064 
195-3 100 



192-2756 
196-3 143 
195-3065 195-3073 322-7004 
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. IOPJ 

. IOPK 

. IOPL 

. IOPM 

. IOPN 

. IOPP 

. IOPR 

. IOPS 

. IOPW 

. IOPX 

. IOPV 

. IOPZ 

. IOSA 

. IOSH 

. L1R1 

. LNKA 

. LNKB 

. LNKH 

. LNKP 

. LOGA 

. LOGS 

. LRR1 

. MAPI 

.MAP2 

U.MIN1 

U.MINT 

U.MIOA 

U MIOB 

U.MIOP 

U.MLUN 

U . MNRD 

U . MNWR 

.MODI 

U . MWOA 

. MWDB 

U NOP 

U .ONLO 

U . ONLA 

U .ONLB 

U . ONLC 

U .ONLO 

U .ONLE 

U . ONLF 

U . ONLG 

U .ONLH 

U . ONLI 

U . ONLL 

U . ONLN 

U. ONLR 

U. ONLS 

U . ONLX 

U . ONLY 

U . ONLZ 

U .OPCD 



196- 
196- 
196- 
193- 
197- 
193- 
190- 
191 - 
193- 
192- 
192- 
194- 
1 93- 
197- 
227- 
199- 
I 99- 
1 63- 
192- 
200- 
140- 
230- 
248- 
248- 
257- 
196- 
204- 
204- 
204- 
202- 
1 65- 
1 65- 
271 - 
206- 
207- 
1 70- 
203- 

1 74- 
208- 
209- 

2 10- 
210- 
209- 
211- 
211- 
2 11- 
209- 

1 65- 

2 11- 
209 
210- 
211- 
209 
149- 



3131 
3115 
3 12 1 
3030 

3 1 50 
3017 
2663 
2726 
3004 
2761 
2764 
3034 
303 1 
3162 
4131 
3223 
3222 
2153 
2756 
3245 
1 536 

4 1 67 
S040 
5036 
5261 
3141 
3373 
3375 
3372 
3325 
2227 
2230 
5477 
3412 
3415 
2271 
3423 
2353 
3427 
3475 
3520 
3517 
3463 
3573 
3575 
3572 
3502 
221 2 
3563 
3471 
3520 
3552 
3472 
1733 



1 96 
1 9 6 
196 
197 
193 
1 90 
1 9 1 
1 93 
322 
210 
21 1 
1 97 
1 97 
227 
199 
199 
193 

1 99 
201 
200 
234 
249 
249 
257 
226 
221 
264 
206 
205 
206 
207 
334 
207 
207 
170 
203 
208 
209 
209 

2 1 2 
210 
21 1 
212 
21 1 
2 12 
209 
208 
234 
210 
21 1 
21 1 
209 
1 63 



4541 
3144 
3124 

3114 
3153 
3032 
2665 
2732 
301 1 
6777 
3541 
3545 
3 170 
3164 
4132 
3225 
3224 
3026 
3222 
3263 
3233 
4335 
505 1 
5047 
5263 
4101 
3741 
5437 
3410 
3401 
3406 
3413 
■7757 
-3420 
3421 
2273 
3426 
3436 
3441 
3477 
3606 
3527 
3546 
-3610 
3600 
3607 
3503 
3424 
4330 
-3504 
'3554 
'3564 
•3474 
21 64 



239-4567 



196-3127 196-3144 197-3146 
197-3176 



190-2667 191-2705 



197-3172 

227-4133 227-4136 



199-3230 209-3456 233-4326 237-4474 
202-3340 208-3440 222-3765 

223-3767 
241 -4636 
259-5401 

2S7-5265 

257-5232 



207-3414 
217-3702 



170-2304 



210-3505 



212-3621 



211-3550 211-3551 212-3631 



212-3625 



209-3SOO 210-3504 211-3567 
163-2166 164-2166 256-5231 



( 
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U.OPCE 

U . OPDM 

U . OPIM 

U. OVLA 

U . OVLB 

U OVLP 

U.PKT2 

U .PTEL 

U .PTL2 

U . PTL3 

U . PTL4 

U.PTL5 

U.OSNO 

U.R1RO 

U.R1R1 

U . RAMD 

U.RAMX 

U .RCSA 

U RCSB 

U . RCSC 

U . RCSR 

U . RCVE 

U.RO 

U . RECV 

U.RPL 

U .RRCA 

U .RRCC 

U .RRCE 

U .RRCX 

. RREC 

. RSTR 

U . RSVA 

. RSVB 

. RTST 

. RV3A 

. RV3B 

. RV3C 

.RV30 

.RV57 

.RVSA 

.RV5B 

. RV5C 

RV50 

.RVSE 

. RVSF 

.RV5G 

U . RVSJ 

. RVSR 

. RV5T 

. RV5VX 

.RVSX 

U .RVSY 

U RV52 

U .RV7A 






t 65-2223 

164-2173 165-2224 

I 64-2175 165-2215 

241-4643 241-4651 

241 -4640 24 1 -4644 

234-4333 241-4637 

197-3201 198-3206 

249-5046 257-5272 256-5314 

259-5315 259-5317 259-5341 

259-5323 259-5325 

259-5323 259-5326 

259-5340 259-5345 

177-2427 202-3340 

237-4504 237-4507 237-4511 253-5202 253-5204 2S3-5205 254-5223 

256-5277 256-5300 25S-S301 258-5302 258-5303 2S3-5304 258-5310 

142-1541 145- 1624 

142-1541 142-1541 145-1625 

150- 1745 151 - 1776 

146-1631 148- 1705 1SO-1746 

1 50- 1 745 1 50- 1 747 

146-1627 148- 1703 150- 1737 

149-1720 149-1726 149-1731 149-1735 

164-2200 190-2664 

142-1537 147-1660 148-1675 149-1734 149-1736 

165-2205 191-2674 

245-4732 245-4740 

246-4745 246-4754 

246-4762 246-4767 

245-4734 245-4735 245-4741 

211-3S00 234-4363 239-4542 245-4731 

76-0 76-0 76-2 88-23 1 

167-2241 167-2241 208-3434 

167-2247 167-2247 171-2310 191-2702 

166-2233 166-2236 167-2245 167-2250 

322-6771 323-7055 324-7060 

231-4224 322-7015 

322-6774 325-7137 

322-7006 322-7011 322-7016 

323-7022 333-7730 

323-7025 323-7033 

324-7066 324-7100 

324-7070 324-7074 324-7076 

324-7066 324-7101 

324-7103 324-7113 

324-7073 324-71 1 1 

324-7076 324-7126 

323-7026 323-7031 
323-7053 

323-7045 323-7054 327-7161 327-7163 

323-7O30 323-7047 

323-7032 323-7041 

323-7043 323-7046 

323-7034 323-7040 324-7061 

324-7061 327-7153 
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.RVC1 321-6762 

.RVC3 322-6762 324-7110 333-7726 

.RVC5 323-7022 333-7727 

.RVC7 327-7153 

RVCK 231-4223 232-4257 233-4315 233-4323 

RVCT 223-3770 228-4137 

RVFA 233-4316 326-7144 

.RVF8 324-7117 326-7141 

.RVFE 324-7072 324-7114 

.RVFH 323-7027 323-7047 323-7052 326-7140 

RVRL 326-7141 326-7147 327-7155 

RVRT 325-7133 326-7151 327-7153 

.RVUX 322-7020 333-7725 

. SABT 222-3766 

.SADO 153-2004 153-2005 155-2017 

.SADX 146-1640 149-1712 153-2003 

•SBCN 176-2417 191-2716 197-3172 198-3210 

.SCCH 165-2221 214-3653 

SCID 202-3334 214-3667 334-7751 

.SEKA 161-2077 162-2146 

SEKB 161-2105 161-2107 

.SEKC 161-2077 162-2112 

.SEKG 162-2114 162-2147 

.SEKH 161-2100 161-2MO 162-2115 162-2150 

.SEKI 1 61 -2103 161 -2106 

.SEKO 161-2101 223-3766 241-4654 

.SEND 143-1563 146-1627 

.SETS 163-2162 195-3102 196-3132 241-4641 

.SETX 195-3103 237-4500 

.SGRP 195-3071 195-3073 242-4664 

.SLBN 197-3152 236-4442 239-4575 240-4604 

.SLEN 201-3261 202-3337 

.SNDA 147-1647 147-1665 147-1674 

SNDB 147-1643 147-1645 147-1664 

.ST1U 179-2446 179-2451 179-2457 180-2472 

.STER 221-3737 333-7733 

STOF 150-1742 150-1743 150-1753 

.STRT 139-1324 139-1SOO 140-1500 267-5461 

STSX 195-3107 234-4340 247-5013 

.STUD 165-2224 219-3721 

.SUCH 165-2213 208-3422 

.SUIO 201-3314 216-3675 217-3704 

SUNI 189-2661 201-3260 212-3631 217-3702 

.TBEC 235-4415 240-4624 243-4667 

.TIMR 143-1567 145-1603 

. TMDA 211-3566 230-4220 233-4320 234-4354 234-4362 

TMOD 209-3466 209-3476 210-35O7 233-4321 

. TMRA 145-1610 145-1612 

.UCSR 147-1661 149-1722 151-1755 

. UERD 142-1542 160-2066 

.UERR 80-4O 145-1621 147-1653 149-1714 150-1752 151-1770 

262-541 5 267-5455 

.ULKA 173-2341 209-3447 213-3641 214-3711 

.ULNK 147-1657 218-3713 264-5444 



55-2021 160-2066 160-2071 164-2176 165-2222 196-3142 228-4102 259-5356 
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. UNEA 

.UNEB 

U.UNEC 

U. LINED 

. UNEE 

.UNER 

U.UNRD 

U .UNWR 

. VAXP 

U . VAXR 

U . VCER 

WR 
U WTSA 
U .WTST 
U . XCMA 
U . XCMP 
U. XFCP 
. ZPSW 
USK 
UBAR 



232 
232 
232 
230 
232 
230 
230 
235 
155 
140 
1 64 
1 64 
240 
232 
224 
223 
I 43 
201 
21 
17 
108 
117 
136 
1 44 
149 
151 
1 63 
179 
136 
192 
1 S3 
1 96 
201 
203 
210 
212 
220 
226 
230 
233 
236 
239 
242 
243 
25 1 
257 
259 
259 
290 
29 1 
293 
296 
299 
302 



-4246 
■4262 
-4252 
-4206 
-4242 
-4212 
-4207 
-4407 
-2014 

- 1501 
-2176 
-2201 
-4627 
-4256 
-4004 
-377 1 

- 1564 
-3264 
-O 
-O 

-565 
-772 
-1242 

- 1 600 
-1711 
-1762 

2155 
2447 
2573 
276 1 
3033 
3116 
32S4 
3353 
3531 
3634 
3734 
4062 
4171 
4320 
4440 
4572 
4665 
5031 
5157 
5250 
5337 
5375 
5673 
5773 
6052 
6156 
6227 
6320 



232- 
232- 
232- 
232- 
232- 
230- 
230- 
235- 
155- 
155- 
2 19- 
190- 
240- 
239- 
237- 
256- 
26 1 - 
203- 
84- 
36- 
108- 
118- 
136- 
1 45 - 
1 49 - 
151 - 
1 63- 
179- 
136- 
192- 
194- 
196- 
201 - 
203- 
210- 
212- 
220- 
226- 
230- 
233- 
237- 
240- 
242 ■ 
243- 
2S2- 
257- 
253- 
259' 
290- 
29 1 ' 
293' 
296 
301 • 
302 



4255 
4266 
4253 
4241 
4248 
4216 
421 1 
44 14 
2014 
2023 
3721 
2666 
4627 
4563 
4472 
5230 
5402 
3371 
1 15 
157 
570 
775 
1 247 
16 10 
1722 
1764 
2156 
2447 
2577 
2766 
3037 
3133 
3265 
3355 
3534 
3635 
3735 
4070 
4207 
4323 
4453 
■4577 
4666 
5035 
5 1 65 
5256 
•5341 
S4O0 
5700 
6000 
6055 
■6157 
■6263 
'6320 



239-4576 



235-4404 
232-4247 
230-421 6 

196-3134 
155-2023 



241 -4631 
240-4625 



247-SOIO 

84- 124 
104-S01 
108-572 
118- 1002 
136-125 1 
145-1612 
1 50- 1 737 
151 - 1772 
163-2160 
179-2460 
187-2611 
192-2767 
194-3041 
196-3135 
201 -3266 
203-33S6 
210-3535 
213-3640 
221 -3754 
226-4077 
230-4216 
233-4324 
237-4460 
240-4602 
243-4672 
248-5037 
253-5212 
257-5257 
259-5343 
262-5414 
29O-5707 
291 -6002 
293-6055 
296-6157 
301 -6273 
302-6322 



232-4247 235-4410 235-4414 239-4552 



b 



239 

156 



4543 322-7013 322-7015 
2027 



241 -4634 



104- 
104- 
108' 
118- 

137- 

145- 

150- 

151 • 

172- 

179- 

187- 

193- 

194 

196 

201 ■ 

203 

210 

213 

221 

226' 

231 ' 

234 

237 

240 

245 

249 

255 

257 

259 

288 

290 

292 

293 

296 

301 

302 



500 

502 

578 

1004 

1255 

1624 

1737 

1775 

2315 

2460 

2615 

2772 

3045 

31 36 

3275 

3371 

3536 

3644 

3755 

4103 

4225 

4332 

4467 

4604 

4731 

5042 

5224 

5265 

5345 

5452 

5714 

6010 

6057 

8160 

6273 

6322 



1 06-506 

108-603 

113-1010 

140- 1533 

145- 1624 

150- 1740 

155-2015 

172-2317 

160-2467 

189-2645 

193-2775 

194-3051 

197-3148 

201 -3276 

204-3374 

21 I -3542 

213-3645 

223-3773 

227-41 10 

231 -4232 

234-4345 

237-4473 

240-4614 

24S-4732 

249-5043 

255-5225 

257-5267 

259-5353 

287-5457 

290-571 6 

292-6015 

293-6063 

296-61 60 

301 -8278 

302-6324 



106-512 

109-806 

118- 1012 

140- 1535 

145-1 625 

150- 1740 

161 -2077 

172-2322 

180-247O 

189-2646 

1 93-3002 

194-3052 

197-3153 

201 -3277 

205-3401 

21 I -3546 

213-3652 

224-4001 

227-41 12 

231 -4237 

234-4356 

238-4525 

240-4623 

245-4743 

249-5044 

256-5230 

257-5270 

259-5354 

270-5475 

290-5724 

292-6017 

293- 6103 

296-6161 

301 -6276 

302-6324 



106-5 15 

110-6 11 

122- 1057 

142- 1543 

145- 1 626 

ISO- 1742 

161-2101 

1 72-2325 

180-2471 

139-2647 

193-3013 

194-30S8 

197-3173 

201 -3300 

208-344O 

21 1 -3554 

21 6-3675 

225-4007 

227-41 13 

232-4243 

234-4365 

238-4526 

241 -4632 

245-4744 

249-S04S 

257-S233 

258-5273 

259-5357 

273-5505 

290-573 1 

292-6025 

294-6107 

296-61 61 

302-6302 

303-6335 



106-5 17 
110-613 
1 22- 1064 
142- 1544 
145- 1626 
150-1744 
1 61 -2103 
173-2342 
1 80-2472 
1 89-2650 
1 93-301 4 
1 94-3057 
197-3204 
201 -3301 
209-3442 
21 1 -3564 
216-3676 
225-401 1 
227-41 1 6 
232-4255 
234-4368 
238-4527 
241 -4633 
246-4755 
249-5047 
257-5234 
258-5314 
259-5361 
274-5522 
290-5733 
292- 6032 
294- 6 107 
296-6 162 
302- 6302 
303- 6337 



106-520 

110-615 

122- 1066 

142- 1547 

146-1 827 

150- 1744 

162-21 16 

174-2354 

130-2472 

1 89-2652 

1 93-3020 

1 94-3062 

198-3215 

201 -3302 

209-3445 

21 1 -3573 

21 6-3677 

225-4015 

227-4120 

232-4264 

235-4373 

238-4530 

241 -4640 

246-4765 

249-5051 

257-6235 

259-S315 

2S9-S364 

274-S523 

2 9 1-5741 

292-6034 

295-6125 

296-6162 

302-63 12 

303-6337 



106-527 

110-617 

124- 1073 

142- 1553 

146- 1 631 

ISO- 1746 

162-2120 

174-2382 

181 -2477 

139-2663 

193- 3022 

1 95 -3066 

198-3216 

202-3315 

209-3460 

21 1 -3603 

21 6-3700 

225-4020 

227-4122 

232-4268 

235-4402 

238-4533 

241 -4652 

248-4767 

250-5101 

257-5236 

2S9-5320 

259-5365 

277-5534 

29 1 -5746 

293-604 1 

295-6133 

298-61 63 

302-6312 

303-6341 



108-545 

1 10-623 

124- 1075 

142- 1557 

147-1647 

150- 1747 

1 62-2123 

174-2365 

1 85-2556 

189-2655 

1 93 -3024 

195-3074 

199-3230 

202-3320 

209-3473 

212-3626 

217-3703 

225-4023 

228-4141 

233-4307 

235-4403 

238-4535 

241 -4653 

246-4773 

250-5104 

257-5240 

259-5321 

259-5366 

277-5535 

291 -5750 

293- 6043 

295-6133 

296-6163 

302-6314 

303-6341 



103-556 

1 10-625 

124- 1 101 

142- 1561 

147- 1661 

ISO- 1751 

1 62-2124 

174-2366 

18S-2SS7 

192-2740 

193-3025 

195-3075 

200-3237 

202-3321 

209-3500 

212-3631 

217-3705 

225-4030 

229-4 151 

233-4310 

235-441 6 

239-4550 

242-46S6 

246-4774 

250-S1O7 

257-5242 

259-5327 

259-5372 

282-5577 

291-S7S6 

293-6044 

296-6147 

296-6164 

302-6314 

303-6353 



108-560 

1 17-762 

125- 1 108 

144- 1574 

148- 1703 

151 - 1755 

I 62-2131 

176-2405 

185-2566 

192-2756 

193-3027 

195-3076 

200-3241 

202-3322 

210-3512 

212-3632 

217-3706 

225-4046 

229-41S5 

233-4312 

235-4420 

239-4553 

242-466 1 

248-5014 

250-51 12 

2S7-S244 

259-5330 

259-5373 

289-5663 

291 -5763 

293- 6045 

298-6154 

296-6164 

302-6316 

303-8355 



108-563 

1 17-770 

125- t 107 

14 4-1577 

148- 1705 

1 S 1 - 1 7 5 8 

163-2154 

176-2413 

18S-2S67 

192-2780 

193-3032 

195-3106 

200-3247 

203-3347 

210-3522 

212-3633 

218-371 1 

225-4047 

229-4165 

233-4314 

236-4432 

239-4S70 

242-4682 

24S-S015 

251 -5132 

257-5246 

2S9-5334 

259-5374 

289-5670 

291 -5765 

293-6046 

296-6 156 

299-6216 

302-6316 

303-63SS 



4 U 
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UBURST 
UC2EDA 

UCRO 



UCRS 

UCRTST 

UCSREN 

UDAt 

UDO 

UDOI 

UDS 

UER 



UF . 576 
UF.CMR 
UF.CMW 
UF.MSK 
UF . RMV 
UF .RPL 
UF .WPH 
UF.WPS 
UGUCPC 
UGUSTA 
UGUSTB 
UGUSTC 
UHANG 
UHELP 
UI0PA1 
UIOPER 
UMP 
UMPN 
UN . BRC 
UN . BUF 
UN . BWC 
UNB . CA 
UNB.CB 
UNB . CC 
UNB . CM 
UNB . CX 
UNB . RD 
UNB . RS 
UNB . SR 
UNB .WR 
UNC . RM 
UNC.SS 
UNERR 



304-637S 
322-6765 
329-740S 
329-7423 

49 -O 
1 76- 2400 

18-0 

39-241 
116-722 
334-7764 

18-0 

83- 102 

43-0 

73-0 

18-0 

17-0 

18-0 

17-0 

80-52 

89-237 
331 -7435 

63-0 

63-0 

63-0 

63-0 

63-0 

63-0 

63-0 

63-0 
187-2613 
188-2625 
188-2626 
188-2623 

80-55 

80-55 
192-2744 
193-2771 

13-0 

12-0 
230-4215 

65-0 
235-44 13 
243-4675 
244-4720 
244-4723 
235-4405 
238-4427 
149-1713 

80-57 
243-4704 
147-1652 

63 -O 

61 -O 

70-O 



304-6377 304-6377 304-6401 304-6401 304-6413 304-8415 304-6415 306-6432 306-6437 306-6437 306-6443 318-6732 322-6762 

322-6773 322-6774 322-7004 322-7007 322 - 70 1 2 323 - 704 6 323-7053 325-7135 325-7136 326-7140 326-7142 327-7162 323-7404 

329-7406 329-7407 329-7410 329-7411 329-7412 329-7413 329-7414 329-741S 329-7416 329-7417 329-7420 329-7421 329-7422 

49-0 122-1052 136-1235 139-1320 
176-2413 

18-0 13-0 76-2 76-4 80-57 81-72 83-10S 83-113 84-115 84-124 84-126 34-130 89-240 

102-457 103-473 104-600 107-534 107-S35 108-554 108-S74 114-645 114-653 114-656 114-665 115-674 115-711 

116-741 126-1110 126-1112 126-1114 129-1154 133-1301 145-1807 145-1617 145-1621 155-2025 156-2046 299-6241 334-7762 

335-7773 335-7776 335-7777 

13-0 13-0 102-460 145-1604 146-1333 14S-167S 155-2023 156-2042 

102-456 102-457 



126-1115 126- 1116 126- 1117 



79-27 
80-54 



79 - 30 
81-61 



79-31 
81 -65 



79-33 

31-66 



80-34 
81-37 



80-35 
81 - 



80-36 

83-101 



80-4O 
83- 104 



80-43 
84-135 



80-44 
35- 141 



80-46 
35-151 



80-47 
88- 165 



80-51 
83-216 



91-252 160-2066 160-2073 160-2074 160-2076 331-7426 331-7427 331-7430 331-7431 331-7432 331-7433 331-7434 



331-7436 331-7437 



196-3122 227-41 1 I 
196-3122 



210-3505 



194-3042 194-3042 

194-3042 194-3042 21O-3510 

187-261 6 

188-2627 

188-2631 

183-2630 188-2632 

30-55 80-60 

80-55 80-55 88-216 
192-2747 
193-2774 193-3001 



193-3009 193-3022 194-3043 



77-5 77-6 
244-4711 289-5634 289-5636 3O6-64S0 

65-0 
236-5633 301-6242 301-6243 
243-4701 
244-4724 
244-4726 
243-4667 
244-4725 

150-1750 207-3417 221-3746 230-4211 243-4704 259-5355 289-5634 28 
232-4247 286-5633 286-5633 

151-1787 155-2020 206-3411 235-4407 288-5633 301-6242 301-6242 



n 



-5635 30S- 64SO 
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UNITF 46-0 

UNLOCK 145-1607 175-2376 195-3107 209-3454 209-3461 

UNSUCC 69-0 

UP.XFC 261-5402 333-7737 333-7746 333-7747 



\ UPF 



13-0 
324-7061 



83-101 



JPROC 
UO. CNT 



53-0 



URAMOA 145- 



URAMPE 
URETRY 
UROMPE 



149-1711 
625 145-1626 
104-475 
194-3061 
103-471 



83- 104 



149-1715 



84-135 



85- 1 4 1 



211-3562 213-3650 213-3551 232-4241 232-4270 233-4306 269-5474 
85-151 181-2100 193-3030 t94-3063 196-3114 197-3201 323-7034 323-7047 323-7055 



85-137 

60-0 

84-133 

USTRTA 140-1521 140-1525 

UTEMP1 50-0 50-0 

UTMP 17-0 

UTSTBL 331-7426 

UWMCI 40-0 

UXF14A 254-5427 333-7742 333-7743 

UXF14B 264-5441 264-5443 

UXF1SB 263-5426 264-5443 256-54S3 268-S471 

UXFC11 262-5407 333-7737 333-7740 

UXFC12 262-S407 

UXFCI3 263-5423 333-7741 

UXFC14 264-5427 

UXFC15 265-5446 

UXFCI6 266-5446 333-7744 

UXFC17 267-5454 333-774S 

UXFC18 268-5462 333-7746 

UXFCRW 262-5407 

UXFUIO 262-5417 264-5440 289-5634 289-5634 306-6450 

V.RVC3 323-7056 324-7106 333-7726 

V.RVC5 333-7727 

V.RVC7 324-7123 333-7730 

V.RVC8 333-7731 

V.RVCT 333-7725 

V.LIRVC 228-4144 333-7725 



VAX .PG 


50 


-O 


139 


1317 






VAXINT 


21 


-0 


21 





155 


2025 


VAXO 


48 


-O 










VC . CMD 


52 


-0 


1 64 


2173 






VC . OMM 


52 





1 64 


2173 






VC . LOG 


52 


-0 


201 


3270 






VC .RSP 


52 


-0 










VECT 


59 





232 


4244 






VECTAB 


333 


7725 










WAIT 


80 


54 


88 


223 


89 


240 


WAITS 


90 


246 


126 


1121 


130 


1 157 


WASTE 


92 


275 


108 


553 


1 15 


677 


WCI 


40 













WD 


44 













WMCI 


40 





303 


6346 


304 


6362 


WRAP 


1 


O 










WRC 


14 


O 










WRCMO 


87 


205 


87 


210 


93 


302 



90-243 133- 1221 



116-734 119-1023 133-1224 



98-372 119-1017 120-1037 120-1042 126-1125 129-1147 130-1153 
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WRFST 


IS 


-0 


SI 


-65 


93 


310 


108 


541 


1 13 


-635 


1 1 6 


■732 


1 17 


■771 


158 


■2056 


301 


■6271 


301 


6277 


303 


6336 


303 


■6354 


304 


-6376 


306 


6435 


WRIT CD 


69 


-O 


69 


-0 


69 





194 


-3040 


194 


-3047 


322 


-7006 


































WRITE 


40 


-0 






















































WRNXT 


15 





108 


-543 


301 


6272 


301 


6300 


302 


-6313 


302 


■6315 


302 


-6317 


302 


■6321 


302 


-6323 


306 


6436 


















WRPFLG 


323 


7022 


324 


■7067 


324 


7 104 


324 


7112 


324 


•7113 






































WRRDX 1 


69 





69 


-O 


















































WRROXR 


69 

























































WRSND 


15 


O 


304 


64 14 


















































WRT 


24 

























































WRTERR 


98 


366 


1 60 


2074 


















































WRTSA 


37 


•214 


98 


365 


126 


1 1 !7 


129 


1 156 


133 


1220 


139 


1322 


































WT .OIA 


1 22 


1054 


136 


1237 


137 


1257 


301 


6242 


301 


6245 






































WT . RAM 


107 


537 


122 


105 3 


1 24 


1077 


136 


1236 










































WTCMDO 


93 


312 


94 


31 6 


95 


323 


1 17 


773 


1 18 


1001 


299 


6222 


































XBNCOD 


46 





210 


3518 


















































XBNSTR 


46 


O 


194 


3035 


210 


3541 














































XCMP 


59 
245 




4734 


1 72 
245 


2323 

4741 


173 
247 


2337 

S0I3 


174 


23S5 


193 


2776 


209 


3462 


21 1 


3601 


213 


3651 


223 


3770 


232 


4267 


233 


4303 


237 


4472 


237 


-4474 


241 


4634 


XFCFIN 


261 


5404 


333 


7746 


333 


7747 














































XFCMAX 


26 1 


5403 


333 


7747 


333 


7747 














































XFCTAB 


333 


7737 


333 


7737 


















































XFCUPR 


261 


5402 


333 


7737 


333 


7746 


333 


7747 


333 


7747 






































XWRCMD 


156 


2033 


1 56 


2041 


158 


2050 














































XWTCMD 


159 


2061 






















































2R0 


13 





78 


23 


80 


40 


83 


102 


34 


131 


84 


132 


34 


133 


84 


136 


85 


137 


85 


145 


85 


146 


85 


147 


85 


152 


86 


163 




86 


184 


8 6 


165 


86 


186 


36 


167 


36 


170 


35 


171 


86 


1 72 


86 


173 


86 


174 


86 


175 


89 


234 


9 1 


257 


96 


344 


99 


377 




9 9 


407 


99 


41 1 


102 


465 


104 


503 


106 


512 


108 


547 


1 10 


622 


1 15 


71 6 


11 6 


746 


1 17 


760 


1 18 


1007 


120 


1034 


120 


10SO 


122 


1063 




124 


1073 


124 


1 100 


126 


1 124 


1 26 


1131 


127 


1 135 


128 


1144 


128 


1 145 


129 


1 153 


130 


1 162 


136 


1235 


136 


1246 


137 


1267 


138 


1301 


140 


1531 




140 


1533 


1 40 


1534 


142 


1547 


145 


1617 


145 


1 621 


146 


1635 


147 


1 646 


147 


1 660 


147 


1665 


148 


1 677 


150 


1751 


151 


1760 


151 


1772 


151 


1 7 74 




154 


2007 


154 


2010 


156 


2032 


156 


2044 


161 


2 102 


161 


2105 


1 62 


2 117 


153 


21 65 


1 6 4 


2175 


1 64 


2200 


1 64 


2201 


164 


2202 


164 


2203 


165 


2204 




1 65 


2205 


1 65 


2207 


1 65 


2210 


1 65 


221 1 


1 65 


2212 


155 


2213 


165 


2214 


165 


221 6 


1 65 


2217 


1 65 


2220 


1 65 


2221 


1 65 


2222 


165 
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